<APPLET code="InputApplet.class" width=300 height=170
archive="Klisp.jar">
<PARAM  name="libraryFile" value="standard.lib">
<PARAM  name="inputText" value=
"(defun recursive_length (L)                    @
   (cond ((null L) 0)                           @
          (t (+ 1 (recursive_length             @
          (cdr L)))))                           @
)                                               @
(setq length (recursive_length '(1 2 3 4 5 6))) @
">
</APPLET>