system "~observer/.clic_secure "'project'
!
! save efficiencies
!
def real xx[5,2]
def integer k
let xx 0
for i 1 to nant
   let k phys_ant[i]
   let xx[k,1] JYPK[i,1]
   let xx[k,2] JYPK[i,2]
next
!
$ echo "/!!!/ i\\" > eff.sed
sic out 111.sed
say 'date_observed' frghz[1] frghz[2] -
 XX[1,1] XX[2,1] XX[3,1] XX[4,1] XX[5,1] -
 XX[1,2] XX[2,2] XX[3,2] XX[4,2] XX[5,2] -
  'project' -
  /format a11 f7.1 f7.1 f6.1 f6.1 f6.1 f6.1 f6.1 f6.1 f6.1 f6.1 f6.1 f6.1 a6
sic out
$ cat 111.sed >> eff.sed
$ sed -f eff.sed /users1/oper/operator/efficiencies.dat > eff.tmp
$ mv -f  eff.tmp /users1/oper/operator/efficiencies.dat