Microsoft Windows [Version 10.0.14393]
(c) 2016 Microsoft Corporation. All rights reserved.

C:\Users\Tara>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 "C:/Users/Tara/Downloads/lp.l")
;; Loading file C:\Users\Tara\Downloads\lp.l ...
;; Loaded file C:\Users\Tara\Downloads\lp.l
T
[2]> (random-permutation '(1 2 3 4 5 6 7 8 9 0))
(5 2 7 9 1 8 0 4 6 3)
[3]> (random-permutation '(one two three four five six seven eight nine))
(FOUR NINE EIGHT TWO ONE THREE SEVEN SIX FIVE)
[4]> (random-permutation '(darkest dark darkish medium lightish light lightest))
(DARKISH MEDIUM DARKEST DARK LIGHTISH LIGHTEST LIGHT)
[5]> (random-permutation '(purple blue green yellow orange red))
(ORANGE RED GREEN BLUE PURPLE YELLOW)
[6]> (random-permutation '(morning night evening dawn noon day sunset sunrise))
(DAWN DAY NOON SUNSET NIGHT MORNING EVENING SUNRISE)
[7]> (trace (random-permutation))
;; Tracing function RANDOM-PERMUTATION.
(RANDOM-PERMUTATION)
[8]> (random-permutation '(The mind commands the body and it obeys. The mind orders itself and meets resistance))
1. Trace: (RANDOM-PERMUTATION '(THE MIND COMMANDS THE BODY AND IT OBEYS. THE MIND ORDERS ITSELF AND MEETS RESISTANCE))
2. Trace: (RANDOM-PERMUTATION '(THE MIND COMMANDS THE BODY AND IT OBEYS. THE MIND ORDERS AND MEETS RESISTANCE))
3. Trace: (RANDOM-PERMUTATION '(THE MIND COMMANDS THE BODY AND OBEYS. THE MIND ORDERS AND MEETS RESISTANCE))
4. Trace: (RANDOM-PERMUTATION '(MIND COMMANDS THE BODY AND OBEYS. THE MIND ORDERS AND MEETS RESISTANCE))
5. Trace: (RANDOM-PERMUTATION '(MIND COMMANDS THE BODY OBEYS. THE MIND ORDERS AND MEETS RESISTANCE))
6. Trace: (RANDOM-PERMUTATION '(MIND THE BODY OBEYS. THE MIND ORDERS AND MEETS RESISTANCE))
7. Trace: (RANDOM-PERMUTATION '(MIND THE BODY THE MIND ORDERS AND MEETS RESISTANCE))
8. Trace: (RANDOM-PERMUTATION '(THE BODY THE MIND ORDERS AND MEETS RESISTANCE))
9. Trace: (RANDOM-PERMUTATION '(THE BODY THE MIND ORDERS AND MEETS))
10. Trace: (RANDOM-PERMUTATION '(THE THE MIND ORDERS AND MEETS))
11. Trace: (RANDOM-PERMUTATION '(THE MIND ORDERS AND MEETS))
12. Trace: (RANDOM-PERMUTATION '(THE MIND ORDERS MEETS))
13. Trace: (RANDOM-PERMUTATION '(THE MIND ORDERS))
14. Trace: (RANDOM-PERMUTATION '(THE ORDERS))
15. Trace: (RANDOM-PERMUTATION '(ORDERS))
16. Trace: (RANDOM-PERMUTATION 'NIL)
16. Trace: RANDOM-PERMUTATION ==> NIL
15. Trace: RANDOM-PERMUTATION ==> (ORDERS)
14. Trace: RANDOM-PERMUTATION ==> (THE ORDERS)
13. Trace: RANDOM-PERMUTATION ==> (MIND THE ORDERS)
12. Trace: RANDOM-PERMUTATION ==> (MEETS MIND THE ORDERS)
11. Trace: RANDOM-PERMUTATION ==> (AND MEETS MIND THE ORDERS)
10. Trace: RANDOM-PERMUTATION ==> (THE AND MEETS MIND THE ORDERS)
9. Trace: RANDOM-PERMUTATION ==> (BODY THE AND MEETS MIND THE ORDERS)
8. Trace: RANDOM-PERMUTATION ==> (RESISTANCE BODY THE AND MEETS MIND THE ORDERS)
7. Trace: RANDOM-PERMUTATION ==> (MIND RESISTANCE BODY THE AND MEETS MIND THE ORDERS)
6. Trace: RANDOM-PERMUTATION ==> (OBEYS. MIND RESISTANCE BODY THE AND MEETS MIND THE ORDERS)
5. Trace: RANDOM-PERMUTATION ==> (COMMANDS OBEYS. MIND RESISTANCE BODY THE AND MEETS MIND THE ORDERS)
4. Trace: RANDOM-PERMUTATION ==> (AND COMMANDS OBEYS. MIND RESISTANCE BODY THE AND MEETS MIND THE ORDERS)
3. Trace: RANDOM-PERMUTATION ==> (THE AND COMMANDS OBEYS. MIND RESISTANCE BODY THE AND MEETS MIND THE ORDERS)
2. Trace: RANDOM-PERMUTATION ==> (IT THE AND COMMANDS OBEYS. MIND RESISTANCE BODY THE AND MEETS MIND THE ORDERS)
1. Trace: RANDOM-PERMUTATION ==> (ITSELF IT THE AND COMMANDS OBEYS. MIND RESISTANCE BODY THE AND MEETS MIND THE ORDERS)
(ITSELF IT THE AND COMMANDS OBEYS. MIND RESISTANCE BODY THE AND MEETS MIND THE ORDERS)
[9]> (untrace)
(RANDOM-PERMUTATION)
[10]> (bye)
Bye.

C:\Users\Tara>