Changeset 8557


Ignore:
Timestamp:
2017-09-22T13:06:31+02:00 (3 years ago)
Author:
jpalmier
Message:

JPALM — trdtrc — fix SBC trend (2D not 3D) — remove DMP from XIOS group to avoid Na Ns?

Location:
branches/NERC/dev_r5518_GO6_package_trdtrc/NEMOGCM
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/NERC/dev_r5518_GO6_package_trdtrc/NEMOGCM/CONFIG/SHARED/field_def_bgc.xml

    r8535 r8557  
    12871287       <field field_ref="ZDP_ALK"      name="ZDP_ALK"   /> 
    12881288       <field field_ref="ZDP_OXY"      name="ZDP_OXY"   /> 
    1289        <!-- trd case: jptra_dmp -->    
     1289       <!-- trd case: jptra_dmp -->  
     1290       <!-- NO DAMPING IN MEDUSA - COMMENT DO AVOID NaN   
    12901291       <field field_ref="DMP_CHN"      name="DMP_CHN"   /> 
    12911292       <field field_ref="DMP_CHD"      name="DMP_CHD"   /> 
     
    13021303       <field field_ref="DMP_DiC"      name="DMP_DiC"   /> 
    13031304       <field field_ref="DMP_ALK"      name="DMP_ALK"   /> 
    1304        <field field_ref="DMP_OXY"      name="DMP_OXY"   /> 
     1305       <field field_ref="DMP_OXY"      name="DMP_OXY"   /> --> 
    13051306       <!-- trd case: jptra_sms --> 
    13061307       <field field_ref="SMS_CHN"      name="SMS_CHN"   /> 
     
    14131414          <field field_ref="ZDF_CFC11"     name="ZDF_CFC11"     standard_name="CFC-11_Concentration"                  /> 
    14141415          <field field_ref="ZDP_CFC11"     name="ZDP_CFC11"     standard_name="CFC-11_Concentration"                  /> 
    1415           <field field_ref="DMP_CFC11"     name="DMP_CFC11"     standard_name="CFC-11_Concentration"                  /> 
     1416          <!-- <field field_ref="DMP_CFC11"     name="DMP_CFC11"     standard_name="CFC-11_Concentration"             /> --> 
    14161417          <field field_ref="SMS_CFC11"     name="SMS_CFC11"     standard_name="CFC-11_Concentration"                  /> 
    14171418          <field field_ref="SMS_CFC11_INV" name="SMS_CFC11_INV" standard_name="CFC-11_Concentration"                  /> 
     
    14341435          <field field_ref="ZDF_CFC12"     name="ZDF_CFC12"     standard_name="CFC-12_Concentration"                  /> 
    14351436          <field field_ref="ZDP_CFC12"     name="ZDP_CFC12"     standard_name="CFC-12_Concentration"                  /> 
    1436           <field field_ref="DMP_CFC12"     name="DMP_CFC12"     standard_name="CFC-12_Concentration"                  /> 
     1437          <!-- <field field_ref="DMP_CFC12"     name="DMP_CFC12"     standard_name="CFC-12_Concentration"             /> --> 
    14371438          <field field_ref="SMS_CFC12"     name="SMS_CFC12"     standard_name="CFC-12_Concentration"                  /> 
    14381439          <field field_ref="SMS_CFC12_INV" name="SMS_CFC12_INV" standard_name="CFC-12_Concentration"                  /> 
     
    14551456          <field field_ref="ZDF_SF6"      name="ZDF_SF6"      standard_name="SF6_Concentration"                     /> 
    14561457          <field field_ref="ZDP_SF6"      name="ZDP_SF6"      standard_name="SF6_Concentration"                     /> 
    1457           <field field_ref="DMP_SF6"      name="DMP_SF6"      standard_name="SF6_Concentration"                     /> 
     1458          <!-- <field field_ref="DMP_SF6"      name="DMP_SF6"      standard_name="SF6_Concentration"                /> --> 
    14581459          <field field_ref="SMS_SF6"      name="SMS_SF6"      standard_name="SF6_Concentration"                     /> 
    14591460          <field field_ref="SMS_SF6_INV"  name="SMS_SF6_INV"  standard_name="SF6_Concentration"                     /> 
     
    14761477          <field field_ref="ZDF_Age"      name="ZDF_Age"      standard_name="sea_water_age_since_surface_contact"   /> 
    14771478          <field field_ref="ZDP_Age"      name="ZDP_Age"      standard_name="sea_water_age_since_surface_contact"   /> 
    1478           <field field_ref="DMP_Age"      name="DMP_Age"      standard_name="sea_water_age_since_surface_contact"   /> 
     1479          <!-- <field field_ref="DMP_Age"      name="DMP_Age"      standard_name="sea_water_age_since_surface_contact" /> --> 
    14791480          <field field_ref="SMS_Age"      name="SMS_Age"      standard_name="sea_water_age_since_surface_contact"   /> 
    14801481          <field field_ref="SMS_Age_INV"  name="SMS_Age_INV"  standard_name="sea_water_age_since_surface_contact"   /> 
     
    14971498          <field field_ref="ZDF_IDTRA"      name="ZDF_IDTRA"      standard_name="IDTRA_Concentration"               /> 
    14981499          <field field_ref="ZDP_IDTRA"      name="ZDP_IDTRA"      standard_name="IDTRA_Concentration"               /> 
    1499           <field field_ref="DMP_IDTRA"      name="DMP_IDTRA"      standard_name="IDTRA_Concentration"               /> 
     1500          <!-- <field field_ref="DMP_IDTRA"      name="DMP_IDTRA"      standard_name="IDTRA_Concentration"          /> --> 
    15001501          <field field_ref="SMS_IDTRA"      name="SMS_IDTRA"      standard_name="IDTRA_Concentration"               /> 
    15011502          <field field_ref="SMS_IDTRA_INV"  name="SMS_IDTRA_INV"  standard_name="IDTRA_Concentration"               /> 
     
    15181519          <field field_ref="ZDF_C14B"      name="ZDF_C14B"      standard_name="C14b_Concentration"               /> 
    15191520          <field field_ref="ZDP_C14B"      name="ZDP_C14B"      standard_name="C14b_Concentration"               /> 
    1520           <field field_ref="DMP_C14B"      name="DMP_C14B"      standard_name="C14b_Concentration"               /> 
     1521          <!-- <field field_ref="DMP_C14B"      name="DMP_C14B"      standard_name="C14b_Concentration"          /> --> 
    15211522          <field field_ref="SMS_C14B"      name="SMS_C14B"      standard_name="C14b_Concentration"               /> 
    15221523          <field field_ref="SMS_C14B_INV"  name="SMS_C14B_INV"  standard_name="C14b_Concentration"               /> 
  • branches/NERC/dev_r5518_GO6_package_trdtrc/NEMOGCM/NEMO/TOP_SRC/TRP/trcsbc.F90

    r8356 r8557  
    6868      CHARACTER (len=22) :: charout 
    6969      REAL(wp), POINTER, DIMENSION(:,:  ) :: zsfx 
    70       REAL(wp), POINTER, DIMENSION(:,:,:) :: ztrtrd 
     70      REAL(wp), POINTER, DIMENSION(:,:  ) :: ztrtrd 
    7171 
    7272      !!--------------------------------------------------------------------- 
     
    7676      ! Allocate temporary workspace 
    7777                      CALL wrk_alloc( jpi, jpj,      zsfx   ) 
    78       IF( l_trdtrc )  CALL wrk_alloc( jpi, jpj, jpk, ztrtrd ) 
     78      IF( l_trdtrc )  CALL wrk_alloc( jpi, jpj,     ztrtrd ) 
    7979      ! 
    8080      zrtrn = 1.e-15_wp 
     
    140140      DO jn = 1, jptra 
    141141         ! 
    142          IF( l_trdtrc ) ztrtrd(:,:,:) = tra(:,:,:,jn)  ! save trends 
     142         IF( l_trdtrc ) ztrtrd(:,:) = tra(:,:,1,jn)  ! save trends 
    143143         !                                             ! add the trend to the general tracer trend 
    144144 
     
    184184         ! 
    185185         IF( l_trdtrc ) THEN 
    186             ztrtrd(:,:,:) = tra(:,:,:,jn) - ztrtrd(:,:,:) 
     186            ztrtrd(:,:) = tra(:,:,1,jn) - ztrtrd(:,:) 
    187187            CALL trd_tra( kt, 'TRC', jn, jptra_nsr, ztrtrd ) 
    188188         END IF 
     
    207207                                           CALL prt_ctl_trc( tab4d=tra, mask=tmask, clinfo=ctrcnm, clinfo2='trd' ) 
    208208      ENDIF 
    209                       CALL wrk_dealloc( jpi, jpj,      zsfx   ) 
    210       IF( l_trdtrc )  CALL wrk_dealloc( jpi, jpj, jpk, ztrtrd ) 
     209                      CALL wrk_dealloc( jpi, jpj, zsfx   ) 
     210      IF( l_trdtrc )  CALL wrk_dealloc( jpi, jpj, ztrtrd ) 
    211211      ! 
    212212      IF( nn_timing == 1 )  CALL timing_stop('trc_sbc') 
Note: See TracChangeset for help on using the changeset viewer.