/[MITgcm]/MITgcm/tools/genmake2
ViewVC logotype

Diff of /MITgcm/tools/genmake2

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

revision 1.112 by edhill, Fri Dec 10 13:07:47 2004 UTC revision 1.113 by edhill, Sun Dec 26 16:38:20 2004 UTC
# Line 718  EOF Line 718  EOF
718    
719    
720  check_netcdf_libs()  {  check_netcdf_libs()  {
721        if test ! "x$SKIP_NETCDF_CHECK" = x ; then
722            return
723        fi
724      echo "" > genmake_tnc.log      echo "" > genmake_tnc.log
725      cat <<EOF > genmake_tnc.for      cat <<EOF > genmake_tnc.for
726        program fgennc        program fgennc
727  #include "netcdf.inc"  #include "netcdf.inc"
728    EOF
729        if test ! "x$MPI" = x ; then
730            echo '#include "mpif.h"' >> genmake_tnc.for
731        fi
732        cat <<EOF >> genmake_tnc.for
733        integer iret, ncid, xid        integer iret, ncid, xid
734        iret = nf_create('genmake_tnc.nc', NF_CLOBBER, ncid)        iret = nf_create('genmake_tnc.nc', NF_CLOBBER, ncid)
735        IF (iret .NE. NF_NOERR) write(*,*) NF_STRERROR(iret)        IF (iret .NE. NF_NOERR) write(*,*) NF_STRERROR(iret)

Legend:
Removed from v.1.112  
changed lines
  Added in v.1.113

  ViewVC Help
Powered by ViewVC 1.1.22