Changeset 5905


Ignore:
Timestamp:
Dec 3, 2025, 7:02:45 PM (less than one hour ago)
Author:
Laurent Fairhead
Message:

Inclusion of code to calculate effective concentrations (C_eff) from real concentrations (C_real) to correct the detected CH4 and N2O radiative forcing deficiencies when using RRTM
PC

Location:
LMDZ6/trunk
Files:
1 added
9 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/trunk/DefLists/field_def_lmdz.xml

    r5904 r5905  
    14241424      <field id="co2_ppm" long_name="co2_ppm" unit="ppm" />
    14251425      <field id="CH4_ppb" long_name="CH4_ppb" unit="ppb" />
     1426      <field id="CH4_eff_ppb" long_name="CH4_eff_ppb" unit="ppb" />  <!-- Added PC -->
    14261427      <field id="N2O_ppb" long_name="N2O_ppb" unit="ppb" />
     1428      <field id="N2O_eff_ppb" long_name="N2O_eff_ppb" unit="ppb" />  <!-- Added PC -->
    14271429      <field id="CFC11_ppt" long_name="CFC11_ppt" unit="ppt" />
    14281430      <field id="CFC12_ppt" long_name="CFC12_ppt" unit="ppt" />
  • LMDZ6/trunk/DefLists/file_def_histhf_lmdz.xml

    r5807 r5905  
    2323                <field field_ref="ptstar" level="10" />
    2424                <field field_ref="pt0" level="10" />
    25                 <field field_ref="tsol" level="5" />
    26                 <field field_ref="t2m" level="5" />
     25                <field field_ref="tsol" level="1" />
     26                <field field_ref="t2m" level="1" />
    2727                <field field_ref="t2m_min" level="10" operation="minimum" />
    2828                <field field_ref="t2m_max" level="10" operation="maximum" />
     
    3232                <field field_ref="t2m_sic" level="10" />
    3333                <field field_ref="gusts" level="10" />
    34                 <field field_ref="wind10m" level="5" />
     34                <field field_ref="wind10m" level="1" />
    3535                <field field_ref="wind100m" level="10" />
    3636                <field field_ref="wind10max" level="10" operation="maximum" />
    3737                <field field_ref="sicf" level="10" />
    38                 <field field_ref="q2m" level="5" />
    39                 <field field_ref="ustar" level="5" />
    40                 <field field_ref="u10m" level="5" />
    41                 <field field_ref="v10m" level="5" />
    42                 <field field_ref="psol" level="5" />
    43                 <field field_ref="qsurf" level="5" />
     38                <field field_ref="q2m" level="1" />
     39                <field field_ref="ustar" level="1" />
     40                <field field_ref="u10m" level="1" />
     41                <field field_ref="v10m" level="1" />
     42                <field field_ref="psol" level="1" />
     43                <field field_ref="qsurf" level="1" />
    4444                <field field_ref="ustar_ter" level="10" />
    4545                <field field_ref="ustar_lic" level="10" />
     
    6161                <field field_ref="qsol" level="10" />
    6262                <field field_ref="ndayrain" level="10" operation="instant" />
    63                 <field field_ref="precip" level="5" />
     63                <field field_ref="precip" level="1" />
    6464                <field field_ref="rain_fall" level="10" />
    6565                <field field_ref="rain_con" level="10" />
     
    6767                <field field_ref="plun" level="10" />
    6868                <field field_ref="pluc" level="10" />
    69                 <field field_ref="snow" level="5" />
     69                <field field_ref="snow" level="1" />
    7070                <field field_ref="bsfall" level="5" />
    71                 <field field_ref="evap" level="5" />
     71                <field field_ref="evap" level="1" />
    7272                <field field_ref="snowerosion" level="5" />
    7373                <field field_ref="rhosnow_lic" level="5" />
     
    147147                <field field_ref="SWupSFC" level="10" />
    148148                <field field_ref="SWupSFCclr" level="10" />
    149                 <field field_ref="SWdnSFC" level="5" />
     149                <field field_ref="SWdnSFC" level="1" />
    150150                <field field_ref="SWdnSFCclr" level="10" />
    151151                <field field_ref="LWupSFC" level="10" />
    152152                <field field_ref="LWupSFCclr" level="10" />
    153                 <field field_ref="LWdnSFC" level="5" />
     153                <field field_ref="LWdnSFC" level="1" />
    154154                <field field_ref="LWdnSFCclr" level="10" />
    155155                <field field_ref="bils" level="10" />
     
    160160                <field field_ref="bils_enthalp" level="10" />
    161161                <field field_ref="bils_latent" level="10" />
    162                 <field field_ref="sens" level="5" />
     162                <field field_ref="sens" level="1" />
    163163                <field field_ref="sens_x" level="11" />
    164164                <field field_ref="sens_w" level="11" />
     
    360360                <field field_ref="tpote" level="10" />
    361361                <field field_ref="SWnetOR" level="10" />
    362                 <field field_ref="SWdownOR" level="5" />
    363                 <field field_ref="LWdownOR" level="5" />
     362                <field field_ref="SWdownOR" level="1" />
     363                <field field_ref="LWdownOR" level="1" />
    364364                <field field_ref="snowl" level="10" />
    365365                <field field_ref="cape_max" level="10" operation="maximum" />
  • LMDZ6/trunk/DefLists/file_def_histmth_lmdz.xml

    r5814 r5905  
    3737                <field field_ref="co2_ppm" level="1" name="co2_ppm" />
    3838                <field field_ref="CH4_ppb" level="1" name="CH4_ppb" />
     39                <field field_ref="CH4_eff_ppb" level="1" name="CH4_eff_ppb" /> <!-- Added PC -->
    3940                <field field_ref="N2O_ppb" level="1" name="N2O_ppb" />
     41                <field field_ref="N2O_eff_ppb" level="1" name="N2O_eff_ppb" /> <!-- Added PC -->
    4042                <field field_ref="CFC11_ppt" level="1" name="CFC11_ppt" />
    4143                <field field_ref="CFC12_ppt" level="1" name="CFC12_ppt" />
     
    603605            <!-- VARS 3D -->
    604606            <field_group operation="average" grid_ref="grid_out_presnivs">
    605                 <field field_ref="CO2" level="5" />  <!-- Added PC -->
     607                <field field_ref="CO2" level="1" />  <!-- Added PC -->
    606608                <field field_ref="dCO2_vdf" level="5" />  <!-- Added PC -->
    607609                <field field_ref="dCO2_the" level="5" />  <!-- Added PC -->
  • LMDZ6/trunk/libf/phylmd/clesphys_mod_h.f90

    r5825 r5905  
    44  IMPLICIT NONE; PRIVATE
    55
    6   PUBLIC co2_ppm, solaire                                           &
    7           , RCO2, RCH4, RN2O, RCFC11, RCFC12                           &
     6  PUBLIC co2_ppm, solaire                                              &
     7          , RCO2, RCH4, RN2O                                           &
     8          , RCFC11, RCFC12                                             &
    89          , RCO2_act, RCH4_act, RN2O_act, RCFC11_act, RCFC12_act       &
    910          , RCO2_per, RCH4_per, RN2O_per, RCFC11_per, RCFC12_per       &
    10           , CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt                     &
     11          , CH4_ppb, N2O_ppb, CH4_eff_ppb, N2O_eff_ppb                 &
     12          , CFC11_ppt, CFC12_ppt                                       &
    1113          , CH4_ppb_per, N2O_ppb_per, CFC11_ppt_per, CFC12_ppt_per     &
    1214          , cdmmax, cdhmax, ksta, ksta_ter, f_ri_cd_min                    &
    13           , fmagic, pmagic                                             &
     15          , fmagic, pmagic                                                 &
    1416          , f_cdrag_ter, f_cdrag_oce, f_rugoro, z0min, tau_gl              &
    1517          , min_wind_speed, f_gust_wk, f_gust_bl, f_qsat_oce, f_z0qh_oce   &
     
    1921          , freq_ISCCP, ecrit_ISCCP, freq_COSP, freq_AIRS              &
    2022          , cvl_corr                                                   &
    21           , qsol0, albsno0, evap0                                        &
     23          , qsol0, albsno0, evap0                                      &
    2224          , co2_ppm0                                                   &
    2325          , tau_thermals                                               &
     
    3840          , lev_histins, lev_histLES                                   &
    3941          , type_run, ok_regdyn, ok_cosp, ok_airs                      &
    40           , ok_mensuelCOSP, ok_journeCOSP, ok_hfCOSP                     &
     42          , ok_mensuelCOSP, ok_journeCOSP, ok_hfCOSP                   &
    4143          , ip_ebil_phy                                                &
    4244          , iflag_gusts, iflag_z0_oce                                  &
    4345          , ok_lic_melt, ok_lic_cond, aer_type                         &
    44           , iflag_rrtm, ok_strato, ok_hines, ok_qch4                    &
    45           , iflag_ice_thermo, ok_ice_supersat                            &
     46          , iflag_rrtm, ok_strato, ok_hines, ok_qch4                   &
     47          , iflag_ice_thermo, ok_ice_supersat                          &
    4648          , ok_plane_h2o, ok_plane_contrail                            &
    4749          , ok_gwd_rando, NSW, iflag_albedo                            &
    48           , ok_chlorophyll, ok_conserv_q, adjust_tropopause             &
     50          , ok_chlorophyll, ok_conserv_q, adjust_tropopause            &
    4951          , ok_daily_climoz, ok_all_xml, ok_lwoff                      &
    5052          , iflag_phytrac, ok_new_lscp, ok_bs, ok_rad_bs               &
    51           , iflag_thermals, nsplit_thermals              &
     53          , iflag_thermals, nsplit_thermals                            &
    5254          , iflag_physiq, ok_3Deffect, ok_water_mass_fixer             &
    5355          , ok_mass_dtcon, ok_mass_dqcon, ok_mass_duvcon, iflag_tropopause_height
     
    7375  REAL(kind = 8) RCO2_act, RCH4_act, RN2O_act, RCFC11_act, RCFC12_act
    7476  REAL(kind = 8) CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt
     77  ! PC mass mixing ratios for "effective" CH4 & "effective" N2O
     78  REAL(kind = 8) CH4_eff_ppb, N2O_eff_ppb
    7579  !IM ajout CFMIP2/CMIP5ok_bs
    7680  REAL(kind = 8) RCO2_per, RCH4_per, RN2O_per, RCFC11_per, RCFC12_per
     
    161165
    162166
    163   !$OMP THREADPRIVATE(co2_ppm, solaire                                           &
    164   !$OMP      , RCO2, RCH4, RN2O, RCFC11, RCFC12                           &
     167  !$OMP THREADPRIVATE(co2_ppm, solaire                                    &
     168  !$OMP      , RCO2, RCH4, RN2O                                           &
     169  !$OMP      , RCFC11, RCFC12                                             &
    165170  !$OMP      , RCO2_act, RCH4_act, RN2O_act, RCFC11_act, RCFC12_act       &
    166171  !$OMP      , RCO2_per, RCH4_per, RN2O_per, RCFC11_per, RCFC12_per       &
    167   !$OMP      , CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt                     &
     172  !$OMP      , CH4_ppb, N2O_ppb, CH4_eff_ppb, N2O_eff_ppb                 &
     173  !$OMP      , CFC11_ppt, CFC12_ppt                                       &
    168174  !$OMP      , CH4_ppb_per, N2O_ppb_per, CFC11_ppt_per, CFC12_ppt_per     &
    169   !$OMP      , cdmmax, cdhmax, ksta, ksta_ter, f_ri_cd_min                    &
     175  !$OMP      , cdmmax, cdhmax, ksta, ksta_ter, f_ri_cd_min                &
    170176  !$OMP      , fmagic, pmagic                                             &
    171177  !$OMP      , f_cdrag_ter, f_cdrag_oce, f_rugoro, z0min, tau_gl              &
     
    176182  !$OMP      , freq_ISCCP, ecrit_ISCCP, freq_COSP, freq_AIRS              &
    177183  !$OMP      , cvl_corr                                                   &
    178   !$OMP      , qsol0, albsno0, evap0                                        &
     184  !$OMP      , qsol0, albsno0, evap0                                      &
    179185  !$OMP      , co2_ppm0                                                   &
    180186  !$OMP      , tau_thermals                                               &
  • LMDZ6/trunk/libf/phylmd/conf_phys_m.f90

    r5891 r5905  
    4545    USE comsoil_mod_h
    4646    USE nuage_params_mod_h
     47    USE ch4n2o_correction_mod, ONLY: ok_CH4_eff_ppb, ok_N2O_eff_ppb
     48   
    4749
    4850    !
     
    257259    LOGICAL, SAVE :: ok_advtke_omp
    258260    LOGICAL, SAVE :: ok_mass_dtcon_omp, ok_mass_dqcon_omp, ok_mass_duvcon_omp
     261    ! PC
     262    ! Per-gas routing switches (Concentration "effective")
     263    LOGICAL, SAVE :: ok_CH4_eff_ppb_omp
     264    LOGICAL, SAVE :: ok_N2O_eff_ppb_omp
    259265
    260266    INTEGER, INTENT(OUT):: read_climoz ! read ozone climatology, OpenMP shared
     
    786792    RN2O_omp = N2O_ppb_omp * 1.0E-09 * RMN2O / RMD
    787793    !
     794    ok_CH4_eff_ppb_omp = .FALSE.
     795    CALL getin('ok_CH4_eff_ppb', ok_CH4_eff_ppb_omp)
     796    !Config Key  = ok_CH4_eff_ppb
     797    !Config Desc = If .true., feed radiation with the "effective" CH4 series
     798    !Config Def  = .FALSE.
     799
     800    ok_N2O_eff_ppb_omp = .FALSE.
     801    CALL getin('ok_N2O_eff_ppb', ok_N2O_eff_ppb_omp)
     802    !Config Key  = ok_N2O_eff_ppb
     803    !Config Desc = If .true., feed radiation with the "effective" N2O series
     804    !Config Def  = .FALSE.   
     805    !
    788806    !Config Key  = RCFC11
    789807    !Config Desc = Concentration du CFC11
    790808    !Config Def  = 280.E-12* 137.3686/28.97
    791809    !Config Help =
    792     !               
     810    !
    793811    CFC11_ppt_omp = 280.
    794812    CALL getin('CFC11_ppt',CFC11_ppt_omp)
     
    24292447    !Config Def  = .FALSE.
    24302448    !Config Help = can be activated only if lmdz use inca for the atmospheric chemistry
    2431    
     2449
     2450
    24322451    !$OMP END MASTER
    24332452    !$OMP BARRIER
     
    24592478    RCFC11_per = RCFC11_per_omp
    24602479    RCFC12_per = RCFC12_per_omp
     2480    ! PC
     2481    ok_CH4_eff_ppb = ok_CH4_eff_ppb_omp
     2482    ok_N2O_eff_ppb = ok_N2O_eff_ppb_omp
     2483
    24612484
    24622485    iflag_cycle_diurne = iflag_cycle_diurne_omp
     
    28952918    WRITE(lunout,*) ' CH4_ppb =',CH4_ppb,' RCH4_act = ',RCH4_act
    28962919    WRITE(lunout,*) ' N2O_ppb =',N2O_ppb,' RN2O_act=  ',RN2O_act
     2920    WRITE(lunout,*) ' ok_CH4_eff_ppb =',ok_CH4_eff_ppb, 'ok_N2O_eff_ppb= ',ok_N2O_eff_ppb
    28972921    WRITE(lunout,*) ' CFC11_ppt=',CFC11_ppt,' RCFC11_act=  ',RCFC11_act
    28982922    WRITE(lunout,*) ' CFC12_ppt=',CFC12_ppt,' RCFC12_act=  ',RCFC12_act
  • LMDZ6/trunk/libf/phylmd/paramlmdz_phy_mod.F90

    r5285 r5905  
    7070       CALL gr_fi_ecrit(1,klon,nbp_lon,nbp_lat,rlat_glo,zx_lat)
    7171!
     72
     73!--PC Provide the record time step to IOIPSL (silences INTENT(OUT) warning)
     74       dtime = zstophy
    7275       CALL histbeg("paramLMDZ_phy.nc",  &
    7376                       np,zx_lon(np:np,1), np,zx_lat(1,np:np), &
     
    123126                      "ave(X)", zstophy,zout)
    124127!
     128       CALL histdef(nid_ctesGCM, "CH4_eff_ppb",  &
     129               "Concentration effective du CH4", "ppb", &
     130               1,1,nhori, 1,1,1, -99, 32,  &
     131               "ave(X)", zstophy, zout)
     132!
     133       CALL histdef(nid_ctesGCM, "N2O_eff_ppb",  &
     134               "Concentration effective du N2O", "ppb", &
     135               1,1,nhori, 1,1,1, -99, 32,  &
     136               "ave(X)", zstophy, zout)
     137!
    125138       CALL histdef(nid_ctesGCM, "CFC11_ppt", &
    126139                      "Concentration du CFC11", "ppt", &
     
    146159    USE mod_phys_lmdz_mpi_data, ONLY: is_mpi_root
    147160    USE time_phylmdz_mod, ONLY: day_step_phy, annee_ref, itau_phy, start_time
     161    USE ch4n2o_correction_mod, ONLY: ok_CH4_eff_ppb, ok_N2O_eff_ppb
    148162    USE mod_grid_phy_lmdz, only: nbp_lon, nbp_lat, klon_glo
    149163
     
    218232                     zx_tmp_0d,np,ndex2d)
    219233!
     234      IF (ok_CH4_eff_ppb) THEN
     235         zx_tmp_0d = CH4_eff_ppb
     236         CALL histwrite(nid_ctesGCM,"CH4_eff_ppb",itau_w, zx_tmp_0d, np, ndex2d)
     237      END IF
     238!
     239      IF (ok_N2O_eff_ppb) THEN
     240         zx_tmp_0d = N2O_eff_ppb
     241         CALL histwrite(nid_ctesGCM,"N2O_eff_ppb",itau_w, zx_tmp_0d, np, ndex2d)
     242      END IF
     243
     244!
    220245      zx_tmp_0d=CFC11_ppt
    221246      CALL histwrite(nid_ctesGCM,"CFC11_ppt",itau_w, &
  • LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90

    r5904 r5905  
    18461846
    18471847!---CO2 fluxes for interactive CO2 configuration
     1848!--Added PC
    18481849  TYPE(ctrl_out), SAVE :: o_flx_co2_ff = ctrl_out((/ 11, 11, 11, 11, 11, 11, 11, 11, 11, 1/), &
    18491850    'flx_co2_ff', 'CO2 flux from fossil fuel and cement', '1', (/ ('', i=1, 10) /))
     
    18581859  TYPE(ctrl_out), SAVE :: o_flx_co2_land_cor = ctrl_out((/ 11, 11, 11, 11, 11, 11, 11, 11, 11, 1/), &
    18591860    'flx_co2_land_cor', 'correction of the CO2 flux from the land', 'kg CO2 m-2 s-1', (/ ('', i=1, 10) /))
     1861!--end add PC
    18601862
    18611863!--extinction coefficient
  • LMDZ6/trunk/libf/phylmd/phys_output_write_mod.F90

    r5904 r5905  
    527527    USE YOESW, ONLY : RSUN
    528528#endif
    529 USE compbl_mod_h
     529    ! PC
     530    USE ch4n2o_correction_mod, ONLY: ok_CH4_eff_ppb, ok_N2O_eff_ppb
     531    USE compbl_mod_h
    530532    USE alpale_mod
    531         USE clesphys_mod_h
     533    USE clesphys_mod_h
    532534    USE tracinca_mod, ONLY: config_inca
    533535    USE config_ocean_skin_m, ONLY: activate_ocean_skin
     
    721723         CALL histwrite_phy("CH4_ppb",CH4_ppb)
    722724         CALL histwrite_phy("N2O_ppb",N2O_ppb)
     725         IF (ok_CH4_eff_ppb) CALL histwrite_phy("CH4_eff_ppb",CH4_eff_ppb)
     726         IF (ok_N2O_eff_ppb) CALL histwrite_phy("N2O_eff_ppb",N2O_eff_ppb)
    723727         CALL histwrite_phy("CFC11_ppt",CFC11_ppt)
    724728         CALL histwrite_phy("CFC12_ppt",CFC12_ppt)
  • LMDZ6/trunk/libf/phylmd/physiq_mod.F90

    r5842 r5905  
    3131    USE change_srf_frac_mod
    3232    USE conf_phys_m, only: conf_phys
    33     USE carbon_cycle_mod, ONLY : infocfields_init, RCO2_glo, carbon_cycle_rad
     33    USE carbon_cycle_mod, ONLY : infocfields_init, RCO2_glo, carbon_cycle_rad   ! PC
     34
     35
    3436    USE CFMIP_point_locations   ! IM stations CFMIP
    3537    USE clouds_bigauss_mod, ONLY: clouds_bigauss
     
    143145#endif
    144146
     147    USE ch4n2o_correction_mod, ONLY: ch4n2o_init, ch4n2o_compute, &             ! PC
     148  &                                  ok_CH4_eff_ppb, ok_N2O_eff_ppb, ghg_year   ! PC
    145149    USE phys_local_var_mod, ONLY: d_q_emiss
    146150    USE strataer_local_var_mod, ONLY: strataer_init,flag_emit,flh2o,ok_qemiss,flag_verbose_strataer, &
     
    15631567       CALL infocfields_init
    15641568
     1569       !--PC:reads keys once: broadcasts config to all ranks
     1570       CALL ch4n2o_init()    ! reads getin_p, broadcasts configuration
     1571
     1572
    15651573       !AI 08 2023
    15661574#ifdef CPP_ECRAD
     
    46774685          !
    46784686          RCO2 = RCO2_act
     4687!          RCH4 = RCH4_act
     4688!          RN2O = RN2O_act
     4689#ifdef CPP_RRTM
     4690          ! PC
     4691          ! Only attempt to compute effective values if at least one
     4692          ! gas is actually routed as "effective"
     4693          IF (ok_CH4_eff_ppb .OR. ok_N2O_eff_ppb) THEN
     4694             ! ghg_year is provided by the driver (libIGCM); the transfer
     4695             ! functions currently ignore it and use it only for logging
     4696             CALL ch4n2o_compute(ghg_year, CH4_ppb, N2O_ppb, CH4_eff_ppb, N2O_eff_ppb)
     4697          END IF
     4698
     4699          ! CH4: choose which mass mixing ratio to feed RRTM
     4700          ! if "ok_CH4_eff_ppb" = .TRUE., we convert the effective
     4701          ! concentration (ppb) into a mass mixing ratio
     4702          ! Otherwise we use the "actual" RCH4_act
     4703          IF (ok_CH4_eff_ppb) THEN
     4704             RCH4 = CH4_eff_ppb * 1.0E-09 * RMCH4 / RMD
     4705             !RCH4_eff = CH4_eff_ppb * 1.0E-09 * RMCH4 / RMD
     4706          ELSE
     4707             RCH4 = RCH4_act
     4708          END IF
     4709
     4710          ! N2O: choose which mass mixing ratio to feed RRTM
     4711          ! if "ok_N2O_eff_ppb" = .TRUE., we convert the effective
     4712          ! concentration (ppb) into a mass mixing ratio
     4713          ! Othewise we use the "actual" RN2O_act           
     4714          IF (ok_N2O_eff_ppb) THEN
     4715             RN2O = N2O_eff_ppb * 1.0E-09 * RMN2O / RMD
     4716             !RN2O_eff = N2O_eff_ppb * 1.0E-09 * RMN2O / RMD
     4717          ELSE
     4718             RN2O = RN2O_act
     4719          END IF
     4720          ! PC
     4721#else
     4722          IF (ok_CH4_eff_ppb .OR. ok_N2O_eff_ppb .OR. &
     4723                  TRIM(ghg_mode) /= "identity") THEN
     4724
     4725                  abort_message = 'CH4/N2O effective mapping (ghg_mode=' // &
     4726                          TRIM(ghg_mode) // ') is only supported ' // &
     4727                          ' for RRTM (CPP_RRTM). Please recompile ' // &
     4728                          ' with -rrtm or set ok_CH4_eff_ppb=n, ' // &
     4729                          'ok_N2O_eff_ppb=n and ghg_mode="identity".'
     4730                  CALL abort_physic(modname,abort_message, 1)
     4731          ENDIF       
     4732
     4733          ! In all cases we feed the unmodified "actual" mixing ratios
     4734          ! to the radiation scheme when not using RRTM.
    46794735          RCH4 = RCH4_act
    46804736          RN2O = RN2O_act
     4737#endif
     4738
     4739
    46814740          RCFC11 = RCFC11_act
    46824741          RCFC12 = RCFC12_act
Note: See TracChangeset for help on using the changeset viewer.