exp.tcl near complete

Experiment tcl script is near complete. Needs finalized testing