diff options
| -rw-r--r-- | challenge-070/cheok-yin-fung/common-lisp/ch-2.lsp (renamed from ch-2.lsp) | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ch-2.lsp b/challenge-070/cheok-yin-fung/common-lisp/ch-2.lsp index 8cce700264..34828f265f 100644 --- a/ch-2.lsp +++ b/challenge-070/cheok-yin-fung/common-lisp/ch-2.lsp @@ -1,3 +1,5 @@ +;; Perl Weekly Challenge 070 Task 2 Gray Code Sequence + (setf n 4) (setf a '(0 1)) (setf m (- n 1)) @@ -10,6 +12,6 @@ (setf a (append a b)) ) -;;now the variable a stores the n-bit gray code sequence +;; now the variable a stores the n-bit gray code sequence a |