14 lines
160 B
GLSL
14 lines
160 B
GLSL
$inc fvmstd.fp
|
|
|
|
proc main
|
|
92 @N
|
|
0 @a
|
|
1 @b
|
|
while &N 0 u> do
|
|
&a &b u+ @c
|
|
&b @a
|
|
&c @b
|
|
&N 1 u- @N
|
|
endwhile
|
|
&b :putuint :newline
|
|
endproc
|