#!/bin/csh

# run FIELD

if ( -e SHDFIL ) rm SHDFIL

rm -f MODFIL*

@   i = 1
while ( -e wedge$i.mod )
   ln -s wedge$i.mod           MODFIL$i  # MODe file (input)
   @   i = $i + 1
end

$krak/field.out < field.flp

mv SHDFIL               wedge.shd # SHaDe file
rm MODFIL*


