Subversion Repositories lagranto.arpege

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
3 michaesp 1 
#!/bin/csh
2 
 
3 
# Write usage information
4 
if ( ${#argv} == 0) then
5 
  echo
6 
  ${LAGRANTO}/bin/lagrantohelp footprint short
7 
  echo
8 
  exit 0
9 
endif
10 
 
11 
set inpfile = $1
12 
set outfile = $2
13 
set mode    = $3
14 
if ( "${mode}" == "proxy" ) then
15 
   set clon   = $4
16 
   set clat   = $5
17 
   set radius = $6
18 
endif
19 
 
20 
set dim=`${LAGRANTO}/goodies/trainfo.sh ${inpfile} dim`
21 
 
22 
\rm -f traj2num.param
23 
echo \"${inpfile}\"  >! footprint.param
24 
echo \"${outfile}\"  >> footprint.param
25 
echo ${dim}          >> footprint.param
26 
echo \"${mode}\"     >> footprint.param
27 
 
28 
if ( "${mode}" == "proxy" ) then
29 
  echo ${clon}      >> footprint.param
30 
  echo ${clat}      >> footprint.param
31 
  echo ${radius}    >> footprint.param
32 
endif
33 
 
34 
${LAGRANTO}/tools/footprint
35 
 
36 
\rm -f footprint.param
37 
 
38 
exit 0
39