Last login: Thu Sep  8 13:30:38 on ttys000
Kenneths-MacBook-Pro:~ Ken$ clisp
  i i i i i i i       ooooo    o        ooooooo   ooooo   ooooo
  I I I I I I I      8     8   8           8     8     o  8    8
  I  \ `+' /  I      8         8           8     8        8    8
   \  `-+-'  /       8         8           8      ooooo   8oooo
    `-__|__-'        8         8           8           8  8
        |            8     o   8           8     o     8  8
  ------+------       ooooo    8oooooo  ooo8ooo   ooooo   8

Welcome to GNU CLISP 2.49 (2010-07-07) <http://clisp.cons.org/>

Copyright (c) Bruno Haible, Michael Stoll 1992, 1993
Copyright (c) Bruno Haible, Marcus Daniels 1994-1997
Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998
Copyright (c) Bruno Haible, Sam Steingold 1999-2000
Copyright (c) Sam Steingold, Bruno Haible 2001-2010

Type :h and hit Enter for context help.

[1]> ( + 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 )
210
[2]> ( / ( * 20 21 ) 2 )
210
[3]> (+)
0
[4]> (*)
1
[5]> (+ 1 2 3)
6
[6]> (* 1 2 3)
6
[7]> (- 1 2 3)
-4
[8]> (/ 1 2 3)
1/6
[9]> (mod 15 4)
3
[10]> (mod 4 15)
4
[11]> (sqrt 2)
1.4142135
[12]> (sqrt 100)
10
[13]> (expt 7 60)
508021860739623365322188197652216501772434524836001
[14]> ; cicumference of a radius 10 circle
(* 2 pi 10)
62.83185307179586477L0
[15]> ; area of a radius 15 circle
(* pi (expt 15 2))
706.8583470577034787L0
[16]> ; area of a radius 17.2 circle
(* pi (expt 17.2 2))
929.4089
[17]> ; area of a ring bounded by concentric circles of radii 15 and 17.2
(- ( * pi ( expt 17.2 2) ) ( * pi (expt 15 2) ) )
222.55052
[18]> (bye)
Bye.
Kenneths-MacBook-Pro:~ Ken$