Subversion Repositories lagranto.arpege

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