/[MITgcm]/MITgcm_contrib/darwin2/pkg/monod/monod_generate_zoo.F
ViewVC logotype

Diff of /MITgcm_contrib/darwin2/pkg/monod/monod_generate_zoo.F

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

revision 1.3 by jahn, Thu May 1 16:19:32 2014 UTC revision 1.4 by jahn, Tue Nov 28 15:45:22 2017 UTC
# Line 113  c assume zoo(1) = small, zoo(2) = big Line 113  c assume zoo(1) = small, zoo(2) = big
113           mortzoo(2) = ZoomortBig           mortzoo(2) = ZoomortBig
114           mortzoo2(1) = ZoomortSmall2           mortzoo2(1) = ZoomortSmall2
115           mortzoo2(2) = ZoomortBig2           mortzoo2(2) = ZoomortBig2
116           ExportFracGraz(1)=ExGrazFracbig           ExportFracGraz(1)=ExGrazFracSmall
117           ExportFracGraz(2)=ExGrazFracsmall           ExportFracGraz(2)=ExGrazFracBig
118           IF ( nzmax.GT.2 ) THEN           IF ( nzmax.GT.2 ) THEN
119             WRITE(msgBuf,'(2A,I5)') 'MONOD_GENERATE_ZOO: ',             WRITE(msgBuf,'(2A,I5)') 'MONOD_GENERATE_ZOO: ',
120       &       'nzmax = ', nzmax       &       'nzmax = ', nzmax
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22