Subversion Repositories lagranto.um

Rev

Rev 3 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3 michaesp 1
#!/bin/csh
2
 
3
# -----------------------------------------------------------------------------
4
# Set some parameters
5
# -----------------------------------------------------------------------------
6
 
15 michaesp 7
# Set Lagranto 
8
set LAGRANTO = ${LAGRANTOBASE}.${MODEL}/
9
 
3 michaesp 10
# Write usage information
11
if ( ${#argv} == 0) then
12
  echo 
13
  echo "--------------------------------------------------------------"
14
  echo "Usage: mergetra.sh inpfile1 inpfile1 outfile         "
15
  echo 
16
  echo "         inpfile1          : 1st Input trajectory file"
17
  echo "         inpfile2          : 2nd Input trajectory file"
18
  echo "         outfile           : Output trajectory file"
19
  echo "--------------------------------------------------------------"
20
  exit 0
21
endif
22
 
23
# Set input file
24
set inpfile1 = $1
25
set inpfile2 = $2
26
set outfile  = $3
27
 
28
# Set Fortran program
29
set prog=${LAGRANTO}/goodies/mergetra
30
 
31
# -----------------------------------------------------------------------------
32
# Run program 
33
# -----------------------------------------------------------------------------
34
 
35
set dims1=`${LAGRANTO}/goodies/trainfo.sh ${inpfile1} dim` 
36
set dims2=`${LAGRANTO}/goodies/trainfo.sh ${inpfile2} dim` 
37
 
38
\rm -f mergetra.param
39
echo \"${inpfile1}\" >! mergetra.param 
40
echo \"${inpfile2}\" >> mergetra.param
41
echo \"${outfile}\"  >> mergetra.param
42
echo ${dims1}        >> mergetra.param
43
echo ${dims2}        >> mergetra.param
44
 
45
${prog}
46
 
47
exit 0
48