
set form {
  GuidoForm form_1 {
    -default_buttons
    -label "Basic Statistics - Log Probability Plot"
    GuidoPanel panel_1 {
    -layout BoxLayout Y_AXIS
      GuidoTextArea gainfocus {
      -visible true
      -default "This text area is here to remove focus and highlighting from the second GuidoTextArea
                This text area must have visible set to true in order to gain focus"
      -height 0
      -width 0
      }
      GuidoLabel space {
      -height 0.5
      }
      GuidoScrollPane scroll_1 {
      -label ""
      -height 5
      -width 50
        GuidoTextArea text_1 {
        -format none
        -linewrap true
        -wrap_style_word true
        -linewrap true
        -input true
        -font_highlight 0 0 0
        -default "
This macro usies the following Menu commands to apply a topcut.

1. File tools > String maths
"
        }
      }
      GuidoLabel space {
      -height 0.5
      }
    }
  }
}

SclCreateGuidoForm form_handle $form {
}

$form_handle SclRun {
}

set status [ SclFunction "STR MATHS" {
  frm00700={
    {
      _action=display
      file_loc="gc_zone1_"
      file_id="130"
      result_loc="gc_zone1_cut"
      main=table { str_range constraint field expr } {
        { "" "" "d1" "iif(d1>25,25,d1)" }
        { "" "" "" "" }
        { "" "" "" "" }
        { "" "" "" "" }
        { "" "" "" "" }
        { "" "" "" "" }
        { "" "" "" "" }
        { "" "" "" "" }
        { "" "" "" "" }
        { "" "" "" "" }
      }
    }
  }
}]

puts ""
puts ""
puts "macro 2d_03_cut_outliers.tcl completed"
puts ""
