######################################################################
#
# Macro Name    : c:/gemcom/surpac/surpacv6.1/tutorials/block_modelling/data_work/reblocking.tcl
#
# Version       : Surpac 6.1 Beta 6
#
# Creation Date : Tue Aug 26 14:17:09 2008
#
# Description   : 
#
######################################################################

set status [ SclFunction "RECALL ANY FILE" {
  file="training.mdl"
  mode="openInNewLayer"
}]


set status [ SclFunction "CHECK BM CONNECTED" {
  functionName="BM REBLOCK"
}]

set status [ SclFunction "BM REBLOCK" {    
  modelName="training_reblocked.mdl"
  modelDesc="Training exercise"
  reblockType="Standard Reblocking"
  userBlock="20, 20, 10"
  minBlock="10, 10, 5"
  sgAtt="sg"
  att={
    "anisotropic_distance"
    "average_distance"
    "gold"
    "kriging_variance"
    "number_samples"
    "partial_p"
    "sg"
  }
  attAction={
    "Mean - negative values as 0"
    "Mean - negative values as 0"
    "Mean - negative values as 0"
    "Mean - negative values as 0"
    "Mode"
    "Mean - negative values as 0"
    "Mean - negative values as 0"
  }
  attSGAlternative={
    ""
    ""
    ""
    ""
    ""
    ""
    ""
  }
  numAtts="7"
  frm00121={
    {
      _action="display"
    }
  }
}]

puts "The form for function BM REBLOCK cannot be displayed when playing back a macro. However the reblock function has run successfully."

set status [ SclFunction "BM MODEL SUMMARY" {
  frm20049={
    {
      _action="display"
      save_summary="N"
    }
  }
}]

puts ""
puts ""
puts "macro _09_model_reblocking.tcl completed"
puts ""


