73 |
fi |
fi |
74 |
} |
} |
75 |
|
|
76 |
|
# Check for broken environments (eg. cygwin, MacOSX w/HFS+) that |
77 |
|
# cannot distinguish [*.F/*.F90] from [*.f/*.f90] files. |
78 |
|
check_for_broken_Ff() { |
79 |
|
# First check the ability to create a *.F/.f pair. |
80 |
|
cat <<EOF >> ./hello.F |
81 |
|
program hello |
82 |
|
write(*,*) 'hi' |
83 |
|
stop |
84 |
|
end |
85 |
|
EOF |
86 |
|
cp ./hello.F ./hello.f |
87 |
|
RETVAL=$? |
88 |
|
if test "x$RETVAL" != x0 ; then |
89 |
|
FEXT='fp' |
90 |
|
F90EXT='fp90' |
91 |
|
return |
92 |
|
fi |
93 |
|
rm -f ./hello.f |
94 |
|
|
95 |
|
# Then check the ability of ${MAKE} to use the two. |
96 |
|
test -e Makefile && mv -f Makefile Makefile.bak |
97 |
|
cat <<EOF >> Makefile |
98 |
|
.SUFFIXES: |
99 |
|
hello.f: hello.F |
100 |
|
cp -f hello.F hello.f |
101 |
|
EOF |
102 |
|
( $MAKE hello.f ) > /dev/null 2>&1 |
103 |
|
RETVAL=$? |
104 |
|
if test "x$RETVAL" != x0 -o ! -f ./hello.f ; then |
105 |
|
FEXT='fp' |
106 |
|
F90EXT='fp90' |
107 |
|
return |
108 |
|
fi |
109 |
|
rm -f ./hello.f ./hello.F Makefile |
110 |
|
test -e Makefile && mv -f Makefile.bak Makefile |
111 |
|
|
112 |
|
# Both tests passed, so use the default. |
113 |
|
FEXT='F' |
114 |
|
F90EXT='F90' |
115 |
|
} |
116 |
|
|
117 |
|
|
118 |
# Guess possible config options for this host |
# Guess possible config options for this host |
119 |
find_possible_configs() { |
find_possible_configs() { |
120 |
|
|
539 |
|
|
540 |
|
|
541 |
check_netcdf_libs() { |
check_netcdf_libs() { |
542 |
cat <<EOF > genmake_tnc.F |
cat <<EOF > genmake_tnc.for |
543 |
program fgennc |
program fgennc |
544 |
#include "netcdf.inc" |
#include "netcdf.inc" |
545 |
integer iret, ncid, xid |
integer iret, ncid, xid |
551 |
IF (iret .NE. NF_NOERR) write(*,*) NF_STRERROR(iret) |
IF (iret .NE. NF_NOERR) write(*,*) NF_STRERROR(iret) |
552 |
end |
end |
553 |
EOF |
EOF |
554 |
$CPP genmake_tnc.F > genmake_tnc.f \ |
$CPP genmake_tnc.for > genmake_tnc.f \ |
555 |
&& $FC $FFLAGS $FOPTIM -o genmake_tnc genmake_tnc.f $LIBS >> genmake_tnc.log 2>&1 |
&& $FC $FFLAGS $FOPTIM -o genmake_tnc genmake_tnc.f $LIBS >> genmake_tnc.log 2>&1 |
556 |
RET_COMPILE=$? |
RET_COMPILE=$? |
557 |
test -x ./genmake_tnc && ./genmake_tnc >> genmake_tnc.log 2>&1 |
test -x ./genmake_tnc && ./genmake_tnc >> genmake_tnc.log 2>&1 |
560 |
HAVE_NETCDF=t |
HAVE_NETCDF=t |
561 |
else |
else |
562 |
# try again with "-lnetcdf" added to the libs |
# try again with "-lnetcdf" added to the libs |
563 |
$CPP genmake_tnc.F > genmake_tnc.f \ |
$CPP genmake_tnc.for > genmake_tnc.f \ |
564 |
&& $FC $FFLAGS $FOPTIM -o genmake_tnc genmake_tnc.f \ |
&& $FC $FFLAGS $FOPTIM -o genmake_tnc genmake_tnc.f \ |
565 |
$LIBS -lnetcdf >> genmake_tnc_2.log 2>&1 |
$LIBS -lnetcdf >> genmake_tnc_2.log 2>&1 |
566 |
RET_COMPILE=$? |
RET_COMPILE=$? |
646 |
if test "x$MITGCM_IEEE" != x ; then |
if test "x$MITGCM_IEEE" != x ; then |
647 |
IEEE=$MITGCM_IEEE |
IEEE=$MITGCM_IEEE |
648 |
fi |
fi |
649 |
|
FEXT= |
650 |
|
F90EXT= |
651 |
|
|
652 |
AUTODIFF_PKG_USED=f |
AUTODIFF_PKG_USED=f |
653 |
AD_OPTFILE= |
AD_OPTFILE= |
934 |
fi |
fi |
935 |
fi |
fi |
936 |
|
|
937 |
|
# Check for broken systems that cannot correctly distinguish *.F and *.f files |
938 |
|
if test "x$FEXT" = x -a "x$F90EXT" = x ; then |
939 |
|
check_for_broken_Ff |
940 |
|
fi |
941 |
|
|
942 |
echo " getting AD_OPTFILE information: " |
echo " getting AD_OPTFILE information: " |
943 |
if test "x${AD_OPTFILE}" = x ; then |
if test "x${AD_OPTFILE}" = x ; then |
944 |
if test "x$MITGCM_AD_OF" = x ; then |
if test "x$MITGCM_AD_OF" = x ; then |
1697 |
cat f90srclist.inc >> $MAKEFILE |
cat f90srclist.inc >> $MAKEFILE |
1698 |
cat hlist.inc >> $MAKEFILE |
cat hlist.inc >> $MAKEFILE |
1699 |
cat ad_flow_files.inc >> $MAKEFILE |
cat ad_flow_files.inc >> $MAKEFILE |
1700 |
echo >> $MAKEFILE |
echo >> $MAKEFILE |
1701 |
echo 'F77FILES = $(SRCFILES:.F=.f)' >> $MAKEFILE |
echo 'F77FILES = $(SRCFILES:.'$FEXT'=.f)' >> $MAKEFILE |
1702 |
echo 'F90FILES = $(F90SRCFILES:.F90=.f90)' >> $MAKEFILE |
echo 'F90FILES = $(F90SRCFILES:.'$F90EXT'=.f90)' >> $MAKEFILE |
1703 |
echo 'OBJFILES = $(SRCFILES:.F=.o) $(CSRCFILES:.c=.o) $(F90SRCFILES:.F90=.o)' >> $MAKEFILE |
echo 'OBJFILES = $(SRCFILES:.'$FEXT'=.o) $(CSRCFILES:.c=.o) $(F90SRCFILES:.'$F90EXT'=.o)' >> $MAKEFILE |
1704 |
|
echo >> $MAKEFILE |
1705 |
|
echo '.SUFFIXES:' >> $MAKEFILE |
1706 |
|
echo '.SUFFIXES: .o .f .p .'$FEXT' .c .'$F90EXT' .f90' >> $MAKEFILE |
1707 |
|
|
1708 |
rm -f srclist.inc csrclist.inc hlist.inc flist.tmp clist.tmp f90srclist.inc |
rm -f srclist.inc csrclist.inc hlist.inc flist.tmp clist.tmp f90srclist.inc |
1709 |
rm -f ad_flow_files.inc |
rm -f ad_flow_files.inc |
1710 |
|
|
1711 |
cat >>$MAKEFILE <<EOF |
cat >>$MAKEFILE <<EOF |
1712 |
|
|
|
.SUFFIXES: |
|
|
.SUFFIXES: .o .f .p .F .c .F90 .f90 |
|
|
|
|
1713 |
all: \$(EXECUTABLE) |
all: \$(EXECUTABLE) |
1714 |
\$(EXECUTABLE): \$(SPECIAL_FILES) \$(SRCFILES) \$(CSRCFILES) \$(HEADERFILES) \$(F90SRCFILES) \$(OBJFILES) |
\$(EXECUTABLE): \$(SPECIAL_FILES) \$(SRCFILES) \$(CSRCFILES) \$(HEADERFILES) \$(F90SRCFILES) \$(OBJFILES) |
1715 |
@echo Creating \$@ ... |
@echo Creating \$@ ... |
1759 |
@echo Creating \$@ ... |
@echo Creating \$@ ... |
1760 |
echo "$FC_NAMEMANGLE" > \$@ |
echo "$FC_NAMEMANGLE" > \$@ |
1761 |
|
|
1762 |
# The normal chain of rules is ( .F - .f - .o ) |
# The normal chain of rules is ( .$FEXT - .f - .o ) |
1763 |
.F.f: |
.$FEXT.f: |
1764 |
\$(CPP) \$(DEFINES) \$(INCLUDES) > \$@ |
\$(CPP) \$(DEFINES) \$(INCLUDES) > \$@ |
1765 |
.f.o: |
.f.o: |
1766 |
\$(FC) \$(FFLAGS) \$(FOPTIM) -c \$< |
\$(FC) \$(FFLAGS) \$(FOPTIM) -c \$< |
1767 |
.F90.f90: |
.$F90EXT.f90: |
1768 |
\$(CPP) \$(DEFINES) \$(INCLUDES) > \$@ |
\$(CPP) \$(DEFINES) \$(INCLUDES) > \$@ |
1769 |
.f90.o: |
.f90.o: |
1770 |
\$(F90C) \$(F90FLAGS) \$(F90OPTIM) -c \$< |
\$(F90C) \$(F90FLAGS) \$(F90OPTIM) -c \$< |
1771 |
.c.o: |
.c.o: |
1772 |
\$(CC) \$(CFLAGS) -c \$< |
\$(CC) \$(CFLAGS) -c \$< |
1773 |
|
|
1774 |
# Special exceptions that use the ( .F - .p - .f - .o ) rule-chain |
# Special exceptions that use the ( .$FEXT - .p - .f - .o ) rule-chain |
1775 |
.F.p: |
.$FEXT.p: |
1776 |
\$(CPP) \$(DEFINES) \$(INCLUDES) > \$@ |
\$(CPP) \$(DEFINES) \$(INCLUDES) > \$@ |
1777 |
.p.f: |
.p.f: |
1778 |
\$(KPP) \$(KFLAGS1)\$@ \$(KFLAGS2) \$< |
\$(KPP) \$(KFLAGS1)\$@ \$(KFLAGS2) \$< |