
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 15
      -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 create a log probability plot.

1. Geostatistics > Basic Statistics

In the Basic Statistics Window:

2.  File > Load data from string files
3.  Statistics > Transformations
4.  Display > Probability Curve
5.  File > Save as > Image file
"
        }
      }
      GuidoLabel space {
      -height 0.5
      }
    }
  }
}

SclCreateGuidoForm form_handle $form {
}

$form_handle SclRun {
}

set status [ SclFunction "BASIC STATISTICS" {} ]

set status [ SclFunction "STATS RELOAD" {
  frm20400={
    {
      _action=display
      location="gc"
      id="130"
      str=""
      dfields={
        {
          dfield="D1"
          label="Gold"
          min=""
          max=""
        }
      }
      min0=""
      min1=""
      min2=""
      max0=""
      max1=""
      max2=""
      binNum_or_Width="WIDTH"
      bin_width="0.1"
      includeCoords="N"
      negative="NEGATIVES"
    }
  }
}]

set status [ SclFunction "STATS TRANSFORM" {
  frm20420={
    {
      _action=display
      trans="Log10 (scale)"
    }
  }
}]

set status [ SclFunction "STATS INVERSE CDF" {} ]

set status [ SclFunction "GIF DUMP STATISTICS" {
  frmstatsImageDump={
    {
      _action=display
      filename="log_probability.png"
      yres="500"
      xres="500"
      outputMultiple="Current Chart"
    }
  }
}]

set status [ SclFunction "STATS EXIT" {} ]

set status [ SclFunction "IMAGE VIEW" {
  frm00807={
    {
      image_file="log_probability.png"
    }
  }
}]

puts ""
puts ""
puts " macro 2d_02b_basic_statistucs_logprobability.tcl completed"
puts ""

