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

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

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

revision 1.4 by jmc, Fri Nov 4 01:30:33 2005 UTC revision 1.5 by molod, Fri Nov 18 20:25:18 2005 UTC
# Line 129  C if fizhi is being  used, may need to g Line 129  C if fizhi is being  used, may need to g
129             endif             endif
130    
131             if(.not. foundp) then             if(.not. foundp) then
132              WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_INTERP_VERT: ',              WRITE(msgBuf,'(4A)') 'DIAGNOSTICS_INTERP_VERT: ',
133       .    ' Have asked for pressure interpolation but have not ',       .    ' Have asked for pressure interpolation but have not ',
134       .    ' Activated surface and 3D pressure diagnostic, ',       .    ' Activated surface and 3D pressure diagnostic, ',
135       .    ' RSURF and PRESSURE'       .    ' RSURF and PRESSURE'

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

  ViewVC Help
Powered by ViewVC 1.1.22