1 module Tests.FunctionValues
10 test_directions :: Assertion
12 assertTrue "all direction functions work" (and equalities)
14 fvs = make_values trilinear 1 1 1
15 equalities = [ interior fvs == 4,
34 front_left_down fvs == 1,
35 front_left_top fvs == 1,
36 front_right_down fvs == 1,
37 front_right_top fvs == 1,
38 back_left_down fvs == 3,
39 back_left_top fvs == 3,
40 back_right_down fvs == 7,
41 back_right_top fvs == 15]