steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

inline trilerp so that perlin-noise is pretty much instantaneous

Joe Groff 2009-10-19 15:11:59 -05:00
parent e253ca673e
commit 16038161d9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/math/vectors/vectors.factor
View File

@ -163,7 +163,7 @@ PRIVATE>
: trilerp ( aaa baa aba bba aab bab abb bbb {t,u,v} -- a_tuv ) : trilerp ( aaa baa aba bba aab bab abb bbb {t,u,v} -- a_tuv )
[ first lerp ] [ second lerp ] [ third lerp ] tri-curry [ first lerp ] [ second lerp ] [ third lerp ] tri-curry
[ 2tetra@ ] [ 2bi@ ] [ call ] tri* ; [ 2tetra@ ] [ 2bi@ ] [ call ] tri* ; inline
: bilerp ( aa ba ab bb {t,u} -- a_tu ) : bilerp ( aa ba ab bb {t,u} -- a_tu )
[ first lerp ] [ second lerp ] bi-curry [ first lerp ] [ second lerp ] bi-curry