/[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.81 by cnh, Wed Jun 30 00:58:06 2004 UTC revision 1.82 by cnh, Wed Jun 30 01:19:29 2004 UTC
# Line 1156  rm -f genmake_tcomp* Line 1156  rm -f genmake_tcomp*
1156  printf "  Do we have the etime() command using $FC...  "  printf "  Do we have the etime() command using $FC...  "
1157  cat > genmake_tcomp.f <<EOF  cat > genmake_tcomp.f <<EOF
1158        program hello        program hello
1159        REAL*4 TARRAY(2)        REAL*4 ACTUAL, TARRAY(2)
1160        call etime( tarray )        EXTERNAL ETIME
1161          REAL*4 ETIME
1162          actual = etime( tarray )
1163        print *, tarray        print *, tarray
1164        end        end
1165  EOF  EOF

Legend:
Removed from v.1.81  
changed lines
  Added in v.1.82

  ViewVC Help
Powered by ViewVC 1.1.22