Last login: Fri Oct  7 01:51:00 on ttys000
Kenneths-MacBook-Pro:~ Ken$ ssh kpemblet@pi.cs.oswego.edu
kpemblet@pi.cs.oswego.edu's password: 
Permission denied, please try again.
kpemblet@pi.cs.oswego.edu's password: 
Welcome to Ubuntu 16.04.1 LTS (GNU/Linux 4.4.0-38-generic x86_64)

 * Documentation:  https://help.ubuntu.com
 * Management:     https://landscape.canonical.com
 * Support:        https://ubuntu.com/advantage

2 packages can be updated.
0 updates are security updates.


Last login: Fri Oct  7 00:14:21 2016 from 129.3.209.178
pi:~> cd public_html/coursework/csc416/assignments
pi:~/public_html/coursework/csc416/assignments> 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]> (load "lp.l")
;; Loading file lp.l ...
;; Loaded file lp.l
T
[2]> (trace sum product)
;; Tracing function SUM.
;; Tracing function PRODUCT.
(SUM PRODUCT)
[3]> (sum '())
1. Trace: (SUM 'NIL)
1. Trace: SUM ==> 0
0
[4]> (sum '(496))
1. Trace: (SUM '(496))
1. Trace: SUM ==> 496
496
[5]> (sum '(1 11 111))
1. Trace: (SUM '(1 11 111))
2. Trace: (SUM '(12 111))
3. Trace: (SUM '(123))
3. Trace: SUM ==> 123
2. Trace: SUM ==> 123
1. Trace: SUM ==> 123
123
[6]> (sum '(1 2 3 4 5 6 7 8 9 10))
1. Trace: (SUM '(1 2 3 4 5 6 7 8 9 10))
2. Trace: (SUM '(3 3 4 5 6 7 8 9 10))
3. Trace: (SUM '(6 4 5 6 7 8 9 10))
4. Trace: (SUM '(10 5 6 7 8 9 10))
5. Trace: (SUM '(15 6 7 8 9 10))
6. Trace: (SUM '(21 7 8 9 10))
7. Trace: (SUM '(28 8 9 10))
8. Trace: (SUM '(36 9 10))
9. Trace: (SUM '(45 10))
10. Trace: (SUM '(55))
10. Trace: SUM ==> 55
9. Trace: SUM ==> 55
8. Trace: SUM ==> 55
7. Trace: SUM ==> 55
6. Trace: SUM ==> 55
5. Trace: SUM ==> 55
4. Trace: SUM ==> 55
3. Trace: SUM ==> 55
2. Trace: SUM ==> 55
1. Trace: SUM ==> 55
55
[7]> (product '())
1. Trace: (PRODUCT 'NIL)
1. Trace: PRODUCT ==> 0
0
[8]> (product '(496))
1. Trace: (PRODUCT '(496))
1. Trace: PRODUCT ==> 496
496
[9]> (product '(1 11 111))
1. Trace: (PRODUCT '(1 11 111))
2. Trace: (PRODUCT '(11 111))
3. Trace: (PRODUCT '(1221))
3. Trace: PRODUCT ==> 1221
2. Trace: PRODUCT ==> 1221
1. Trace: PRODUCT ==> 1221
1221
[10]> (product '(1 2 3 4 5 6 7 8 9 10))
1. Trace: (PRODUCT '(1 2 3 4 5 6 7 8 9 10))
2. Trace: (PRODUCT '(2 3 4 5 6 7 8 9 10))
3. Trace: (PRODUCT '(6 4 5 6 7 8 9 10))
4. Trace: (PRODUCT '(24 5 6 7 8 9 10))
5. Trace: (PRODUCT '(120 6 7 8 9 10))
6. Trace: (PRODUCT '(720 7 8 9 10))
7. Trace: (PRODUCT '(5040 8 9 10))
8. Trace: (PRODUCT '(40320 9 10))
9. Trace: (PRODUCT '(362880 10))
10. Trace: (PRODUCT '(3628800))
10. Trace: PRODUCT ==> 3628800
9. Trace: PRODUCT ==> 3628800
8. Trace: PRODUCT ==> 3628800
7. Trace: PRODUCT ==> 3628800
6. Trace: PRODUCT ==> 3628800
5. Trace: PRODUCT ==> 3628800
4. Trace: PRODUCT ==> 3628800
3. Trace: PRODUCT ==> 3628800
2. Trace: PRODUCT ==> 3628800
1. Trace: PRODUCT ==> 3628800
3628800
[11]>