Subversion Repositories lagranto.arpege

#!/bin/csh

# Write usage information
if ( ${#argv} == 0) then
  echo 
  /home/binderh/prog/programs/lagranto.mf/bin/lagrantohelp tracal short
  echo  
  exit 0
endif

set inpfile = $1
set outfile = $2
set expr    = $3

set dim=`/home/binderh/prog/programs/lagranto.mf/goodies/trainfo.sh  ${inpfile} dim` 

\rm -f tracal.param
echo \"${inpfile}\"  >! tracal.param
echo \"${outfile}\"  >> tracal.param
echo \"${expr}\"     >> tracal.param
echo ${dim}          >> tracal.param

/home/binderh/prog/programs/lagranto.mf/goodies/tracal

\rm -f tracal.param

exit 0