/* Prints the first 25 numbers of the fibonacci sequence to standard output */ 0 1 1 while rot rot 1 + dup 26 != do rot dup rot rot dup rot print drop " " print swap dup rot + end