/[MITgcm]/MITgcm_contrib/ESMF/mytools/mkmod.sh
ViewVC logotype

Diff of /MITgcm_contrib/ESMF/mytools/mkmod.sh

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.2 by cnh, Mon Feb 16 03:12:18 2004 UTC revision 1.8 by cnh, Sat Feb 21 02:20:35 2004 UTC
# Line 1  Line 1 
1  #!/usr/local/bin/tcsh -f  #!<TCSH_PATH> -fxv
2  #  #
3  #$Id$  #$Id$
4  #$Name$  #$Name$
# Line 12  Line 12 
12  # The set of module files includes all the source files except  # The set of module files includes all the source files except
13  # main.f and a small number of runtime library files.  # main.f and a small number of runtime library files.
14  # The module file set is then placed within a module of a given name.  # The module file set is then placed within a module of a given name.
15  #  # A single argument to the script is used to create a module prefix
16    # allowing the same source tree to be used for multiple modules with
17    # differing names and dirrent sized static data objects.
18  #  #
19  #  #
20  # Set module prefix  # Set module prefix
# Line 23  set mpref_s = ( atm ) Line 25  set mpref_s = ( atm )
25  endif  endif
26  set mpref_l = ( mitgcm_org_${mpref_s} )  set mpref_l = ( mitgcm_org_${mpref_s} )
27    
28  # Set output directory  # Set output directory - this is the directory where the compile and link
29    #                        objects that other builds (ESMF drivers etc..) use
30  set outdir = ( mmout )  set outdir = ( mmout )
31    
32    # Get the genmake generated Makefile to create the .f files
33  echo "Creating small f files"  echo "Creating small f files"
34  make small_f  make small_f
35    
# Line 52  echo " " Line 56  echo " "
56  echo "Removing comments and blank lines"  echo "Removing comments and blank lines"
57  cat ${mpref_l}_mod.Ftmp | grep -v '^ *$' | grep -v '^[a-zA-Z]' > ${mpref_l}_mod2.Ftmp  cat ${mpref_l}_mod.Ftmp | grep -v '^ *$' | grep -v '^[a-zA-Z]' > ${mpref_l}_mod2.Ftmp
58    
59  echo "Putting END SUBROUTINE at end of subroutines"  echo "Creating top lines for module source"
 cat ${mpref_l}_mod2.Ftmp | awk -f print_sub.awk  > ${mpref_l}_mod3.Ftmp  
