;; Dribble of #<IO TERMINAL-STREAM> started 2005-01-10 13:56:02
#<OUTPUT BUFFERED FILE-STREAM CHARACTER
  #P"N:\\desktop\\ece478\\hw1\\hw1_out.txt">
[2]> (load "N:/desktop/ece478/hw1/hw1.lisp")
;; Loading file N:\desktop\ece478\hw1\hw1.lisp ...
;; Loaded file N:\desktop\ece478\hw1\hw1.lisp
T
[3]> (trace trans alertifminus copystruct)

WARNING:
TRACE: redefining function TRANS in top-level, was defined in N:\Desktop\ece478\hw1\hw1.lisp
WARNING:
TRACE: redefining function ALERTIFMINUS in top-level, was defined in N:\Desktop\ece478\hw1\hw1.lisp
WARNING:
TRACE: redefining function COPYSTRUCT in top-level, was defined in N:\Desktop\ece478\hw1\hw1.lisp
;; Tracing function TRANS.
;; Tracing function ALERTIFMINUS.
;; Tracing function COPYSTRUCT.
(TRANS ALERTIFMINUS COPYSTRUCT)
[4]> (trans)

1. Trace: (TRANS)
1. Trace: TRANS ==> (A B C 1 2 3)
(A B C 1 2 3)
[5]> (setq la '(a b c (d (e f) g) h i j))
(A B C (D (E F) G) H I J)
[6]> (copystruct la)

1. Trace: (COPYSTRUCT '(A B C (D (E F) G) H I J))
2. Trace: (COPYSTRUCT 'A)
2. Trace: COPYSTRUCT ==> A
2. Trace: (COPYSTRUCT '(B C (D (E F) G) H I J))
3. Trace: (COPYSTRUCT 'B)
3. Trace: COPYSTRUCT ==> B
3. Trace: (COPYSTRUCT '(C (D (E F) G) H I J))
4. Trace: (COPYSTRUCT 'C)
4. Trace: COPYSTRUCT ==> C
4. Trace: (COPYSTRUCT '((D (E F) G) H I J))
5. Trace: (COPYSTRUCT '(D (E F) G))
6. Trace: (COPYSTRUCT 'D)
6. Trace: COPYSTRUCT ==> D
6. Trace: (COPYSTRUCT '((E F) G))
7. Trace: (COPYSTRUCT '(E F))
8. Trace: (COPYSTRUCT 'E)
8. Trace: COPYSTRUCT ==> E
8. Trace: (COPYSTRUCT '(F))
9. Trace: (COPYSTRUCT 'F)
9. Trace: COPYSTRUCT ==> F
9. Trace: (COPYSTRUCT 'NIL)
9. Trace: COPYSTRUCT ==> NIL
8. Trace: COPYSTRUCT ==> (F)
7. Trace: COPYSTRUCT ==> (E F)
7. Trace: (COPYSTRUCT '(G))
8. Trace: (COPYSTRUCT 'G)
8. Trace: COPYSTRUCT ==> G
8. Trace: (COPYSTRUCT 'NIL)
8. Trace: COPYSTRUCT ==> NIL
7. Trace: COPYSTRUCT ==> (G)
6. Trace: COPYSTRUCT ==> ((E F) G)
5. Trace: COPYSTRUCT ==> (D (E F) G)
5. Trace: (COPYSTRUCT '(H I J))
6. Trace: (COPYSTRUCT 'H)
6. Trace: COPYSTRUCT ==> H
6. Trace: (COPYSTRUCT '(I J))
7. Trace: (COPYSTRUCT 'I)
7. Trace: COPYSTRUCT ==> I
7. Trace: (COPYSTRUCT '(J))
8. Trace: (COPYSTRUCT 'J)
8. Trace: COPYSTRUCT ==> J
8. Trace: (COPYSTRUCT 'NIL)
8. Trace: COPYSTRUCT ==> NIL
7. Trace: COPYSTRUCT ==> (J)
6. Trace: COPYSTRUCT ==> (I J)
5. Trace: COPYSTRUCT ==> (H I J)
4. Trace: COPYSTRUCT ==> ((D (E F) G) H I J)
3. Trace: COPYSTRUCT ==> (C (D (E F) G) H I J)
2. Trace: COPYSTRUCT ==> (B C (D (E F) G) H I J)
1. Trace: COPYSTRUCT ==> (A B C (D (E F) G) H I J)
(A B C (D (E F) G) H I J)
[7]> (setq a '(First 2nd Third Fourth))
(FIRST 2ND THIRD FOURTH)
[8]> (reverse a)
(FOURTH THIRD 2ND FIRST)
[9]> (setq nl (reverse a))
(FOURTH THIRD 2ND FIRST)
[10]> (nreverse a)
(FOURTH THIRD 2ND FIRST)
[11]> (nreverse nl)
(FIRST 2ND THIRD FOURTH)
[12]> (alertifminus a)

1. Trace: (ALERTIFMINUS '(FOURTH THIRD 2ND FIRST))
"The parameter you supplied is not a number" 
1. Trace: ALERTIFMINUS ==> "The parameter you supplied is not a number"
"The parameter you supplied is not a number"
[13]> (alertifminus -69)

1. Trace: (ALERTIFMINUS '-69)-69 is a negative number
1. Trace: ALERTIFMINUS ==> NIL
NIL
[14]> (alertifminus -63943)

1. Trace: (ALERTIFMINUS '-63943)-63943 is a negative number
1. Trace: ALERTIFMINUS ==> NIL
NIL
[15]> (alertifminus 63943)

1. Trace: (ALERTIFMINUS '63943)63943 is a positive number or zero
1. Trace: ALERTIFMINUS ==> NIL
NIL
[16]> (exit)
Bye.