to fib :n
test memberp :n [1 2]
iftrue [output 1]
iffalse [output sum fib diff :n 1 fib diff :n 2]
end