Subversion Repositories lagranto.20cr

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
4 michaesp 1
#!/bin/csh
2
 
3
# Set Lagranto 
4
set LAGRANTO = ${LAGRANTOBASE}.${MODEL}/
5
 
6
# Write usage information
7
if ( ${#argv} == 0) then
8
  echo 
9
  ${LAGRANTO}/bin/lagrantohelp reformat short
10
  echo  
11
  exit 0
12
endif
13
 
14
set inpfile=$1
15
set outfile=$2
16
 
17
set prog1=${LAGRANTO}/goodies/reformat
18
set prog2=${LAGRANTO}/goodies/trainfo.sh
19
 
20
set dim=`${prog2} ${inpfile} dim` 
21
 
22
\rm -f reformat.param
23
echo \"${inpfile}\"  >! reformat.param
24
echo \"${outfile}\"  >> reformat.param
25
echo ${dim}          >> reformat.param
26
 
27
${prog1}
28
 
29
\rm -f reformat.param
30
 
31
exit 0
32