tests/bugs/modalg_5/bug23891_4

   1 puts "========================"
   2 puts "OCC23891"
   3 puts "========================"
   4 puts ""
   5 #################################################
   6 # Function fsameparameter throws an exception
   7 #################################################
   8
   9 restore [locate_data_file bug23891_fsp9] result
  10 fit
  11 if [catch {fsameparameter result} catch_result] {
  12     puts "Faulty : function fsameparameter throws an exception"
  13 } else {
  14     puts "OK : function fsameparameter works properly"
  15 }
  16
  17 set 2dviewer 0