60  cat <<EOF > ${mpref_l}_mod.Ftmp  cat <<EOF > ${mpref_l}_mod.Ftmp
61        MODULE ${mpref_l}        MODULE ${mpref_l}
62        USE ESMF_MOD        USE ESMF_MOD
# Line 63  cat <<EOF > ${mpref_l}_mod.Ftmp Line 66  cat <<EOF > ${mpref_l}_mod.Ftmp
66        PUBLIC GET_DOMAIN_SIZE        PUBLIC GET_DOMAIN_SIZE
67        CONTAINS        CONTAINS
68  EOF  EOF
69    
70    echo "Putting END SUBROUTINE at end of subroutines"
71    cat ${mpref_l}_mod2.Ftmp | awk -f print_sub.awk  > ${mpref_l}_mod3.Ftmp
72  cat ${mpref_l}_mod3.Ftmp >> ${mpref_l}_mod.Ftmp  cat ${mpref_l}_mod3.Ftmp >> ${mpref_l}_mod.Ftmp
73    
74  # Remove EXTERNAL refs for functions  # Remove EXTERNAL refs for functions (some compilers say it is an error
75    # to have EXTERNAL on these if they are in a module )
76  echo "Removing EXTERNAL refs for functions that are within the module"  echo "Removing EXTERNAL refs for functions that are within the module"
77  set extDel = ( DIFFERENT_MULTIPLE IFNBLNK ILNBLNK TIMER_INDEX \  set extDel = ( DIFFERENT_MULTIPLE IFNBLNK ILNBLNK TIMER_INDEX \
78                 IO_ERRCOUNT MDS_RECLEN PORT_RAND SBO_RHO NLATBND \                 IO_ERRCOUNT MDS_RECLEN PORT_RAND SBO_RHO NLATBND \
# Line 75  cat ${mpref_l}_mod.Ftmp | grep -iv " Line 82  cat ${mpref_l}_mod.Ftmp | grep -iv "
82  cp f1.Ftmp ${mpref_l}_mod.Ftmp  cp f1.Ftmp ${mpref_l}_mod.Ftmp
83  end  end
84    
85  # Remove type declaarations for functions  # Remove type declaarations for functions (some compilers say it is an error
86    # to have TYPE in a routine for these if they are in a module )
87  echo "Removing type declarations for functions that are within the module"  echo "Removing type declarations for functions that are within the module"
88  cat ${mpref_l}_mod.Ftmp | grep -iv '      *LOGICAL *DIFFERENT_MULTIPLE' > f1.Ftmp  cat ${mpref_l}_mod.Ftmp | grep -iv '      *LOGICAL *DIFFERENT_MULTIPLE' \
89        > f1.Ftmp
90  cp f1.Ftmp ${mpref_l}_mod.Ftmp  cp f1.Ftmp ${mpref_l}_mod.Ftmp
91  cat ${mpref_l}_mod.Ftmp | grep -iv '      *INTEGER *ILNBLNK' > f1.Ftmp  cat ${mpref_l}_mod.Ftmp | grep -iv '      *INTEGER *ILNBLNK' > f1.Ftmp
92  cp f1.Ftmp ${mpref_l}_mod.Ftmp  cp f1.Ftmp ${mpref_l}_mod.Ftmp
# Line 102  cp f1.Ftmp ${mpref_l}_mod.Ftmp Line 111  cp f1.Ftmp ${mpref_l}_mod.Ftmp
111  cat ${mpref_l}_mod.Ftmp | grep -iv '      *REAL\*8 *EXF_BULKRHN' > f1.Ftmp  cat ${mpref_l}_mod.Ftmp | grep -iv '      *REAL\*8 *EXF_BULKRHN' > f1.Ftmp
112  cp f1.Ftmp ${mpref_l}_mod.Ftmp  cp f1.Ftmp ${mpref_l}_mod.Ftmp
113    
114    #
115  echo "Putting END FUNCTION at end of functions"  echo "Putting END FUNCTION at end of functions"
116  cat ${mpref_l}_mod2.Ftmp | awk -f print_func.awk > ${mpref_l}_mod4.Ftmp  cat ${mpref_l}_mod2.Ftmp | awk -f print_func.awk > ${mpref_l}_mod4.Ftmp
117  cat ${mpref_l}_mod4.Ftmp >> ${mpref_l}_mod.Ftmp  cat ${mpref_l}_mod4.Ftmp >> ${mpref_l}_mod.Ftmp
118    
119    #
120    echo "Write the end of the module"
121    cat ${mpref_l}_mod2.Ftmp | awk -f print_func.awk > ${mpref_l}_mod4.Ftmp
122  cat <<EOF >> ${mpref_l}_mod.Ftmp  cat <<EOF >> ${mpref_l}_mod.Ftmp
123        END MODULE ${mpref_l}        END MODULE ${mpref_l}
124  EOF  EOF
125  # Change all the common block names in the module  
126  # cat ${mpref_l}_mod.Ftmp | sed s'z\( *COMMON *[^/]*/ *\)\([^ ]*\)\( */.*\)z\1COMPOCEAN_\2\3z' >f1.Ftmp  # Change all the common block names in the module to use the module prefix
127  cat ${mpref_l}_mod.Ftmp | sed s'z\( *COMMON[^/]*\)/\(.*\)/\([^/]*\)z      COMMON/C_'${mpref_s}'_\2/\3z' > f1.Ftmp  cat ${mpref_l}_mod.Ftmp | sed s'z\( *COMMON[^/]*\)/\(.*\)/\([^/]*\)z      COMMON/C_'${mpref_s}'_\2/\3z' > f1.Ftmp
128  cp f1.Ftmp ${mpref_l}_mod.Ftmp  cp f1.Ftmp ${mpref_l}_mod.Ftmp
129    
130  echo "Compiling code"  echo "Compiling code"
 set comp     = /s/local/1/cnh/usr/local/pkg/lammpi/lam-7.0.3/lahey/bin/mpif77  
 set compopts = ( --dbl -O0 --fix --lst --xref --wide -I/s/local/1/cnh/usr/local/src/ESMF_1_0_4_withlam/esmf/mod/modO/Linux.lahey.32.default )  
 set complibs = ( -L/s/local/1/cnh/usr/local/src/ESMF_1_0_4_withlam/esmf/lib/libO/Linux.lahey.32.default -lesmf )  
   
 set comp     = /usr/local/pkg/mpi/mpi-1.2.4..8a-gm-1.5/pgi/bin/mpif90  
 set compopts = ( -r8 -Mfixed -Mextend -byteswapio )  
 set complibs = ( )  
   
 set comp     = /usr/local/pkg/mpi/mpich-1.2.5..10/lahey/bin/mpif90  
 set compopts = ( --dbl --o2 --fix --lst --xref --wide --tp4 )  
 #set compopts = ( --dbl --o0 --fix --lst --xref --wide --sav )  
 set complibs = ( -L/usr/local/pkg/ESMF/ESMF_1_0_4/mpich-1.2.5..10/lahey/lib/libO/Linux.lahey.32.default -lesmf )  
 set compinc  = ( -I/usr/local/pkg/ESMF/ESMF_1_0_4/mpich-1.2.5..10/lahey/mod/modO/Linux.lahey.32.default )  
 set compinc  = ( ${compinc} -I${BUILDROOT}/esmf_top )  
   
 #set comp     = xlf95  
 #set compopts = ( -qfixed=132 -O3 -qarch=pwr4 -qtune=pwr4 -qcache=auto -qmaxmem=-1 -bmaxdata:0x80000000 -q64 )  
 #set compopts = ( --dbl --o0 --fix --lst --xref --wide --sav )  
 #set complibs = ( -L/fs/cgd/data0/erik/esmf/lib/libO/AIX.default.64.default -lesmf )  
 #set compinc  = ( -I/fs/cgd/data0/erik/esmf/mod/modO/AIX.default.64.default         )  
   
   
131  source ${BUILDROOT}/mytools/comp_profile.${COMP_PROF}  source ${BUILDROOT}/mytools/comp_profile.${COMP_PROF}
132    
133  set compinc  = ( ${compinc} -I${BUILDROOT}/esmf_top )  set compinc  = ( ${compinc} -I${BUILDROOT}/esmf_top )
# Line 151  foreach f ( $mitgcmrtl ) Line 142  foreach f ( $mitgcmrtl )
142   echo " " | $comp $compopts -c ${f}   echo " " | $comp $compopts -c ${f}
143   set mitgcmrtlo = ( $mitgcmrtlo ${f:r}.o )   set mitgcmrtlo = ( $mitgcmrtlo ${f:r}.o )
144  end  end
145  cc -q64 -c tim.c  ${cccommand} ${ccopts} tim.c
146  set mitgcmrtlo = ( $mitgcmrtlo tim.o )  set mitgcmrtlo = ( $mitgcmrtlo tim.o )
147  \rm mmout/libmitgcmrtl.a  \rm mmout/libmitgcmrtl.a
148  ar -X64 -s -rc mmout/libmitgcmrtl.a $mitgcmrtlo  ${arcommand} ${aropts} mmout/libmitgcmrtl.a $mitgcmrtlo
149  #ranlib mmout/libmitgcmrtl.a  #ranlib mmout/libmitgcmrtl.a
150    
151  # Create component library archive  # Create component library archive
# Line 164  mv foo.F ${mpref_l}_mod.F Line 155  mv foo.F ${mpref_l}_mod.F
155  echo " " | $comp $compopts -c ${mpref_l}_mod.F ${complibs} ${compinc}  echo " " | $comp $compopts -c ${mpref_l}_mod.F ${complibs} ${compinc}
156  mv ${mpref_l}_mod.F ${mpref_l}_mod.Ftmp  mv ${mpref_l}_mod.F ${mpref_l}_mod.Ftmp
157  ./template_comp.sh ${mpref_s}  ./template_comp.sh ${mpref_s}
158  cc -q64 -c component_${mpref_s}_context.c  ${cccommand} ${ccopts} component_${mpref_s}_context.c
159  \rm mmout/lib${mpref_l}.a  \rm mmout/lib${mpref_l}.a
160  ar -X64 -s -rc mmout/lib${mpref_l}.a ${mpref_l}_mod.o component_${mpref_s}_context.o  ${arcommand} ${aropts} mmout/lib${mpref_l}.a ${mpref_l}_mod.o component_${mpref_s}_context.o
161  #ranlib mmout/lib${mpref_l}.a  #ranlib mmout/lib${mpref_l}.a
162  cp ${mpref_l}.mod mmout  cp ${mpref_l}.mod mmout
   
163  \rm *mod  \rm *mod
 mv main.f main.F90  
 #echo $comp $compopts main.F90 ${mpref_l}_mod.o $mitgcmrtlo tim.o $complibs  
 #echo " " | $comp $compopts main.F90 ${mpref_l}_mod.o $mitgcmrtlo $complibs  
 #echo $comp $compopts main.F90 -Immout -Lmmout -l${mpref_l} -lmitgcmrtl $complibs  
 #echo " " | $comp $compopts main.F90 -Immout -Lmmout -l${mpref_l} -lmitgcmrtl $complibs  
 mv main.F90 main.f  
   
 # Lahey compiler command line  
 #  /usr/local/pkg/lammpi/lam-7.0.3/lahey/bin/mpif77  --dbl -O0 --fix --lst --xref --wide -I/s/local/1/cnh/usr/local/src/ESMF_1_0_4_withlam/esmf/mod/modO/Linux.lahey.32.default main.F90 ${mpref_l}_mod.o mdsio_byteswapr4.o mdsio_byteswapr8.o fool_the_compiler.o tim.o -L/home/cnh/src/ESMF_1_0_4_withlam/esmf/lib/libO/Linux.lahey.32.default -lesmf  
 # To run  
 #   /s/local/1/cnh/usr/local/pkg/lammpi/lam-7.0.3/lahey/bin/mpirun -np 4 -t -v  ../build/a.out  
 # To start lam daemon  
 #   /s/local/1/cnh/usr/local/pkg/lammpi/lam-7.0.3/lahey/bin/lamboot  -c /s/local/1/cnh/usr/local/pkg/lammpi/lam-7.0.3/lahey/etc/lam-conf.lamd -v -d  
 #  NB - for starting daemon you need "lamd" in your search path  
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22