factor/extra/noise/noise-tests.factor

4 lines
123 B
Factor

USING: noise tools.test sequences math ;
{ t } [ { 100 100 } perlin-noise-map-coords [ [ 100 <= ] all? ] all? ] unit-test