/[MITgcm]/MITgcm/pkg/ptracers/ptracers_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/ptracers/ptracers_readparms.F

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

revision 1.32 by jmc, Mon Aug 18 14:34:43 2008 UTC revision 1.33 by jmc, Thu Aug 21 15:16:01 2008 UTC
# Line 105  C     Set defaults values for parameters Line 105  C     Set defaults values for parameters
105          ENDDO          ENDDO
106          PTRACERS_EvPrRn(iTracer)=UNSET_RL          PTRACERS_EvPrRn(iTracer)=UNSET_RL
107          PTRACERS_useGMRedi(iTracer)=useGMRedi          PTRACERS_useGMRedi(iTracer)=useGMRedi
         PTRACERS_useGMRedi(iTracer)=useGMRedi  
108          PTRACERS_useDWNSLP(iTracer)=useDOWN_SLOPE          PTRACERS_useDWNSLP(iTracer)=useDOWN_SLOPE
109            PTRACERS_useKPP(iTracer)   =useKPP
110          PTRACERS_initialFile(iTracer)=' '          PTRACERS_initialFile(iTracer)=' '
111          DO ic = 1,MAX_LEN_FNAM          DO ic = 1,MAX_LEN_FNAM
112            PTRACERS_names(iTracer)(ic:ic) = ' '            PTRACERS_names(iTracer)(ic:ic) = ' '
Legend:
Removed from v.1.32  
changed lines
  Added in v.1.33
  ViewVC Help
Powered by ViewVC 1.1.22