/[MITgcm]/MITgcm/model/src/dynamics.F
ViewVC logotype

Diff of /MITgcm/model/src/dynamics.F

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

revision 1.68 by adcroft, Tue May 29 14:01:37 2001 UTC revision 1.69 by adcroft, Wed Jun 6 14:55:45 2001 UTC
# Line 751  Cjmc(end) Line 751  Cjmc(end)
751         ENDDO         ENDDO
752        ENDDO        ENDDO
753    
754    #ifndef EXCLUDE_DEBUGMODE
755           CALL DEBUG_STATS_RL(1,EtaN,'EtaN (DYNAMICS)',myThid)
756           CALL DEBUG_STATS_RL(Nr,vVel,'Vvel (DYNAMICS)',myThid)
757           CALL DEBUG_STATS_RL(Nr,wVel,'Wvel (DYNAMICS)',myThid)
758           CALL DEBUG_STATS_RL(Nr,theta,'Theta (DYNAMICS)',myThid)
759           CALL DEBUG_STATS_RL(Nr,salt,'Salt (DYNAMICS)',myThid)
760           CALL DEBUG_STATS_RL(Nr,Gu,'Gu (DYNAMICS)',myThid)
761           CALL DEBUG_STATS_RL(Nr,Gv,'Gv (DYNAMICS)',myThid)
762           CALL DEBUG_STATS_RL(Nr,Gt,'Gt (DYNAMICS)',myThid)
763           CALL DEBUG_STATS_RL(Nr,Gs,'Gs (DYNAMICS)',myThid)
764           CALL DEBUG_STATS_RL(Nr,GuNm1,'GuNm1 (DYNAMICS)',myThid)
765           CALL DEBUG_STATS_RL(Nr,GvNm1,'GvNm1 (DYNAMICS)',myThid)
766           CALL DEBUG_STATS_RL(Nr,GtNm1,'GtNm1 (DYNAMICS)',myThid)
767           CALL DEBUG_STATS_RL(Nr,GsNm1,'GsNm1 (DYNAMICS)',myThid)
768    #endif
769    
770        RETURN        RETURN
771        END        END
Legend:
Removed from v.1.68  
changed lines
  Added in v.1.69
  ViewVC Help
Powered by ViewVC 1.1.22