Added skeleton Common Lisp package.
This commit is contained in:
parent
78c15dbed6
commit
95f6c3bdbb
10 changed files with 110 additions and 0 deletions
33
resources/test-fragments/defun-fact.html
Normal file
33
resources/test-fragments/defun-fact.html
Normal file
|
|
@ -0,0 +1,33 @@
|
|||
<!-- in theory this should exactly translate into `defun-fact.lisp`, q.v. -->
|
||||
|
||||
<div class="sexpr list">
|
||||
<var class="sexpr symbol">defun</var>
|
||||
<var class="sexpr symbol">fact</var>
|
||||
<div class="sexpr list">
|
||||
<var class="sexpr symbol">n</var>
|
||||
</div>
|
||||
<div class="sexpr list">
|
||||
<var class="sexpr symbol">cond</var>
|
||||
<div class="sexpr list">
|
||||
<div class="sexpr list">
|
||||
<var class="sexpr symbol">zerop</var>
|
||||
<var class="sexpr symbol">n</var>
|
||||
</div>
|
||||
<code class="sexpr number">1</code>
|
||||
</div>
|
||||
<div class="sexpr list">
|
||||
<var class="sexpr symbol">t</var>
|
||||
<div class="sexpr list">
|
||||
<var class="sexpr symbol">*</var>
|
||||
<var class="sexpr symbol">n</var>
|
||||
<div class="sexpr list">
|
||||
<var class="sexpr symbol">fact</var>
|
||||
<div class="sexpr list">
|
||||
<var class="sexpr symbol">1-</var>
|
||||
<var class="sexpr symbol">n</var>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
Loading…
Add table
Add a link
Reference in a new issue