$samplename=samplename
samplename=$samplename+'-raw'
kp_save 
shell('sleep(5)')
ft('nodc')
UoM_proc_2d_rt
shell('sleep(10)')
samplename=$samplename+'-proc'
kp_save 
UoM_unpureshift
shell('sleep(5)')



//kp_nextexp au('wait')
kp_shim





