#!/bin/csh |
set dirList = (‘getTabCol.tcl -in meta.tab -var DIR_NAME’) |
set origDir = ‘pwd’ |
@ i = 0 |
foreach d ($dirList) |
@ i++ |
cd $d |
echo $d |
ref2D.tcl -in test.ft2 \ |
-x1 −0.05ppm -xn −0.08ppm -y1 29.5ppm -yn 30.5ppm \ |
-xRef 0.0 -yRef 30.0 |
cd $oridDir |
end |