4 lines
114 B
Forth
4 lines
114 B
Forth
|
|
: lerp ( o2 r2 r1 o1 s -- t ) fswap f- fswap f/ f* f+ ;
|
||
|
|
|
||
|
|
: test 11 0 do -1e 1e 10e 0e i s>f lerp f. loop ;
|