14 lines
282 B
Bash
14 lines
282 B
Bash
#!/usr/bin/env bash
|
|
#{
|
|
# Thanks to http://rosettacode.org/wiki/Multiline_shebang#PicoLisp
|
|
exec pil $0 $1
|
|
# }#
|
|
|
|
|
|
|
|
(de fib (n) (cond ((= 0 n) 1)
|
|
((= 1 n) 1)
|
|
(T (+ (fib (- n 1)) (fib (- n 2))))))
|
|
|
|
(bye (println (fib (car (str (opt))))))
|