/[MITgcm]/MITgcm/pkg/diagnostics/diagnostics_out.F
ViewVC logotype

Diff of /MITgcm/pkg/diagnostics/diagnostics_out.F

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

revision 1.50 by jmc, Sat Jun 11 23:29:44 2011 UTC revision 1.51 by jmc, Sun Jun 12 13:58:33 2011 UTC
# Line 161  C                                 mnc ou Line 161  C                                 mnc ou
161        DO jj=1,jjMx        DO jj=1,jjMx
162    
163         IF (useMNC .AND. diag_mnc) THEN         IF (useMNC .AND. diag_mnc) THEN
164             misValLoc = undef
165             IF ( misvalFlt(listId).NE.UNSET_RL )
166         &        misValLoc = misvalFlt(listId)
167           CALL DIAGNOSTICS_MNC_SET(           CALL DIAGNOSTICS_MNC_SET(
168       I                    nLevOutp, listId, jj,       I                    nLevOutp, listId, jj,
169       O                    diag_mnc_bn,       O                    diag_mnc_bn, useMissingValue,
170       O                    useMissingValue, misValLoc,       I                    misValLoc, myTime, myIter, myThid )
      I                    myTime, myIter, myThid )  
171         ENDIF         ENDIF
172  #endif /*  ALLOW_MNC  */  #endif /*  ALLOW_MNC  */
173    
Legend:
Removed from v.1.50  
changed lines
  Added in v.1.51
  ViewVC Help
Powered by ViewVC 1.1.22