bruceyoung01
Member
I noticed that there are several subroutines duplicated in src/core_atmosphere/physics/mpas_atmphys_rrtmg_swinit.F and src/core_atmosphere/physics/physics_wrf/module_ra_rrtmg_sw.F, such as
sw_kgb16
sw_kgb17
sw_kgb18
sw_kgb19
sw_kgb20
sw_kgb21
sw_kgb22
sw_kgb23
sw_kgb24
sw_kgb25
sw_kgb26
sw_kgb27
sw_kgb28
sw_kgb29
For example,
call sw_kgb16(rrtmg_unit,dminfo)
call sw_kgb17(rrtmg_unit,dminfo)
call sw_kgb18(rrtmg_unit,dminfo)
call sw_kgb19(rrtmg_unit,dminfo)
call sw_kgb20(rrtmg_unit,dminfo)
call sw_kgb21(rrtmg_unit,dminfo)
call sw_kgb22(rrtmg_unit,dminfo)
call sw_kgb23(rrtmg_unit,dminfo)
call sw_kgb24(rrtmg_unit,dminfo)
call sw_kgb25(rrtmg_unit,dminfo)
call sw_kgb26(rrtmg_unit,dminfo)
call sw_kgb27(rrtmg_unit,dminfo)
call sw_kgb28(rrtmg_unit,dminfo)
call sw_kgb29(rrtmg_unit,dminfo)
in mpas_atmphys_rrtmg_swinit.F from line 108 to 121.
Since you wrote this code, do you know why?
Thank you
sw_kgb16
sw_kgb17
sw_kgb18
sw_kgb19
sw_kgb20
sw_kgb21
sw_kgb22
sw_kgb23
sw_kgb24
sw_kgb25
sw_kgb26
sw_kgb27
sw_kgb28
sw_kgb29
For example,
call sw_kgb16(rrtmg_unit,dminfo)
call sw_kgb17(rrtmg_unit,dminfo)
call sw_kgb18(rrtmg_unit,dminfo)
call sw_kgb19(rrtmg_unit,dminfo)
call sw_kgb20(rrtmg_unit,dminfo)
call sw_kgb21(rrtmg_unit,dminfo)
call sw_kgb22(rrtmg_unit,dminfo)
call sw_kgb23(rrtmg_unit,dminfo)
call sw_kgb24(rrtmg_unit,dminfo)
call sw_kgb25(rrtmg_unit,dminfo)
call sw_kgb26(rrtmg_unit,dminfo)
call sw_kgb27(rrtmg_unit,dminfo)
call sw_kgb28(rrtmg_unit,dminfo)
call sw_kgb29(rrtmg_unit,dminfo)
in mpas_atmphys_rrtmg_swinit.F from line 108 to 121.
Since you wrote this code, do you know why?
Thank you