5 # This is the second script that tries to reproduce the source of the problem -
6 # impossibility to project a point on a torus with major radius == 0
10 if {[llength [lmatch $out ext_*]] != 4} {
11 puts "Error: projection failed"
13 puts "OK : projection passed"