Subversion Repositories lagranto.ecmwf

Rev

Details | Last modification | View Log | RSS feed

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