;;; External, read-only connection to public Liitin objects
;;; Finndesign Liitin home page: liitin.finndesign.fi

(require "liitin-lib.rkt")

;XXX  EXAMPLES  XXX

;; Use of the provided primitives (see liitin-lib.rkt for more information)
(l-id server-name server-port)
(l-exists? 'gaia:fibonacci:2011-01-01T12:00:00)
(l-get 'gaia:fibonacci:2011-01-01T12:00:00)
(l-versions 'gaia:fibonacci)

;; Calling Liitin objects
(gaia:fibonacci 10)
(mirko:eliza "i can't play piano")
(map gaia:fibonacci '(1 2 3 4 5 6 7 8 9 10)); combine freely with local primitives (map in this case)
(jtu100:calculator~); GUI example (functionality not implemented)

;; About this Liitin-type-of environment:

;; The following won't work...
;(define x 10)
;x

;; ... but these will

(lambda ()
  (define x 10)
  (* x x))

((lambda (); evaluating the previous example
  (define x 10)
  (* x x)))

(named-lambda (plus a b)
              (+ a b))

(
 (named-lambda (plus a b)
              (+ a b))
 1 2);enter input to procedure 'plus'

;; for more details about Liitin programming environment, please see a tutorial at
;; http://www.youtube.com/watch?v=9pQmAgmss4k