/[MITgcm]/MITgcm/eesupp/src/timers.F
ViewVC logotype

Diff of /MITgcm/eesupp/src/timers.F

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

revision 1.23 by cnh, Tue Oct 10 00:10:08 2006 UTC revision 1.24 by cnh, Thu Oct 12 01:49:52 2006 UTC
# Line 773  C     executable code below. Line 773  C     executable code below.
773        Real*8 timenow        Real*8 timenow
774        external etime_, timenow        external etime_, timenow
775        Real*4 actual, tarray(2)        Real*4 actual, tarray(2)
776  # elif (defined (TARGET_T3E) || defined (TARGET_CRAY_VECTOR))  # elif (defined TARGET_T3E || defined TARGET_CRAY_VECTOR)
777  C     No declarations necessary       real second, secondr
778         external second, secondr
779  # else  # else
780  #  ifdef HAVE_ETIME  #  ifdef HAVE_ETIME
781        Real*4 etime        Real*4 etime
Legend:
Removed from v.1.23  
changed lines
  Added in v.1.24
  ViewVC Help
Powered by ViewVC 1.1.22