freestation.tcl
::FreeStation { geo {atr 1} {edmMode 2} }
make measurement from a geo array
proc ::FreeStation { geo {atr 1} {edmMode 2} }
geo
atr