/[MITgcm]/MITgcm_contrib/darwin2/pkg/darwin/darwin_readparams.F
ViewVC logotype

Diff of /MITgcm_contrib/darwin2/pkg/darwin/darwin_readparams.F

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

revision 1.6 by jahn, Tue Apr 16 20:20:16 2013 UTC revision 1.8 by jahn, Tue Apr 16 20:21:57 2013 UTC
# Line 78  CEOP Line 78  CEOP
78  #ifdef WAVEBANDS  #ifdef WAVEBANDS
79       &          ,darwin_wavebands       &          ,darwin_wavebands
80  #ifdef DAR_CALC_ACDOM  #ifdef DAR_CALC_ACDOM
81       &          ,darwin_Sdom       &          ,darwin_Sdom, darwin_lambda_aCDOM, darwin_aCDOM_fac
82  #endif  #endif
83  #ifdef DAR_DIAG_ACDOM  #ifdef DAR_DIAG_ACDOM
84       &          ,darwin_diag_acdom_ilam       &          ,darwin_diag_acdom_ilam
# Line 167  c default periodic forcing to same as fo Line 167  c default periodic forcing to same as fo
167    
168  #ifdef WAVEBANDS  #ifdef WAVEBANDS
169        DO ilam=1,tlam+1        DO ilam=1,tlam+1
170          darwin_wavebands(ilam) = 0          darwin_wavebands(ilam) = -1
171        ENDDO        ENDDO
172  #ifdef DAR_CALC_ACDOM  #ifdef DAR_CALC_ACDOM
173        darwin_Sdom = 0.014 _d 0        darwin_Sdom = 0.014 _d 0
174          darwin_lambda_aCDOM = 450 _d 0
175          darwin_aCDOM_fac = 0.2 _d 0
176  #endif  #endif
177  #ifdef DAR_DIAG_ACDOM  #ifdef DAR_DIAG_ACDOM
178  c value >= 100 will be converted to index in wavebands_init_fixed        c value >= 100 will be converted to index in wavebands_init_fixed      
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22