cumulus/arakawa_schubert_L1982.f90,183
module arakawa_schubert_L198212,374
  subroutine ArakawaSchubertL1982CalcCWFCrtl(121,3605
  subroutine ASL1982CalcCWFCrtl1D(213,6389
  subroutine ArakawaSchubertL1982Init289,8448

cumulus/moist_conv_adjust.f90,161
module moist_conv_adjust12,359
  subroutine MoistConvAdjust(127,4086
  subroutine MoistConvAdjustChkCons(700,28460
  subroutine MoistConvAdjustInit797,31644

cumulus/relaxed_arakawa_schubert.f90,1034
module relaxed_arakawa_schubert12,349
  subroutine RAS(163,5262
  subroutine RASChkCons(1440,53191
  subroutine RAS1DHeight(1546,56639
  subroutine RASEntParam(1597,57975
  subroutine RASHeight(1680,60995
  subroutine RAS1DWrapper3D(1729,62502
  subroutine RAS1D(2123,78248
  subroutine RAS1DChkCons(3359,121258
  subroutine RASEntParam1D(3454,124044
  subroutine RASWithIce1DWrapper3DWrapper(3521,126238
  subroutine RASWithIce1DWrapper3D(3849,137775
  subroutine RASWithIce1D(4319,155469
  subroutine RASWithIce1DChkCons(5430,198930
  subroutine RASWithIce1DModMassFlux(5581,203578
  subroutine RASWithIce1DCore01(5712,208104
  subroutine RASWithIce1DCore02(6868,251382
  subroutine RASWithIce1DCore02MassFixer(7168,262385
  subroutine RASWithIce1DEntParam(7292,265811
  subroutine RASWithIceCalcPRCPStepPC1D(7445,270577
  subroutine RASWithIceNoEntCond1D(7584,274803
  subroutine RASWithIceNoEntCond1DCore01(8648,316059
  subroutine RASWithIceNoEntCond1DEntParam(9733,356519
  subroutine RASInit9902,362233

dryconv_adjust/dry_conv_adjust.f90,108
module dry_conv_adjust12,359
  subroutine DryConvAdjust(121,3742
  subroutine DryConvAdjustInit525,21014

dynamics/adv_test.f90,178
module adv_test12,329
  subroutine AdvTestSetHorVels(126,3735
  subroutine AdvTestSetVerVel(274,10288
  subroutine AdvTestSetICs(441,17027
  subroutine AdvTestInit625,22894

dynamics/dynamics_1d_utils.f90,213
module dynamics_1d_utils12,390
  subroutine Dynamics1DUtilsVerAdv(100,3150
  subroutine Dynamics1DUtilsVerInterp(158,4649
  subroutine Dynamics1DUtilsInit212,6196
  subroutine Dynamics1DUtilsFinalize291,8600

dynamics/dynamics_physicsonly.f90,125
module dynamics_physicsonly12,393
  subroutine DynamicsPhysicsOnly(103,2853
  subroutine DynamicsPhysicsOnlyInit326,11926

dynamics/dynamics_twpice_scm_exp.f90,289
module dynamics_twpice_scm_exp12,361
  subroutine DynamicsTWPICESCMExp(106,3216
  subroutine DynamicsTWPICESCMExpPsTInterp(405,14081
  subroutine DynamicsTWPICESCMExpPTInterp(508,16922
  subroutine DynamicsTWPICESCMExpInit627,20424
  subroutine DynamicsTWPICESCMExpFinalize861,28339

gwdrag/gwd_m1987.f90,124
module gwd_m198712,345
  subroutine GWDM1987(133,3885
  subroutine tridiag(720,25256
  subroutine GWDM1987Init762,26269

held_suarez_1994/held_suarez_1994.f90,134
module held_suarez_199412,405
  subroutine HS94Forcing(174,5991
  subroutine HS94Init330,11489
  subroutine HS94Finalize530,18299

held_suarez_1994/sl09_diffusion.f90,106
module sl09_diffusion12,374
  subroutine SL09Diffusion(114,3228
  subroutine SL09DiffusionInit298,9546

held_suarez_1994/yt2003_forcing.f90,579
module yt2003_forcing12,475
  subroutine YT2003Forcing(104,3160
  subroutine YT2003RadForcing(233,8423
  subroutine YT2003NCTempEq(425,14232
  subroutine YT2003NCCoef(462,15268
  subroutine YT2003DTempDtRadS(550,17986
  subroutine YT2003SurfFriction(623,20129
  function xyz_YT2003TempEq( xyz_h_in )697,22557
  function xyz_YT2003TempEq(697,22557
  function xyz_YT2003Q0( xyz_h_in )760,24693
  function xyz_YT2003Q0(760,24693
  subroutine YT2003ForcingInit818,26510
  subroutine VenusSimpleNCTempEq_old(1034,36028
  subroutine VenusSimpleDTempDtRadS_old(1168,39599

io/output_freq_used_vars.f90,124
module output_freq_used_vars12,347
  subroutine OutputFreqUsedVars(125,3569
  subroutine OutputFreqUsedVarsInit393,13012

io/read_time_series.f90,709
module read_time_series12,345
  type time_series_data94,2635
  interface SetValuesFromTimeSeriesWrapper137,4101
    module procedure SetValFromTimeSeriesWrapper0D, SetValFromTimeSeriesWrapper2D, SetValFromTimeSeriesWrapper3D138,4144
  subroutine SetValFromTimeSeriesWrapper0D(145,4375
  subroutine SetValFromTimeSeriesWrapper2D(194,5686
  subroutine SetValFromTimeSeriesWrapper3D(243,7018
  subroutine SetValFromTimeSeriesFindIndex(305,9062
  subroutine SetValuesFromTimeSeries(362,10461
  subroutine VerticalInterpolation(698,23845
  subroutine UpdateTime(935,30536
  subroutine InterpretTimeUnitString(1046,33769
  subroutine StructureInit(1173,37611
  subroutine ReadTimeSeriesInit1590,52281

io/restart_file_io.f90,272
module restart_file_io12,388
  subroutine RestartFileOpen(177,6830
  subroutine RestartFileOutput(693,29342
  subroutine InitialFileOutput(845,34931
  subroutine RestartFileClose953,38527
  subroutine RestartFileGet(986,39269
  subroutine RestartFileInit1452,58027

io/restart_surftemp_io.f90,253
module restart_surftemp_io12,435
  subroutine RestartSurfTempOpen(172,6726
  subroutine RestartSurfTempOutput(482,20094
  subroutine RestartSurfTempClose595,24210
  subroutine RestartSurfTempGet(627,24950
  subroutine RestartSurfTempInit872,34474

lscond/lscond.f90,445
module lscond12,451
  subroutine LScaleCond(118,3520
  subroutine LScaleCond1D3DWrapper(407,13480
  subroutine LScaleCond1D_BK(604,20644
  subroutine LScaleCond1D(901,30725
  subroutine LScaleCond1Grid(1024,34777
  subroutine LScaleCondLL911D3DWrapper(1320,44481
  subroutine LScaleCondLL911D(1617,54384
  subroutine LScaleCond1DConsChk(1935,65540
  subroutine LScaleCond1GridConsChk(2013,68104
  subroutine LScaleCondInit(2086,70391

lscond/lscond_LL91.f90,148
module lscond_LL9112,411
  subroutine LScaleCondLL91Ice(123,3859
  subroutine LScaleCondLL91(439,15053
  subroutine LScaleCondLL91Init808,27702

lscond/saturation_adjust.f90,117
module saturation_adjust12,300
  subroutine SaturationAdjust(104,2778
  subroutine SaturationAdjustInit(332,10642

main/dcpam_init_data.f90,67
  subroutine MainInit104,3068
  subroutine MainTerminate290,8219

main/dcpam_init_data_surface.f90,67
  subroutine MainInit144,4391
  subroutine MainTerminate319,9285

main/dcpam_main.f90,73
  subroutine MainInit2793,118691
  subroutine MainTerminate4947,189635

phy_implicit/phy_implicit.f90,102
module phy_implicit12,380
  subroutine PhyImplTendency(100,2740
  subroutine PhyImplInit(752,32130

phy_implicit/phy_implicit_atmonly.f90,123
module phy_implicit_atmonly12,480
  subroutine PhyImplAtmOnlyTendency(102,2963
  subroutine PhyImplAtmOnlyInit528,20865

phy_implicit/phy_implicit_sdh.f90,438
module phy_implicit_sdh12,487
  subroutine PhyImplSDHSetMethodFromMatthews(131,4207
  subroutine PhyImplSDHCorSOTempBySnowMelt(225,7011
  subroutine PhyImplSDHTendency(330,10249
  subroutine PhyImplSDHChkConservation(1265,52319
  subroutine PhyImplSDHIceSnowPhaseChangeCor(1746,70377
  subroutine PhyImplSDHSnowMeltCorrection(2462,97157
  subroutine PhyImplSDHSeaIceCorrection(3158,123028
  subroutine PhyImplSDHInit(3558,138835

phy_implicit/phy_implicit_sdh_V2.f90,615
module phy_implicit_sdh_V212,485
  subroutine PhyImplSDHV2SetMethodMatthews(137,4424
  subroutine PhyImplSDHV2CorSOTempBySnowMelt(231,7218
  subroutine PhyImplSDHV2Tendency(336,10463
  subroutine PhyImplSDHV2TendencyMomCore(1005,41733
  subroutine PhyImplSDHV2TendencyHeatCore(1222,49848
  subroutine PhyImplSDHV2TendencyHeatTQCore(2061,87537
  subroutine PhyImplSDHV2ChkConservation(2617,113127
  subroutine PhyImplSDHV2ChkConservationTQ(3108,131726
  subroutine PhyImplSDHV2IceSnowPhaseChgCor(3622,150850
  subroutine PhyImplSDHV2SeaIceCorrection(4412,180751
  subroutine PhyImplSDHV2Init(4812,196603

phy_implicit/phy_implicit_sdh_V3.f90,615
module phy_implicit_sdh_V312,484
  subroutine PhyImplSDHV3SetMethodMatthews(138,4519
  subroutine PhyImplSDHV3CorSOTempBySnowMelt(245,7871
  subroutine PhyImplSDHV3Tendency(356,11253
  subroutine PhyImplSDHV3TendencyMomCore(1064,43607
  subroutine PhyImplSDHV3TendencyHeatCore(1276,51511
  subroutine PhyImplSDHV3TendencyHeatTQCore(2121,89665
  subroutine PhyImplSDHV3ChkConservation(2681,115631
  subroutine PhyImplSDHV3ChkConservationTQ(3175,134562
  subroutine PhyImplSDHV3IceSnowPhaseChgCor(3691,153982
  subroutine PhyImplSDHV3SeaIceCorrection(4562,187661
  subroutine PhyImplSDHV3Init(4964,203687

phy_implicit/phy_implicit_utils.f90,194
module phy_implicit_utils12,427
  subroutine PhyImplEvalRadLFluxA(96,2721
  subroutine PhyImplLUDecomp3(185,5939
  subroutine PhyImplLUSolve3(238,7320
  subroutine PhyImplUtilsInit306,9177

prepare_data/initial_data.f90,234
module initial_data12,372
  subroutine SetInitData(177,6452
  subroutine Sugiyamaetal2008InitData(458,14486
  subroutine Polvanietal2004InitData(609,19404
  subroutine VenusInitData(911,29456
  subroutine InitDataInit1066,34192

prepare_data/initial_surface_data.f90,119
module initial_surface_data12,310
  subroutine SetInitSurfaceData(110,3180
  subroutine InitSurfaceDataInit207,6164

prepare_data/set_1d_profile.f90,274
module set_1d_profile12,386
  subroutine Set1DProfileAtm(117,3609
  subroutine Set1DProfilePs(169,4961
  subroutine Set1DProfileSurfTemp(195,5453
  subroutine Set1DProfileO3(221,5974
  subroutine Set1DProfileInterpolate(265,7071
  subroutine Set1DProfileInit348,9528

prepare_data/sigma_data.f90,215
module sigma_data12,337
  interface SigmaDataGetHalf73,1869
    module procedure SigmaDataGetHalf74,1898
  subroutine SigmaDataGetHalf(79,1963
  subroutine SigmaDataInit177,5669
  subroutine InitCheck212,6503

prepare_data/surface_data.f90,180
module surface_data12,338
  subroutine SetSurfData(148,4948
  subroutine Hosakaetal98SST(388,13979
  recursive subroutine NH00SST(526,18131
  subroutine SurfDataInit752,25692

radiation/ckd_module.f90,78
module ckd_module1,0
  type bandparam33,692
  subroutine ckd_input(57,1382

radiation/cloud_T1993base.f90,158
module cloud_T1993base12,350
  subroutine CloudT1993base(145,4332
  subroutine CloudT1993baseWithIce(721,28943
  subroutine CloudT1993baseInit(1526,63165

radiation/cloud_mars_h2o.f90,104
module cloud_mars_h2o12,318
  subroutine CloudMarsH2O(100,2505
  subroutine CloudMarsH2OInit166,4493

radiation/cloud_none.f90,176
module cloud_none12,303
  subroutine CloudNoneWithIce(112,2792
  subroutine CloudNone(241,7290
  subroutine CloudNoneConsChk(290,8968
  subroutine CloudNoneInit(416,13410

radiation/cloud_simple.f90,542
module cloud_simple12,309
  subroutine CloudSimple(134,3655
  subroutine CloudSimpleCalcPRCPKeyLLTemp(292,9759
  subroutine CloudSimpleCalcPRCPKeyLLTemp3D(353,11475
  subroutine CloudSimpleWithIce(503,16521
  subroutine CloudSimpleWithIceOld(665,22298
  subroutine CloudSimpleCalcPRCPStepPC(829,28826
  subroutine CloudSimpleEvap1Grid(1034,36834
  subroutine CloudSimpleConsChk(1167,41370
  subroutine CloudSimpleCalcCloudCover(1293,45802
  subroutine CloudSimpleDivideWatAndIce(1381,48268
  subroutine CloudSimpleInit(1427,49609

radiation/cloud_utils.f90,467
module cloud_utils11,314
  subroutine CloudUtilsCalcOverlapCloudTrans(114,3189
  subroutine CloudUtilsSmearCloudOptDep(353,11061
  subroutine CloudUtilsLocalizeCloud(385,11924
  subroutine CloudUtilsPRCPStepPC1Grid(417,12788
  subroutine CloudUtilsPRCPEvap1Grid(519,15916
  subroutine CloudUtilsPRCPEvap1GridCore(625,18731
  subroutine CloudUtilsPRCPEvap1GridCoreExp(839,25539
  subroutine CloudUtilConsChk(1000,31100
  subroutine CloudUtilsInit(1130,35755

radiation/gauss_quad.f90,54
module gauss_quad12,348
  subroutine GauLeg(87,2548

radiation/planck_func.f90,604
module planck_func12,330
  function aaa_PF( &97,2782
  function aaa_PF(97,2782
  function PF( WN, Temp ) result( Res )139,3862
  function PF(139,3862
  subroutine Integ_PF_GQ_Array3D(179,4728
  subroutine Integ_PF_GQ_Array2D(225,5874
  function DPFDT( &264,6759
  function DPFDT(264,6759
  function aaa_DPFDT( &302,7528
  function aaa_DPFDT(302,7528
  subroutine Integ_DPFDT_GQ_Array3D(342,8623
  subroutine Integ_DPFDT_GQ_Array2D(396,10041
  subroutine PlanckFuncPrepPFTable(448,12047
  subroutine CalcIntegratedPFWithTable2D(602,17018
  subroutine CalcIntegratedPFWithTable3D(646,18356

radiation/rad_15m_NLTE.f90,229
module rad_15m_NLTE11,367
  subroutine rad15mNLTE(175,6501
  subroutine rad15mNLTEMergeHR(368,13074
  subroutine rad15mNLTECalckMin(430,14900
  subroutine rad15mNLTECalcWeight(466,15778
  subroutine Rad15mNLTEInit522,17383

radiation/rad_C1998.f90,107
module rad_C199812,397
  subroutine RadC1998CalcCloudOptProp(219,6836
  subroutine RadC1998Init294,9227

radiation/rad_C2001.f90,500
module rad_C200112,371
  subroutine RadC2001CalcCloudOptProp(514,20592
  subroutine RadC2001ReduceCloudOptDep(587,22960
  subroutine RadC2001CalcTransBand3CO2(637,24207
  subroutine RadC2001CalcTransBand3H2O(697,26027
  subroutine RadC2001CalcTrans(765,28308
  subroutine RadC2001ContScaleH2OAmt(985,36391
  subroutine RadC2001LineScaleAmt(1027,37773
  subroutine RadC2001CalcIntegratedPF3D(1072,39257
  subroutine RadC2001CalcIntegratedPF2D(1154,41505
  subroutine RadC2001Init1198,42677

radiation/rad_CL1996.f90,288
module rad_CL199612,380
  subroutine RadCL1996NumBands(175,5300
  subroutine RadCL1996IRH2ONumKDFBin(198,5814
  subroutine RadCL1996ScaleH2OVapMass(219,6263
  subroutine RadCL1996IRH2OKDFParams(260,7530
  subroutine RadCL1996UVVISParams(302,8388
  subroutine RadCL1996Init342,9330

radiation/rad_DennouAGCM.f90,226
module rad_DennouAGCM12,452
  subroutine RadDennouAGCMFlux(251,10903
  subroutine LongFlux(606,22989
  subroutine ShortFlux(747,28367
  subroutine RadDennouAGCMInit(845,33123
  subroutine RadDennouAGCMFinalize1536,61784

radiation/rad_Earth_LW_V2_4.f90,270
module rad_Earth_LW_V2_412,387
  subroutine RadEarthLWV24Flux(167,4833
  subroutine RadEarthLWV24Init(900,32226
  subroutine RadEarthLWV24PrepPFTable1059,36508
  subroutine CalcIntegratedPFWithTable2D(1231,42369
  subroutine CalcIntegratedPFWithTable3D(1276,43607

radiation/rad_Earth_SW_V2_1.f90,114
module rad_Earth_SW_V2_111,387
  subroutine RadEarthSWV21Flux(130,4032
  subroutine RadEarthSWV21Init547,17598

radiation/rad_Earth_SW_V2_2.f90,115
module rad_Earth_SW_V2_211,387
  subroutine RadEarthSWV22Flux(132,4069
  subroutine RadEarthSWV22Init(643,21510

radiation/rad_Earth_SW_V2_3.f90,115
module rad_Earth_SW_V2_311,387
  subroutine RadEarthSWV23Flux(130,4032
  subroutine RadEarthSWV23Init(656,21794

radiation/rad_Earth_SW_V2_4.f90,115
module rad_Earth_SW_V2_411,387
  subroutine RadEarthSWV24Flux(131,4081
  subroutine RadEarthSWV24Init(854,28938

radiation/rad_Earth_SW_V2_6.f90,115
module rad_Earth_SW_V2_611,387
  subroutine RadEarthSWV26Flux(131,4132
  subroutine RadEarthSWV26Init(581,18743

radiation/rad_Earth_V2.f90,147
module rad_Earth_V211,361
  subroutine RadEarthV2Flux(125,3579
  subroutine RadEarthV2FluxCore(409,16021
  subroutine RadEarthV2Init(725,29536

radiation/rad_Mars_15m.f90,661
module rad_Mars_15m1,0
  subroutine RadMars15m(193,5934
  subroutine rad15m_lowatm_newscheme2006(246,7751
  subroutine calc_trans_mp_arr3d(686,21082
  subroutine calc_rteq_use_meantrans_arr3d(769,23232
  subroutine calc_lnp(838,25479
  subroutine m2ckdpindices(1223,36780
  subroutine getlnac_givenindices(1263,37570
  subroutine findindices(1345,40291
  subroutine findindices3D(1407,41729
  subroutine findindices2D(1434,42424
  subroutine getpf_arr3d_norat(1471,43391
  subroutine getpfr_givenindices(1527,44840
  subroutine getpfr_givenindices3D(1587,47027
  subroutine getpfr_givenindices2D(1617,47859
  subroutine RadMars15mInit2365,69327

radiation/rad_Mars_NIR.f90,136
module rad_Mars_NIR12,374
  subroutine RadMarsNIR(99,2822
  subroutine RadMarsNIRINOUT(258,7360
  subroutine RadMarsNIRInit315,8834

radiation/rad_Mars_V1.f90,100
module rad_Mars_V111,358
  subroutine RadMarsV1Flux(110,3404
  subroutine RadMarsV1Init811,27103

radiation/rad_SL09.f90,210
module rad_SL0911,354
  subroutine RadSL09Flux(109,3258
  subroutine OLD_RadSL09LWFlux(265,8518
  subroutine RadSL09LWFlux(431,13523
  subroutine RadSL09SWFlux(587,18996
  subroutine RadSL09Init625,20187

radiation/rad_none.f90,91
module rad_none11,350
  subroutine RadNoneFlux(88,2326
  subroutine RadNoneInit199,5637

radiation/rad_rte_nonscat.f90,348
module rad_rte_nonscat12,377
  subroutine RadRTENonScat(134,3941
  subroutine RadRTENonScatCore(271,8337
  subroutine RadRTENonScatAnotherForm(432,13786
  subroutine RadRTENonScatMonoWithDiffFact(605,20195
  subroutine RadRTENonScatMonoSemiAnal(755,25820
  subroutine RadRTENonScatWrapper(982,33649
  subroutine RadRTENonScatInit1128,39195

radiation/rad_rte_two_stream_app.f90,388
module rad_rte_two_stream_app11,343
  subroutine RadRTETwoStreamAppHomogAtm(139,4469
  subroutine RadRTETwoStreamAppSW(382,12862
  subroutine RadRTETwoStreamAppLW(438,14908
  subroutine RadRTETwoStreamAppWrapper(503,17589
  subroutine RadRTETwoStreamAppCore(683,24239
  subroutine tridiag(1521,55946
  subroutine tridiag1(1563,56959
  subroutine RadRTETwoStreamAppInit1598,57710

radiation/rad_short_income.f90,158
module rad_short_income12,384
  subroutine RadShortIncome(200,7259
  subroutine ShortIncomCalcOrbParam(465,16283
  subroutine RadShortIncomeInit602,21755

radiation/rad_simple.f90,98
module rad_simple12,314
  subroutine RadSimpleFlux(105,2981
  subroutine RadSimpleInit231,7213

radiation/rad_simple_LW.f90,150
module rad_simple_LW12,372
  subroutine RadSimpleLWFlux(152,5173
  subroutine OLD_RadSimpleLWFlux(368,13897
  subroutine RadSimpleLWInit578,22076

radiation/rad_simple_SW_V2_0.f90,117
module rad_simple_SW_V2_011,355
  subroutine RadSimpleSWV20Flux(107,2904
  subroutine RadSimpleSWV20Init363,10502

radiation/rad_utils.f90,222
module rad_utils12,377
  subroutine RadDTempDt(127,3549
  subroutine RadDTempDtforNHM(227,6701
  subroutine RadDTempDtforNHM2DWrapper(328,10064
  subroutine RadFluxOutput(399,12568
  subroutine RadUtilsInit618,21840

radiation/set_Mars_dust.f90,377
module set_Mars_dust11,298
  subroutine SetMarsDustCalcDOD067(122,3779
  subroutine SetMarsDustSetDOD067(203,5884
  subroutine SetMarsDustDODViking(398,11234
  subroutine SetMarsDustDODVikingNoDS(447,12202
  subroutine SetMarsDustDODMGS(470,12713
  subroutine SetMarsDustDSExp(697,19344
  subroutine SetMarsDustRegDSExp(726,19950
  subroutine SetMarsDustInit855,23651

radiation/set_gcmr.f90,88
module set_gcmr12,333
  subroutine SetGCMR(101,2906
  subroutine SetGCMRInit207,5246

radiation/set_o3.f90,81
module set_o312,304
  subroutine SetO3(96,2615
  subroutine SetO3Init202,5073

radiation/set_solarconst.f90,105
module set_solarconst12,329
  subroutine SetSolarConst(96,2688
  subroutine SetSolarConstInit173,4311

radiation/sort.f90,122
module sort11,319
  subroutine SortQuick(32,750
  recursive subroutine sort_quick0(65,1495
  subroutine swap(168,4240

saturate/major_comp_phase_change.f90,457
module major_comp_phase_change12,351
  subroutine MajorCompPhaseChangeInAtmTest(104,2876
  subroutine MajorCompPhaseChangeInAtmBK(406,13933
  subroutine MajorCompPhaseChangeInAtmBK2(596,19690
  subroutine MajorCompPhaseChangeInAtm(910,29466
  subroutine MajorCompPhaseChangeOnGround(1269,41295
  subroutine MajorCompPhaseChangeCalcFlow(1534,49573
  subroutine MajorCompPhaseChangeConsChk(1695,54707
  subroutine MajorCompPhaseChangeInit(1934,62596

saturate/saturate_DennouAGCM.f90,624
module saturate_DennouAGCM12,419
  function xyz_CalcQVapSatOnLiq( xyz_Temp, xyz_Press ) result( xyz_QVapSat )106,3240
  function xyz_CalcQVapSatOnLiq(106,3240
  function xyz_CalcDQVapSatDTempOnLiq( xyz_Temp, xyz_QVapSat ) result( xyz_DQVapSatDTemp )185,5746
  function xyz_CalcDQVapSatDTempOnLiq(185,5746
  function xyz_CalcQVapSatOnSol( xyz_Temp, xyz_Press ) result( xyz_QVapSat )259,8361
  function xyz_CalcQVapSatOnSol(259,8361
  function xyz_CalcDQVapSatDTempOnSol( xyz_Temp, xyz_QVapSat ) result( xyz_DQVapSatDTemp )334,10766
  function xyz_CalcDQVapSatDTempOnSol(334,10766
  subroutine SaturateInit404,13292

saturate/saturate_DennouAGCMExt.f90,328
module saturate_DennouAGCMExt12,422
  function xyz_CalcQVapSat( xyz_Temp, xyz_Press ) result( xyz_QVapSat )117,3566
  function xyz_CalcQVapSat(117,3566
  function xyz_CalcDQVapSatDTemp( xyz_Temp, xyz_QVapSat ) result( xyz_DQVapSatDTemp )179,5519
  function xyz_CalcDQVapSatDTemp(179,5519
  subroutine SaturateInit237,7680

saturate/saturate_DennouAGCMOnIce.f90,330
module saturate_DennouAGCMOnIce12,424
  function xyz_CalcQVapSat( xyz_Temp, xyz_Press ) result( xyz_QVapSat )107,3356
  function xyz_CalcQVapSat(107,3356
  function xyz_CalcDQVapSatDTemp( xyz_Temp, xyz_QVapSat ) result( xyz_DQVapSatDTemp )182,5756
  function xyz_CalcDQVapSatDTemp(182,5756
  subroutine SaturateInit252,8277

saturate/saturate_co2_p81.f90,201
module saturate_co2_p8112,334
  function xyz_SaturateCO2P81TempCond( xyz_Press ) result( xyz_TempCond )95,2542
  function xyz_SaturateCO2P81TempCond(95,2542
  subroutine SaturateCO2P81Init141,3702

saturate/saturate_major_comp.f90,399
module saturate_major_comp12,342
  interface SaturateMajorCompCalcCondTemp100,2849
    module procedure &101,2891
  subroutine SaturateMajorCompCalcCondTemp3D(111,3112
  subroutine SaturateMajorCompCalcCondTemp2D(170,4526
  function SaturateMajorCompInqLatentHeat( ) result( LatentHeat )227,6011
  function SaturateMajorCompInqLatentHeat(227,6011
  subroutine SaturateMajorCompInit(273,7034

saturate/saturate_nha1992.f90,621
module saturate_nha199212,429
  function xyz_CalcQVapSatOnLiq( xyz_Temp, xyz_Press ) result( xyz_QVapSat )149,5039
  function xyz_CalcQVapSatOnLiq(149,5039
  function xyz_CalcDQVapSatDTempOnLiq( xyz_Temp, xyz_QVapSat ) result( xyz_DQVapSatDTemp )208,6893
  function xyz_CalcDQVapSatDTempOnLiq(208,6893
  function xyz_CalcQVapSatOnSol( xyz_Temp, xyz_Press ) result( xyz_QVapSat )261,8736
  function xyz_CalcQVapSatOnSol(261,8736
  function xyz_CalcDQVapSatDTempOnSol( xyz_Temp, xyz_QVapSat ) result( xyz_DQVapSatDTemp )305,10046
  function xyz_CalcDQVapSatDTempOnSol(305,10046
  subroutine SaturateInit351,11637

setup/composition.f90,523
module composition12,351
  function CompositionInqIndex( Name ) result( Index )119,4055
  function CompositionInqIndex(119,4055
  function CompositionInqFlagMassFix( Index ) result( FlagMassFix )175,5350
  function CompositionInqFlagMassFix(175,5350
  function CompositionInqFlagAdv( Index ) result( FlagAdv )222,6411
  function CompositionInqFlagAdv(222,6411
  function CompositionInqFlagVDiff( Index ) result( FlagVDiff )269,7446
  function CompositionInqFlagVDiff(269,7446
  subroutine CompositionInit316,8495

setup/constants.f90,60
module constants12,317
  subroutine ConstantsInit147,5155

setup/constants0.f90,62
module constants012,362
  subroutine Constants0Init104,3303

setup/constants_snowseaice.f90,81
module constants_snowseaice12,349
  subroutine ConstantsSnowSeaIceInit117,3574

setup/fileset.f90,160
module fileset11,352
  interface FilesetInit93,2815
    module procedure FilesetInit94,2839
  subroutine FilesetInit99,2899
  subroutine InitCheck193,5916

setup/namelist_util.f90,135
module namelist_util12,387
  subroutine NmlutilInit(95,2989
  subroutine NmlutilMsg(154,4764
  subroutine NmlutilAryValid(196,6125

setup/option_parser.f90,95
module option_parser12,359
  subroutine OptParseInit(72,1990
  subroutine InitCheck173,5239

setup/timeset.f90,462
module timeset12,314
  subroutine TimesetInit255,11029
  subroutine TimesetDelTimeHalf660,25902
  subroutine TimesetProgress688,26647
  subroutine TimesetClose753,28427
  subroutine TimesetSetTimeN(806,29824
  subroutine TimesetSetInitialDate(894,32521
  subroutine TimesetSetCalendar(993,35909
  subroutine TimesetClockStart(1073,38457
  subroutine TimesetClockStop(1122,39838
  subroutine TimeValidCheck(1168,41116
  subroutine InitCheck1254,44390

sltt/sltt_const.f90,58
module sltt_const1,0
  subroutine SLTTConstInit132,3819

sltt/sltt_dp.f90,125
module sltt_dp13,273
  subroutine SLTTDPHor(66,1648
  subroutine SLTTDPHorCore(192,7052
  subroutine SLTTDPVer(363,14288

surface_flux/bucket_model.f90,430
module Bucket_Model12,309
  subroutine BucketSetFlagOceanFromMatthews(86,2594
  subroutine BucketIntegration(162,4712
  subroutine BucketPRCPAdjust(440,13790
  subroutine BucketModHumidCoef(590,18613
  subroutine BucketModEvapAndLatentHeatFlux(667,21297
  function BucketGetSoilMoistCritAmnt() result( OutSoilMoistCritAmnt )810,26921
  function BucketGetSoilMoistCritAmnt(810,26921
  subroutine BucketModelInit(846,27734

surface_flux/lb_flux_simple.f90,147
module lb_flux_simple12,332
  subroutine LBFluxSimple(140,4428
  subroutine SurfaceFluxOutput(378,13646
  subroutine LBFluxSimpleInit720,27900

surface_flux/set_dust_flux.f90,101
module set_dust_flux12,292
  subroutine SetDustFlux(188,6716
  subroutine SetDustFluxInit241,7745

surface_flux/subsurface_diffusion_heat.f90,129
module subsurface_diffusion_heat12,371
  subroutine SubsurfaceDiffusion(167,4858
  subroutine SubsurfaceDiffusionInit312,9931

surface_flux/surface_flux_bulk.f90,296
module surface_flux_bulk12,384
  subroutine SurfaceFlux(192,7013
  subroutine BulkCoef(588,23769
  subroutine BulkCoefL82(845,33144
  subroutine BulkCoefBH91B94(999,40035
  subroutine BH91CalcPsi(1345,53911
  subroutine SurfaceFluxOutput(1458,57538
  subroutine SurfaceFluxInit1842,74322

surface_flux/surface_flux_util.f90,122
module surface_flux_util12,358
  subroutine SurfaceFluxUtilLimitFlux(109,2943
  subroutine SurfaceFluxUtilInit248,7409

surface_properties/albedo_Matthews.f90,165
module albedo_Matthews12,408
  subroutine SetAlbedoMatthews(144,4674
  subroutine ModAlbedoMatthewsCultivation(306,9915
  subroutine AlbedoMatthewsInit490,16088

surface_properties/gabls.f90,93
module gabls12,290
  subroutine SetGabls2SurfTemp(115,2994
  subroutine GablsInit231,6103

surface_properties/modify_albedo_snowseaice.f90,132
module modify_albedo_snowseaice12,405
  subroutine ModAlbedoDueToSnowSeaIce(66,1783
  subroutine ModAlbedoSnowSeaIceInit255,8387

surface_properties/roughlen_Matthews.f90,177
module roughlen_Matthews12,399
  subroutine SetRoughLenLandMatthews(164,5647
  subroutine ModRoughLenMatthewsCultivation(277,8604
  subroutine RoughLenMatthewsInit362,11326

surface_properties/snowice_frac.f90,337
module snowice_frac12,312
  function SeaIceAboveThreshold( SeaIceConc ) result( FlagExist )72,1769
  function SeaIceAboveThreshold(72,1769
  subroutine CalcSnowFrac(95,2298
  subroutine CalcSfcLiqSolFrac(165,4598
  subroutine CalcSeaIceFrac(232,6694
  subroutine CalcMajCompIceFrac(295,8641
  subroutine SnowIceFracInit362,10798

surface_properties/soil_thermdiffcoef.f90,127
module soil_thermdiffcoef12,352
  subroutine SetSoilThermDiffCoefSimple(80,2197
  subroutine SoilThermDiffCoefInit(147,4455

surface_properties/surface_properties.f90,125
module surface_properties12,381
  subroutine SetSurfaceProperties(286,12359
  subroutine SurfacePropertiesInit(1865,73537

surface_properties/surface_properties_lo.f90,153
module surface_properties_lo12,436
  subroutine SetAlbedoLO(73,1909
  subroutine SetRoughLenLO(128,3490
  subroutine SurfacePropertiesLOInit183,5075

util/auxiliary.f90,186
module auxiliary12,435
  recursive subroutine AuxVars(112,3643
  subroutine AuxVarsInternalRoutine(443,16442
  subroutine AuxVarsInit541,19515
  subroutine AuxVarsFinalize668,23476

util/check_prog_vars.f90,107
module check_prog_vars12,345
  subroutine CheckProgVars(103,2802
  subroutine CheckProgVarsInit340,9930

util/intg_surftemp.f90,106
module intg_surftemp12,402
  subroutine IntegralSurfTemp(97,2830
  subroutine IntgSurfTempInit176,5275

util/mass_fixer.f90,468
module mass_fixer12,332
  subroutine MassFixerBC02(121,3075
  subroutine MassFixerBC02Layer(417,12995
  subroutine MassFixerBC02Column(703,22756
  subroutine MassFixerR95(1005,33151
  subroutine MassFixerR95Layer(1299,43634
  subroutine MassFixerR95Column(1593,54214
  subroutine MassFixerWO94(1886,64806
  subroutine MassFixer(2175,75038
  subroutine MassFixerLayer(2471,85904
  subroutine MassFixerColumn(2746,95987
  subroutine MassFixerInit3042,106902

util/timefilter_asselin1972.f90,149
module timefilter_asselin197212,376
  subroutine TimeFilter(166,5182
  subroutine TimeFilterSurfVars(281,9596
  subroutine TimeFiltInit395,13920

util/timefilter_williams2009.f90,189
module timefilter_williams200912,351
  subroutine TimeFilterWilliams2009(171,5506
  subroutine TimeFilterWilliams2009SurfVars(383,13881
  subroutine TimeFilterWilliams2009Init543,20429

util/vertical_filter.f90,109
module vertical_filter12,379
  subroutine VerticalFilter(163,5866
  subroutine VerticalFilterInit270,9361

vdiffusion/grav_sed.f90,207
module grav_sed11,326
  subroutine GravSed(129,3563
  function aaa_SedVel(                                                   &490,15995
  function aaa_SedVel(490,15995
  subroutine GravSedInit586,19073

vdiffusion/vdiffusion_my.f90,506
module vdiffusion_my12,422
  subroutine VDiffusionMY25(171,5932
  subroutine VDiffusionMY251DWrapper3D(912,38866
  subroutine VDiffusionMY251D(1174,49914
  subroutine VDiffusionMY25GBT94(1752,72530
  subroutine VDiffusion(2546,104921
  subroutine VDiffusionCalcFlux(2777,114204
  subroutine VDiffusionCalcFlux1D(2970,122202
  subroutine VDiffCoefficient(3163,129624
  subroutine VDiffusionExpTendency(3399,137565
  subroutine VDiffusionOutPut(3538,143177
  subroutine VDiffusionInit3803,154587

cumulus/cumulus_adjust.F90,194
module cumulus_adjust16,484
  interface Cumulus132,4156
    module procedure Cumulus133,4176
  subroutine Cumulus(138,4232
  subroutine CumAdjInit553,20078
  subroutine InitCheck684,24421

dynamics/dynamics_hspl_vas83.F90,514
module dynamics_hspl_vas8312,461
  subroutine DynamicsHSplVAS83(272,12018
  subroutine NonLinearOnGrid(1194,49861
  subroutine NonLinearOnGridQMix(1562,64951
  subroutine HydroGrid(1684,69907
  subroutine TimeIntegration(1740,71915
  subroutine TimeIntegrationQMix(2047,84837
  subroutine DivergenceDamping(2147,88742
  subroutine OutputDiagnosedVariables(2206,90519
  subroutine DynamicsHSplVAS83Init2562,106323
  subroutine DynamicsHSplVAS83Finalize3294,133488
  subroutine SemiImplMatrix3643,146022

io/history_file_io.F90,309
module history_file_io12,342
  interface HistoryFileOpen103,3644
    module procedure HistoryFileOpen104,3672
  interface HistoryFileClose107,3726
    module procedure HistoryFileClose108,3755
  subroutine HistoryFileOpen115,3892
  subroutine HistoryFileClose380,14408
  subroutine InitCheck411,15138

io/netcdf_wrapper.F90,562
module netcdf_wrapper12,326
  interface NWGetAtt65,1405
    module procedure NWGetAttChar, NWGetAttInteger66,1426
  function NWChkDim( &85,2070
  function NWChkDim(85,2070
  subroutine NWInqDimLen(131,3109
  subroutine NWGetAttChar(178,4269
  subroutine NWGetAttInteger(222,5515
  function NWPresentAVarInFile( ncfn, varname ) result( Flag )266,6770
  function NWPresentAVarInFile(266,6770
  subroutine NWHandleErr(333,8608
  subroutine NWOpen(353,9059
  subroutine NWClose(405,10325
  subroutine NWReDef(428,10707
  subroutine NWEndDef(453,11168

radiation/rad_CK1991.F90,197
module rad_CK199112,384
  subroutine RadCK1991CalcTrans(383,24115
  subroutine RadCK1991CalcTransCore(433,26003
  subroutine RadCK1991Interpolate(645,33692
  subroutine RadCK1991Init720,36377

radiation/rad_rrtmg_wrapper.F90,168
module rad_rrtmg_wrapper11,309
  subroutine RadRRTMGWrapperFlux(161,5251
  subroutine RadRRTMGWrapperFluxCore(453,17640
  subroutine RadRRTMGWrapperInit(1275,47357

saturate/saturate.F90,2741
module saturate12,327
  interface SaturateWatFraction163,4822
    module procedure &164,4854
  subroutine SaturateWatFraction3D(175,5169
  subroutine SaturateWatFraction0D(225,6552
  function xyz_CalcQVapSat( xyz_Temp, xyz_Press ) result( xyz_QVapSat )265,7481
  function xyz_CalcQVapSat(265,7481
  function xyz_CalcDQVapSatDTemp( xyz_Temp, xyz_QVapSat ) result( xyz_DQVapSatDTemp )327,9398
  function xyz_CalcDQVapSatDTemp(327,9398
  function xy_CalcQVapSat( xy_Temp, xy_Press ) result( xy_QVapSat )387,11637
  function xy_CalcQVapSat(387,11637
  function xy_CalcDQVapSatDTemp( xy_Temp, xy_QVapSat ) result( xy_DQVapSatDTemp )439,13087
  function xy_CalcDQVapSatDTemp(439,13087
  function a_CalcQVapSat( a_Temp, a_Press ) result( a_QVapSat )491,14833
  function a_CalcQVapSat(491,14833
  function a_CalcDQVapSatDTemp( a_Temp, a_QVapSat ) result( a_DQVapSatDTemp )542,16388
  function a_CalcDQVapSatDTemp(542,16388
  function CalcQVapSat( Temp, Press ) result( QVapSat )599,18375
  function CalcQVapSat(599,18375
  function CalcDQVapSatDTemp( Temp, QVapSat ) result( DQVapSatDTemp )650,19846
  function CalcDQVapSatDTemp(650,19846
  function xy_CalcQVapSatOnLiq( xy_Temp, xy_Press ) result( xy_QVapSat )709,21865
  function xy_CalcQVapSatOnLiq(709,21865
  function xy_CalcDQVapSatDTempOnLiq( xy_Temp, xy_QVapSat ) result( xy_DQVapSatDTemp )761,23330
  function xy_CalcDQVapSatDTempOnLiq(761,23330
  function a_CalcQVapSatOnLiq( a_Temp, a_Press ) result( a_QVapSat )813,25091
  function a_CalcQVapSatOnLiq(813,25091
  function a_CalcDQVapSatDTempOnLiq( a_Temp, a_QVapSat ) result( a_DQVapSatDTemp )864,26661
  function a_CalcDQVapSatDTempOnLiq(864,26661
  function CalcQVapSatOnLiq( Temp, Press ) result( QVapSat )921,28663
  function CalcQVapSatOnLiq(921,28663
  function CalcDQVapSatDTempOnLiq( Temp, QVapSat ) result( DQVapSatDTemp )972,30149
  function CalcDQVapSatDTempOnLiq(972,30149
  function xy_CalcQVapSatOnSol( xy_Temp, xy_Press ) result( xy_QVapSat )1031,32180
  function xy_CalcQVapSatOnSol(1031,32180
  function xy_CalcDQVapSatDTempOnSol( xy_Temp, xy_QVapSat ) result( xy_DQVapSatDTemp )1083,33645
  function xy_CalcDQVapSatDTempOnSol(1083,33645
  function a_CalcQVapSatOnSol( a_Temp, a_Press ) result( a_QVapSat )1135,35406
  function a_CalcQVapSatOnSol(1135,35406
  function a_CalcDQVapSatDTempOnSol( a_Temp, a_QVapSat ) result( a_DQVapSatDTemp )1186,36976
  function a_CalcDQVapSatDTempOnSol(1186,36976
  function CalcQVapSatOnSol( Temp, Press ) result( QVapSat )1243,38978
  function CalcQVapSatOnSol(1243,38978
  function CalcDQVapSatDTempOnSol( Temp, QVapSat ) result( DQVapSatDTemp )1294,40464
  function CalcDQVapSatDTempOnSol(1294,40464
  subroutine SaturateInit1351,42367

setup/axesset.F90,192
module axesset12,333
  subroutine AxessetInit223,9723
  subroutine AxessetFinalize738,28830
  function format_print( ary, size ) result(result)780,30081
  function format_print(780,30081

setup/gridset.F90,179
module gridset12,398
  subroutine GridsetInit129,4469
  subroutine GridsetCalcjmax291,9454
  subroutine GridsetCheckNumberOfLatGrid(369,11016
  subroutine InitCheck470,13538

setup/mpi_wrapper.F90,1202
module mpi_wrapper12,314
  interface MPIWrapperISend82,2014
    module procedure &83,2042
  interface MPIWrapperIRecv92,2292
    module procedure &93,2320
  interface MPIWrapperFindMaxVal102,2570
    module procedure &103,2603
  interface MPIWrapperChkTrue107,2678
    module procedure &108,2708
  interface MPIWrapperAbort112,2775
    module procedure &113,2803
  subroutine MPIWrapperInit122,2966
  subroutine MPIWrapperFinalize157,3524
  subroutine MPIWrapperStop184,3931
  subroutine MPIWrapperWait(213,4418
  subroutine MPIWrapperISend_logical_1d(245,4980
  subroutine MPIWrapperIRecv_logical_1d(300,6377
  subroutine MPIWrapperISend_int_1d(356,7783
  subroutine MPIWrapperIRecv_int_1d(412,9173
  subroutine MPIWrapperISend_dble_1d(468,10571
  subroutine MPIWrapperIRecv_dble_1d(524,11971
  subroutine MPIWrapperISend_dble_2d(580,13379
  subroutine MPIWrapperIRecv_dble_2d(638,14882
  subroutine MPIWrapperISend_dble_3d(696,16399
  subroutine MPIWrapperIRecv_dble_3d(756,18005
  subroutine MPIWrapperISend_dble_4d(815,19626
  subroutine MPIWrapperIRecv_dble_4d(877,21335
  subroutine MPIWrapperFindMaxVal_dble_1d(940,23065
  subroutine MPIWrapperChkTrue_1d(1048,25627

sltt/sltt.F90,288
module sltt12,318
  subroutine SLTTMain(214,8038
  function SLTTHorAdv( xyzf_QMix, xyz_U, xyz_V,      & ! (in)651,25127
  function SLTTHorAdv(651,25127
  function SLTTVerAdv( xyr_SigmaDot, xyzf_QMix,     &1112,51023
  function SLTTVerAdv(1112,51023
  subroutine SLTTInit1393,64009

sltt/sltt_extarr.F90,456
module sltt_extarr11,286
  subroutine SLTTExtArrInit(114,3562
  subroutine SLTTExtArrPrepGlobalArray(468,15587
  subroutine SLTTExtShareiScalar(609,19132
  function FindGlobalJIndex(             &669,20456
  function FindGlobalJIndex(669,20456
  function MkSendRecvDestTag( irank, jlocalindex, hemisphere ) result( itag )700,21303
  function MkSendRecvDestTag(700,21303
  subroutine SLTTExtArrExt(747,22506
  subroutine SLTTExtArrExt2(1021,32614

sltt/sltt_lagint.F90,1238
module sltt_lagint12,353
  subroutine SLTTLagIntCubCalcFactHor(431,16126
  subroutine SLTTLagIntCubIntHor(631,24687
  subroutine SLTTLagIntCubCalcFactVer(698,27523
  subroutine SLTTLagIntCubIntVer(802,31128
  subroutine SLTTLagIntHorMaxMin(843,32286
  subroutine SLTTIrrLinInt(957,37629
  subroutine SLTTIrrHerIntK13(1073,43077
  function SLTTHerIntCub2D(f, fx, fy, fxy, dx, dy, Xix, Xiy) result (fout)1296,55670
  function SLTTHerIntCub2D(1296,55670
  function SLTTHerIntCub1D(f1, f2, g1, g2, dx, Xi) result (fout)1333,56857
  function SLTTHerIntCub1D(1333,56857
  function SLTTIrrHerIntQui2DHor(f, fx, fy, fxy, dy21, dy23, dy24, Xix, Xiy) result (fout)1423,59999
  function SLTTIrrHerIntQui2DHor(1423,59999
  function SLTTIrrHerIntQui1DUni(f1, f2, f3, f4, g2, g3, dx, Xi) result (fout)1508,63427
  function SLTTIrrHerIntQui1DUni(1508,63427
  function SLTTIrrHerIntQui1DUniLon(f1, f2, f3, f4, g2, g3, Xi) result (fout)1555,65084
  function SLTTIrrHerIntQui1DUniLon(1555,65084
  function SLTTIrrHerIntQui1DNonUni(f1, f2, f3, f4, g2, g3, dx21, dx23, dx24, Xi) result (fout)1602,66807
  function SLTTIrrHerIntQui1DNonUni(1602,66807
  subroutine SLTTLagIntChkDPLon(1703,69944
  subroutine SLTTLagIntChkDPLat(1771,72124

util/intavr_operate.F90,682
module intavr_operate12,358
  function a_IntLonLat_xya( xya_Data )141,4595
  function a_IntLonLat_xya(141,4595
  function IntLonLat_xy( xy_Data )170,5409
  function IntLonLat_xy(170,5409
  function ya_IntLon_xya( xya_Data )196,6187
  function ya_IntLon_xya(196,6187
  function y_IntLon_xy( xy_Data )243,7672
  function y_IntLon_xy(243,7672
  function a_IntLat_ya( ya_Data )283,8933
  function a_IntLat_ya(283,8933
  function IntLat_y( y_Data )381,11406
  function IntLat_y(381,11406
  function a_IntLat_ya( ya_Data )471,13550
  function a_IntLat_ya(471,13550
  function IntLat_y( y_Data )507,14431
  function IntLat_y(507,14431
  subroutine IntAvrOprInit987,29575

util/rearrange_column.F90,109
module rearrange_column12,301
  subroutine RearrangeColumn(118,3372
  subroutine RearrangeColumn(230,6175

vdiffusion/vdiffusion_jma_my_wrapper.F90,129
module vdiffusion_jma_my_wrapper12,344
  subroutine VDiffusionJMAMYWrapper3D(116,3472
  subroutine VDiffusionJMAInit520,19955