if { [info exists nb_v_good] } {
regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full nb_v
if { ${nb_v} != ${nb_v_good} } {
- puts "Error : Result shape is WRONG because it must contains ${nb_v_good} vertexes instead of ${nb_v}"
+ puts "Error : Result shape is WRONG because it must contains ${nb_v_good} vertices instead of ${nb_v}"
} else {
- puts "Result shape contains ${nb_v} vertexes"
+ puts "Result shape contains ${nb_v} vertices"
}
}
}
}
+if { [info exists nb_fe_good] && [info exists nb_fe] } {
+ if { ${nb_fe} != ${nb_fe_good} } {
+ puts "Error : Result shape is WRONG because it must contains ${nb_shape_good} shapes instead of ${nb_shape}"
+ } else {
+ puts "Result shape contains ${nb_fe} free edges"
+ }
+}
+
if { [isdraw result] } {
if { [info exists 2dviewer] } {
clear