0023476: Integration of test grid "cge" into the new testing system
[occt.git] / tests / geometry / law / A3
1 law law1 5 4 0.0e0 6 1.0e0 1 2.0e0 1 3.0e0 6  0  0 0.1 0.2  0.7  0.3  1  1
2 set delta 0.01
3 2dcvalue law1 1.5 x y dx dy
4 set value [dval y]
5 repeat 50 { 
6         movelaw law1 1.5 $value dy  0  
7         set value [expr $value + $delta] 
8         repaint }
9 copy law1 result
10 set length 3.3374712943009293
11