mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-07 18:30:55 +03:00
58 lines
2.0 KiB
Plaintext
58 lines
2.0 KiB
Plaintext
set value [XGetDimensionValue D 0:1:4:1]
|
|
set type [XGetDimensionType D 0:1:4:1]
|
|
set qualif [XGetDimensionQualifier D 0:1:4:1]
|
|
set range [XGetDimensionRange D 0:1:4:1]
|
|
set classtol [XGetDimensionClassOfTol D 0:1:4:1]
|
|
set d [XGetDimensionNbOfDecimalPlaces D 0:1:4:1]
|
|
set dir [XGetDimensionDir D 0:1:4:1]
|
|
set pnts [XGetDimensionPoints D 0:1:4:1]
|
|
set mod [XGetDimensionModifiers D 0:1:4:1]
|
|
set plusminus [XGetDimensionPlusMinusTol D 0:1:4:1]
|
|
set dump [XDumpDGTs D all]
|
|
|
|
if { $c_value != 0 && $value != $c_value} {
|
|
puts "Error wrong value"
|
|
} else {
|
|
if { $c_type != 0 && [string compare $type $c_type] != 0} {
|
|
puts "Error wrong type"
|
|
} else {
|
|
if { $c_qalif != 0 && [string compare $qualif $c_qalif] != 0} {
|
|
puts "Error wrong qualifier"
|
|
} else {
|
|
if { $c_classtol != 0 && $classtol != $c_classtol} {
|
|
puts "Error wrong class of tolerance"
|
|
} else {
|
|
if { $c_d != 0 && $d != $c_d} {
|
|
puts "Error wrong nbdigit"
|
|
} else {
|
|
if { $c_modif != 0 && [string compare $modif $c_modif] != 0} {
|
|
puts "Error wrong modifiers"
|
|
} else {
|
|
if { $c_dir != 0 && [string compare $dir $c_dir] != 0} {
|
|
puts "Error wrong direction"
|
|
} else {
|
|
if { $c_pnts != 0 && [string compare $pnts $c_pnts] != 0} {
|
|
puts "Error wrong points"
|
|
} else {
|
|
if { $c_range != 0 && [string compare $range $c_range] != 0} {
|
|
puts "Error wrong range"
|
|
} else {
|
|
if { $c_mod != 0 && [string compare $mod $c_mod] != 0} {
|
|
puts "Error wrong modifiers"
|
|
} else {
|
|
if { $c_plusminus != 0 && [string compare $plusminus $c_plusminus] != 0} {
|
|
puts "Error wrong modifiers"
|
|
} else {
|
|
puts "TEST COMPLETED"
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|