1 #!/bin/csh -f

     2 goto cont

     3 oconv -i summercabin.oct -f ext1.rad > ext1sum.oct

     4 rad -v 'cor -vf vf/corner' -w insummer.rif PIC=ext1sum OCT=ext1sum.oct EXP=-1

     5 rm ext1sum.oct

     6 oconv -i summercabin.oct -f ext2.rad > ext2sum.oct

     7 rad -v 'cor -vf vf/corner' -w insummer.rif PIC=ext2sum OCT=ext2sum.oct EXP=-1

     8 rm ext2sum.oct

     9 cont:

    10 oconv -f summer0_env.rad ext1.rad > ext1env.oct

    11 rad -v 'cor -vf vf/corner' -w insummer.rif QUA=Hi PIC=ext1env \

    12 	RAW=ext1raw ZF=ext1raw OCT=ext1env.oct EXP=-1 'render=-ab 1'

    13 rm ext1env.oct

    14 oconv -f summer0_env.rad ext2.rad > ext2env.oct

    15 rad -v 'cor -vf vf/corner' -w insummer.rif QUA=Hi PIC=ext2env \

    16 	RAW=ext2raw ZF=ext2raw OCT=ext2env.oct EXP=-1 'render=-ab 1'

    17 rm ext2env.oct