set vgfilesave_items {
GuidoMenuItem exp_vg_save {
-label "Experimental variogram"
-icon "icons/16/save_exp_vg.png"
-command script scripts/save_exp_vg.tcl
}
if {[GuidoSSIOption get "product"] != "STATISTICS" || [string match Minex* [GuidoSSIOption get "product_title"]]} {
GuidoMenuItem vg_model_save {
-label "Variogram model"
-icon "icons/16/save_vg_model.png"
-command script scripts/save_vg_model.tcl
}
GuidoSeparator sep1 {
}
GuidoMenuItem vg_model_save {
-icon "icons/16/save_vg_model.png"
-label "Experimental variogram and model"
-command script scripts/save_vg.tcl
}
} else {
GuidoMenuItem vg_model_save {
-label "Variogram model"
-icon "icons/16/save_vg_model.png"
-command server "send variogram model"
}
}
}
GuidoMenu vgfilesave {
-label "Save"
-delayed_script $vgfilesave_items
}
