/[MITgcm]/MITgcm/pkg/exf/exf_adjoint_snapshots.F
ViewVC logotype

Diff of /MITgcm/pkg/exf/exf_adjoint_snapshots.F

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

revision 1.3 by heimbach, Wed Jun 6 14:08:41 2007 UTC revision 1.4 by jmc, Tue Oct 9 00:04:05 2007 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2    C $Name$
3    
4  #include "EXF_OPTIONS.h"  #include "EXF_OPTIONS.h"
5    
# Line 18  C     myThid - Thread number for this in Line 19  C     myThid - Thread number for this in
19        integer iwhen        integer iwhen
20        integer myThid        integer myThid
21        integer myiter        integer myiter
22        _RL     mytime        _RL     mytime
23    
24  #ifdef ALLOW_AUTODIFF_MONITOR  #ifdef ALLOW_AUTODIFF_MONITOR
25        call TIMER_START('I/O (WRITE)        [ADJOINT LOOP]', myThid )        call TIMER_START('I/O (WRITE)        [ADJOINT LOOP]', myThid )

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

  ViewVC Help
Powered by ViewVC 1.1.22