test file for ook
[polyglot.git] / fibonacci.txt
blob2f5ba0e1edddeb9cf9ab204995cfb0c08065888f
1                                                                         (*foo /*bar#[^
2 *1337#) 2>/dev/null;i=0; a=1; b=1;echo $a;while test $i -lt 9;do c=$((a+b));a=$b;b=$c;echo $a;i=$((i+1));done;exit
3 *0) if 0; sub C () {} # */ );
5                                                                         #include <stdio.h>
6                                                                         #include <stdlib.h>
7                                                                         #define C
8                                                                         #define $ /*
9 C ; "*/
10 C ; main () { /*"; { # */
11 C ;     int $ i;
12 C ;     int $ n1;
13 C ;     int $ n2;
14 C ;     int $ n3;
15 C ;     $ i = 0;
16 C ;     $ n1 = 1;
17 C ;     $ n2 = 1;
18 C ;     printf( "%d\n", $ n1 );
19 C ;     while ( $ i < 9 ) {
20 C ;         $ n3 = $ n1 + $ n2;
21 C ;         $ n1 = $ n2;
22 C ;         $ n2 = $ n3;
23 C ;         printf( "%d\n", $ n1 );
24 C ;         $ i++;
25 C ;     }
26 C ; }
28                                                                         #define foo /*
29 C ; __END__
30 *) program foo;                                                         (*
31 *) var i, n1, n2, n3 : integer;                                         (*
32 *) begin i := 0; n1 := 1; n2 := 1; writeln(n1); while i < 9 do begin    (*
33 *) n3 := n1 + n2; n1 := n2; n2 := n3; writeln(n1); i := i + 1; end; end.(*
35       integer i, n1, n2, n3
36       n1 = 1
37       n2 = 1
38       print '(I0)', n1
39       do 10 i = 1, 9
40           n3 = n1 + n2
41           n1 = n2
42           n2 = n3
43           print '(I0)', n1
44  10   continue
45       end
46 * ]++++++++++>[-]++++++++++>+>+<<[->[>>+>+>+<<<<-]>[<+>>>>+<<<-]>>>[<<<+>>>-]<>++
47 * +++++++<[>>>+<<[>+>[-]<<-]>[<+>-]>[<<++++++++++>>>+<-]<<-<-]>>>>[<<<<+>>>>-]<<
48 * <<>[-]<[++++++++++++++++++++++++++++++++++++++++++++++++.---------------------
49 * ---------------------------[<---------->-]]<++++++++++++++++++++++++++++++++++
50 * ++++++++++++++.------------------------------------------------<<<<.>>>>[-]<<<][
51 *n        1:86*+,a,86*+,a,11884pv                                                    >
52 *$        +,>a,94g\84g1-:84p!#@_>:94p+:a`#v_:'0 ::
53 *           ^ ,+*68-*+55/+55::,+*+338/+55:<
55                                                                         #define fubar ]*)