Clean (programming language)

Clean is a general-purpose purely functional computer programming language. For much of the language's active development history it was called Concurrent Clean, but this was dropped at some point. Clean is being developed by a group of researchers from the Radboud University in Nijmegen since 1987.

Clean
Paradigmfunctional
Designed bySoftware Technology Research Group of Radboud University Nijmegen
First appeared1987 (1987)
Stable release
3.0 / October 19, 2018 (2018-10-19)
Typing disciplinestrong, static, dynamic
OSCross-platform
LicenseSimplified BSD[1]
Filename extensions.icl, .dcl, .abc
Websiteclean.cs.ru.nl
Influenced by
Lean, Miranda, Haskell
Influenced
Haskell, Idris[2]

Features

The language Clean first appeared in 1987 and is still being further developed.[3] It shares many properties with Haskell: referential transparency, list comprehension, guards, garbage collection, higher order functions, currying and lazy evaluation.

An integrated development environment (IDE) for Microsoft Windows is included in the Clean distribution.

Clean deals with mutable state and I/O through a uniqueness typing system, in contrast to Haskell's use of monads. The compiler takes advantage of the uniqueness type system to generate more efficient code, because it knows that anything with a uniqueness type can only be used once. Therefore, a unique value can be changed in place.[4]

Examples

Hello world:

 Start = "Hello, world!"

Factorial:

 fac :: Int -> Int
 fac 0 = 1
 fac n = n * fac (n-1)

 Start = fac 10

 fac :: Int -> Int
 fac n = prod [1..n] // The product of the numbers 1 to n

 Start = fac 10

Fibonacci sequence:

 fib :: Int -> Int
 fib 0 = 1
 fib 1 = 1
 fib n = fib (n - 2) + fib (n - 1) 

 Start = fib 7

 fibs :: Int Int -> [Int]
 fibs x_2 x_1 = [x_2:fibs x_1 (x_2 + x_1)]

 fib :: Int -> Int
 fib n = (fibs 1 1) !! n

 Start = fib 7

Infix operator:

 (^) infixr 8 :: Int Int -> Int
 (^) x 0 = 1
 (^) x n = x * x ^ (n-1)

The type declaration states that the function is a right associative infix operator with priority 8: this states that x*x^(n-1) is equivalent to x*(x^(n-1)) as opposed to (x*x)^(n-1). This operator is pre-defined in StdEnv, the Clean standard library.

How Clean works

Computation is based on graph rewriting and reduction. Constants such as numbers are graphs and functions are graph rewriting formulas. This, combined with compilation to native code, makes Clean programs which use high abstraction run relatively fast according to the Computer Language Benchmarks Game.[5]

Compiling
  1. Source files (.icl) and definition files (.dcl) are translated into Core Clean, a basic variant of Clean, in Clean.
  2. Core clean is converted into Clean's platform-independent intermediate language (.abc), implemented in C and Clean.
  3. Intermediate ABC code is converted to object code (.o) using C.
  4. Object code is linked with other files in the module and the runtime system and converted into a normal executable using the system linker (when available) or a dedicated linker written in Clean on Windows.

Earlier Clean system versions were written completely in C, thus avoiding bootstrapping issues.

The SAPL system compiles Core Clean to JavaScript and does not use ABC code.

The ABC machine

To close the gap between Core Clean, a high-level functional language, and machine code, the ABC machine is used. This is an imperative abstract graph rewriting machine.[6] Generating concrete machine code from abstract ABC code is a relatively small step, so by using the ABC machine it is much easier to target multiple architectures for code generation.

The ABC machine has an uncommon memory model. It has a graph store to hold the Clean graph that is being rewritten. The A(rgument)-stack holds arguments that refer to nodes in the graph store. This way, a node's arguments can be rewritten, which is needed for pattern matching. The B(asic value)-stack holds basic values (integers, characters, reals, etc.). While not strictly necessary (all these elements could be nodes in the graph store as well), using a separate stack is much more efficient. The C(ontrol)-stack holds return addresses for flow control.

The runtime system, which is linked into every executable, has a print rule which prints a node to the output channel. When a program is executed, the Start node is printed. For this, it has to be rewritten to root normal form, after which its children are rewritten to root normal form, etc., until the whole node is printed.

Platforms

Clean is available for Microsoft Windows, Apple Macintosh, Solaris and Linux.

Some libraries are not available on all platforms, like ObjectIO which is only available on Windows and Mac. The feature to write dynamics to files is only available on Windows.

Comparison to Haskell

A 2008 benchmark showed that Clean native code performs roughly equally well as Haskell (GHC), depending on the benchmark.[7]

Syntactic differences

The syntax of Clean is very similar to that of Haskell, with some notable differences:[4]

Haskell Clean Remarks
[ x | x <- [1..10] , isOdd x]

[ x \\ x <- [1..10] | isOdd x]
list comprehension
x:xs

[x:xs]
cons operator
data Tree a
  = Empty
  | Node (Tree a) a (Tree a)

:: Tree a
  = Empty
  | Node (Tree a) a (Tree a)
algebraic data type
(Eq a, Eq b) => ...

... | Eq a & Eq b
class assertions and contexts
fun t@(Node l x r) = ...

fun t=:(Node l x r) = ...
as-patterns
if x > 10 then 10 else x

if (x > 10) 10 x
if

In general, Haskell has introduced more syntactic sugar than Clean.

Community
  • IRC channel: #cleanlang on freenode
gollark: Looking at MainApplication.py:> objects = []This is not a very descriptively named thing. There should probably be a comment.> `def populate(self):`Arguably, it isn't very good design to make the code responsible for display *also* directly handle directly loading CSVs and such. Maybe this should be separated out more.> `def increment(self):`This does not appear to save anywhere, although I may have missed that bit.
gollark: Also also also, the ` ticks_count = 0 # this is supposed to hold the number of ticks we have instanced an object for` on the `Tick` class is not used anywhere.
gollark: Also also, `def __str__(self): pass` doesn't seem to do anything either.
gollark: Also, this function seems to have no valid reason to exist.
gollark: > def indIncreaseCounter(tickInstance):Python convention is to use `snake_case`, not `camelCase`.

References
  1. "Download Clean". Clean. Retrieved 23 July 2019.
  2. ""Idris - Uniqueness Types"". Retrieved 2018-11-20.
  3. "FAQ - Clean".
  4. ftp://ftp.cs.ru.nl/pub/Clean/papers/2007/achp2007-CleanHaskellQuickGuide.pdf
  5. "Which programming languages are fastest?". Computer Language Benchmarks Game. Archived from the original on 28 June 2011.CS1 maint: BOT: original-url status unknown (link)
  6. Koopman, Pieter (December 10, 1990). Functional Programs as Executable Specifications. Meppel: Krips Repro. p. 35. ISBN 90-9003689-X.
  7. Jansen, Jan Martin; Koopman, Pieter; Plasmeijer, Rinus (2008). "From Interpretation to Compilation" (PDF). Retrieved 2016-05-21. Cite journal requires |journal= (help)
This article is issued from Wikipedia. The text is licensed under Creative Commons - Attribution - Sharealike. Additional terms may apply for the media files.