src/tests/complex.test

   1 // a place to put some complex, composed programs
   2
   3 //test: $(PROTO) -n 100 -grid -dim 50 50 -r 6 -D -dump-after 20 -NDall -Dvalue -stop-after 50.5 "(red (gradient (= (coord) (tup 20 -25))))"
   4 test: $(PROTO) -n 100 -grid -dim 50 50 -r 6 -headless -D -dump-after 100 -NDall -Dvalue -stop-after 100.5 "(red (gradient (and (= (1st (coord)) 20) (= (2nd (coord)) -25))))"
   5 = 10 3 90
   6 = 91 3 0
   7 = 1 3 45
   8 = 100 3 45
   9
  10 test: $(PROTO) -path "$(DEMOS)" -n 500 -r 15 -sv -l -m -s 0.5 -w "(let ((g (gradient (once (in-circle (tup 25 25 0) 10))))) (mov (if (once (in-circle (tup -25 -25 0) 10)) (flock (vmul 0.1 (nav-grad g))) (vmul 0.1 (disperse)))))" -headless -D -dump-after 300 -NDall -Dvalue -stop-after 300.5
  11 // no actual test: just seeing if it runs that long
  12 = 1 0 0
  13
  14 test: $(PROTO) -path "$(DEMOS)" -n 500 -r 15 -sv -l -m -w -s 0.5 "(track-demo)" -headless -D -dump-after 100 -NDall -Dvalue -stop-after 100.5
  15 // no actual test: just seeing if it runs that long
  16 = 1 0 0