GuidoPanel lag_panel1 {
-width 25
-layout FlowLayout LEFT 5 0
GuidoLabel lag_label_label {
-label "Lag "
}
GuidoButton decrease {
-icon "icons/left.gif"
-height 0.8
-tip "Decrease lag"
}
GuidoSlider lag_slider {
-width 10.0
-status_item "variogram lag"
-status_item "variogram lag minimum"
-status_item "variogram lag maximum"
-status_item "variogram lag increment"
-update_method "SetLag"
-minimum 0
-maximum 2
-increment 0.2
}
GuidoButton increase {
-icon "icons/right.gif"
-height 0.8
-tip "Increase lag"
}
GuidoLabel lag_label {
-width 5
-label "1.0"
-status_item "variogram lag"
}
}
$increase setActionCallback valueChanged {[$lag_slider addIncrement]}
$decrease setActionCallback valueChanged {[$lag_slider takeIncrement]}
