Ignore:
Timestamp:
2018-02-16T18:29:04+01:00 (2 years ago)
Author:
dford
Message:

Add required diagnostics.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/CO6_KD490_amm7_oper_fabm_hem08/NEMOGCM/NEMO/TOP_SRC/FABM/trcini_fabm.F90

    r8050 r9330  
    104104      jp_fabm_n5s  = fabm_state_index( 'N5_s' ) 
    105105      jp_fabm_o2o  = fabm_state_index( 'O2_o' ) 
     106      jp_fabm_o3c  = fabm_state_index( 'O3_c' ) 
     107      jp_fabm_o3a  = fabm_state_index( 'O3_bioalk' ) 
     108      jp_fabm_r4n  = fabm_state_index( 'R4_n' ) 
     109      jp_fabm_r6n  = fabm_state_index( 'R6_n' ) 
     110      jp_fabm_r8n  = fabm_state_index( 'R8_n' ) 
    106111      !jp_fabm_netp1= fabm_diag_index( 'P1_netP' ) 
    107112      !jp_fabm_netp2= fabm_diag_index( 'P2_netP' ) 
     
    181186      END IF 
    182187      IF( lk_mpp )   CALL mppsync !Ensure field_def_fabm is ready. 
     188       
     189      MLD_MAX(:,:) = 0.0 
     190      PGROW_AVG(:,:) = 0.0 
     191      PLOSS_AVG(:,:) = 0.0 
     192      PHYT_AVG(:,:) = 0.0 
    183193 
    1841941000 FORMAT (A) 
Note: See TracChangeset for help on using the changeset viewer.