Skipping 357 KB..
Full LogTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTest
80, Generating implicit firstprivate(bflx,moisture_flx,heat_flx)
NVFORTRAN-W-0435-Array declared with zero size (../src/clubb_driver.F90: 450)
run_clubb:
2449, Generating copy(rtpthlp_forcing(:,:)) [if not already present]
Generating copyin(exner(:,:),gr%zm(:,:),gr) [if not already present]
Generating copy(ug(:,:),vg(:,:),t_sfc(:)) [if not already present]
Generating copyin(gr%zt(:,:)) [if not already present]
Generating copy(p_sfc(:),thlp2_forcing(:,:)) [if not already present]
Generating copyin(rho(:,:)) [if not already present]
Generating copy(upwp_sfc(:)) [if not already present]
Generating copyin(rho_zm(:,:)) [if not already present]
Generating copy(wm_zm(:,:)) [if not already present]
Generating copyin(thvm(:,:),veg_t_in_k(:)) [if not already present]
Generating copy(um_forcing(:,:),vm_forcing(:,:)) [if not already present]
Generating copyin(thlm(:,:)) [if not already present]
Generating copy(rtm(:,:)) [if not already present]
Generating copyin(um(:,:),vm(:,:)) [if not already present]
Generating copy(vpwp_sfc(:),wm_zt(:,:),wprtp_sfc(:),rtm_forcing(:,:),thlm_forcing(:,:),rtp2_forcing(:,:),wpthlp_forcing(:,:),wprtp_forcing(:,:),um_ref(:,:),vm_ref(:,:)) [if not already present]
Generating copyin(sclr_idx,p_in_pa(:,:)) [if not already present]
Generating copy(wpthlp_sfc(:)) [if not already present]
2455, Generating copy(sclrm_forcing(:,:,:),wpsclrp(:,:,:),wpsclrp_sfc(:,:)) [if not already present]
2458, Generating copy(wpedsclrp_sfc(:,:),edsclrm_forcing(:,:,:)) [if not already present]
2716, Generating copyout(lh_thl_clipped(:,:,:),x_nl_all_levs(:,:,:,:),x_mixt_comp_all_levs(:,:,:),lh_rv_clipped(:,:,:),lh_rc_clipped(:,:,:),lh_sample_point_weights(:,:,:),lh_nc_clipped(:,:,:),lh_rt_clipped(:,:,:)) [if not already present]
Generating copyin(hm_metadata) [if not already present]
2820, Generating copyout(skw_zm(:,:)) [if not already present]
Generating copyin(wp3_zm(:,:),wp2(:,:),clubb_params(:,:)) [if not already present]
prescribe_forcings:
5413, Generating enter data create(thlm_bot(:),um_bot(:),vm_bot(:),z_bot(:),exner_bot(:),rtm_bot(:),rho_bot(:),ustar(:),ubar(:))
5428, Generating implicit firstprivate(ngrdcol,nzt)
Generating NVIDIA GPU code
5429, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5430, ! blockidx%x threadidx%x collapsed
5428, Generating default present(thlm_forcing(:ngrdcol,:nzt),rtm_forcing(:ngrdcol,:nzt))
5436, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
5437, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5438, ! blockidx%x threadidx%x collapsed
5436, Generating default present(rtp2_forcing(:ngrdcol,:nzm),rtpthlp_forcing(:ngrdcol,:nzm),wpthlp_forcing(:ngrdcol,:nzm),wprtp_forcing(:ngrdcol,:nzm),thlp2_forcing(:ngrdcol,:nzm))
5467, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5468, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5467, Generating default present(thlm_forcing(:ngrdcol,nzt),rtm_forcing(:ngrdcol,nzt))
5468, Generating implicit firstprivate(nzt)
5516, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5517, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5518, ! blockidx%x threadidx%x collapsed
5516, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),rtm_forcing(:ngrdcol,:gr%nzt),gr)
5540, Generating update self(p_in_pa(:,:))
5546, Generating update device(rtm_forcing(:,:),um_ref(:,:),thlm_forcing(:,:),edsclrm_forcing(:,:,:),sclrm_forcing(:,:,:),vm_ref(:,:),wm_zt(:,:),wm_zm(:,:))
5564, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5565, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5566, ! blockidx%x threadidx%x collapsed
5564, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),rtm_forcing(:ngrdcol,:gr%nzt),gr)
5573, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
5574, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5575, ! blockidx%x threadidx%x collapsed
5576, !$acc loop seq
5573, Generating default present(sclrm_forcing(:ngrdcol,:gr%nzt,:sclr_dim),gr)
5576, Loop is parallelizable
5584, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
5585, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5586, ! blockidx%x threadidx%x collapsed
5587, !$acc loop seq
5584, Generating default present(gr,edsclrm_forcing(:ngrdcol,:gr%nzt,:edsclr_dim))
5587, Loop is parallelizable
5665, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5666, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5665, Generating default present(ustar(:ngrdcol))
5689, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5690, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5689, Generating default present(ustar(:ngrdcol))
5703, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5704, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5703, Generating default present(ustar(:ngrdcol))
5725, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5726, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5725, Generating default present(ustar(:ngrdcol))
5855, Generating update self(rho_bot(:))
5858, Generating update device(ustar(:),wpthlp_sfc(:),wprtp_sfc(:))
5916, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5917, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5916, Generating default present(wpthlp_sfc(:ngrdcol),wprtp_sfc(:ngrdcol))
5917, Generating implicit firstprivate(sens_ht,latent_ht)
5923, Generating implicit firstprivate(ngrdcol,nzm)
Generating NVIDIA GPU code
5924, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5925, ! blockidx%x threadidx%x collapsed
5923, Generating default present(wpsclrp(:ngrdcol,:nzm,sclr_idx%iisclr_thl),sclr_idx)
5925, Generating implicit firstprivate(sens_ht)
5932, Generating implicit firstprivate(ngrdcol,nzm)
Generating NVIDIA GPU code
5933, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5934, ! blockidx%x threadidx%x collapsed
5932, Generating default present(wpsclrp(:ngrdcol,:nzm,sclr_idx%iisclr_rt),sclr_idx)
5934, Generating implicit firstprivate(latent_ht)
5945, Generating update self(rho_zm(:,:),upwp_sfc(:),ustar(:),t_sfc(:),vpwp_sfc(:),wpthlp_sfc(:),wprtp_sfc(:))
5975, Generating exit data delete(thlm_bot(:),um_bot(:),z_bot(:),vm_bot(:),exner_bot(:),rtm_bot(:),rho_bot(:),ustar(:),ubar(:))
read_surface_var_for_bc:
6080, Generating create(thlm_zm(:,:),um_zm(:,:),vm_zm(:,:),k_min(:),rtm_zm(:,:),exner_zm(:,:)) [if not already present]
6085, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6086, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6085, Generating default present(exner_bot(:ngrdcol),gr,z_bot(:ngrdcol),vm_bot(:ngrdcol),thlm_bot(:ngrdcol),um(:ngrdcol,:1),um_bot(:ngrdcol),vm(:ngrdcol,:1),rho_zm(:ngrdcol,:1),rtm(:ngrdcol,:1),rtm_bot(:ngrdcol),thlm(:ngrdcol,:1),rho_bot(:ngrdcol),p_sfc(:ngrdcol),gr%zt(1:ngrdcol,1))
6105, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6106, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6113, !$acc loop seq
6105, Generating default present(gr,z_bot(:ngrdcol),gr%zt(1:ngrdcol,:))
6106, Generating implicit firstprivate(k,min_val)
6113, Loop carried scalar dependence for min_val at line 6114
Loop carried reuse of k_min prevents parallelization
6123, Generating update self(k_min(:))
6156, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6157, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6156, Generating default present(gr,rho_bot(:ngrdcol),p_sfc(:ngrdcol),exner_bot(:ngrdcol),z_bot(:),vm_bot(:ngrdcol),thlm_bot(:ngrdcol),um_bot(:ngrdcol),rtm_bot(:ngrdcol),rho_zm(:ngrdcol,:))
6157, Generating implicit firstprivate(k00,km1,kp2,kp1)
ar: creating /home/jenkins/workspace/clubb_BFB_multi_col_gpu_nvhpc_test/compile/../lib/libclubb_other.a
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 218)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 222)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 275)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 278)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/pdf_parameter_tests.F90: 413)
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
91 : call run_clubb( ngrdcol, calls_per_out, clubb_params, namelist_filename, l_stdout, l_output_multi_col )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/clubb_standalone.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Expected read_random_seed for end function.
CLUBBStandardsCheck.pl WARNING: Endings of either program, module, subroutine, or function blocks to not match the beginning
../src/error.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
165 : call stat_update_var_pt( stats_metadata%isfc_soil_T_in_K, 1, sfc_soil_T_in_K(i), stats_sfc(i) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
166 : call stat_update_var_pt( stats_metadata%ideep_soil_T_in_K, 1, deep_soil_T_in_K(i), stats_sfc(i) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
200 : call stat_update_var_pt( stats_metadata%isoil_heat_flux, 1, soil_heat_flux(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
201 : stats_sfc(i) ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/soil_vegetation.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
381 : um(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
383 : vm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
385 : ugm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
387 : vgm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
389 : thlm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
391 : rtm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
393 : press(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
396 : wm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
413 : edsclr_snd(km1,edsclr), edsclr_snd(k00,edsclr), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
414 : edsclr_snd(kp1,edsclr), edsclr_snd(kp2,edsclr) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
438 : um(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), u(k_above), u(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
439 : vm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), v(k_above), v(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
440 : ugm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), ug(k_above), ug(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
441 : vgm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), vg(k_above), vg(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
442 : thlm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), theta(k_above), theta(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
443 : rtm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), rt(k_above), rt(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
444 : press(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), p_in_Pa(k_above), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
446 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
450 : sclrm(i,k,sclr) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
456 : edsclrm(i,k,edsclr) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
485 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
511 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/sounding.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
45 : subroutine run_clubb ( ngrdcol, calls_per_out, clubb_params, runfile, l_stdout, l_output_multi_col, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1733 : allocate( um_ref(ngrdcol, gr%nzt) ) ! Reference u wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1734 : allocate( vm_ref(ngrdcol, gr%nzt) ) ! Reference v wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2215 : ! Initialize statistics output, note that this will allocate/initialize stats variables for all
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2236 : ! Initialize statistics output, note that this will allocate/initialize stats variables for all
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2410 : wp2_zt = max( zm2zt( gr%nzm, gr%nzt, ngrdcol, gr, wp2 ), w_tol_sqd ) ! Positive definite quantity
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2426 : um(i,:), vm(i,:), rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2449 : !$acc data copyin( sclr_idx, gr, gr%zt, gr%zm, um, vm, thlm, p_in_Pa, exner, rho, thvm, rho_zm, veg_T_in_K ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2622 : call setup_pdf_parameters( gr, gr%nzm, gr%nzt, ngrdcol, pdf_dim, hydromet_dim, dt_main, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2623 : Nc_in_cloud, cloud_frac, Kh_zm, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2624 : ice_supersat_frac, hydromet, wphydrometp, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2625 : corr_array_n_cloud, corr_array_n_below, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2626 : hm_metadata, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2627 : pdf_params, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2628 : clubb_params, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2629 : clubb_config_flags%iiPDF_type, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2630 : l_use_precip_frac, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2631 : clubb_config_flags%l_predict_upwp_vpwp, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2632 : clubb_config_flags%l_diagnose_correlations, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2633 : clubb_config_flags%l_calc_w_corr, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2634 : clubb_config_flags%l_const_Nc_in_cloud, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2635 : clubb_config_flags%l_fix_w_chi_eta_correlations, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2636 : stats_metadata, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2637 : stats_zt, stats_zm, stats_sfc, & ! In/Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2643 : precip_fracs, & ! In/Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2644 : hydromet_pdf_params ) ! Optional(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2664 : stats_zt(i), stats_zm(i), & ! In/Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2665 : rtphmp_zt(i,:,:), thlphmp_zt(i,:,:), wp2hmp(i,:,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2777 : wp2_zt = max( zm2zt( gr%nzm, gr%nzt, ngrdcol, gr, wp2 ), w_tol_sqd ) ! Positive definite quantity
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2783 : thlm(i,:), p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), rtm(i,:), &! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2784 : rcm(i,:), cloud_frac(i,:), wm_zt(i,:), wm_zm(i,:), wp2_zt(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2785 : hydromet(i,:,:), Nc_in_cloud(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2801 : stats_zt(i), stats_zm(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2802 : stats_sfc(i), stats_lh_zt(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2803 : Nccnm(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2804 : hydromet_mc(i,:,:), Ncm_mc(i,:), rcm_mc(i,:), rvm_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2805 : thlm_mc(i,:), hydromet_vel_zt(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2806 : hydromet_vel_covar_zt_impc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2807 : hydromet_vel_covar_zt_expc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2808 : wprtp_mc(i,:), wpthlp_mc(i,:), rtp2_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2809 : thlp2_mc(i,:), rtpthlp_mc(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2847 : hydromet(i,:,:), hydromet_vel_zt(i,:,:), hydrometp2(i,:,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2848 : K_hm(i,:,:), Ncm(i,:), Nc_in_cloud(i,:), rvm_mc(i,:), thlm_mc(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2905 : call stat_update_var( stats_metadata%iwprtp_mc, wprtp_mc, stats_zm(i) ) ! m*(kg/kg)/s^2
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2929 : time_current, time_initial, rho(i,:), rho_zm(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2930 : p_in_Pa(i,:), exner(i,:), cloud_frac(i,:), ice_supersat_frac(i,:), X_nl_all_levs(i,:,:,:), & !In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2932 : lh_sample_point_weights(i,:,:), hydromet(i,:,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2933 : stats_metadata, stats_sfc(i), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2934 : radht(i,:), Frad(i,:), Frad_SW_up(i,:), Frad_LW_up(i,:), Frad_SW_down(i,:), Frad_LW_down(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2961 : call update_radiation_variables( gr%nzm, gr%nzt, radht, Frad_SW_up(i,:), Frad_LW_up(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2990 : if ( ( stats_metadata%l_stats_last .or. stats_metadata%l_stats .or. l_output_multi_col ) .and. l_stdout ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5413 : !$acc enter data create( um_bot, vm_bot, rtm_bot, thlm_bot, rho_bot, exner_bot, z_bot, ustar, ubar )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5546 : !$acc update device( wm_zt, wm_zm, thlm_forcing, rtm_forcing, um_ref, vm_ref, sclrm_forcing, edsclrm_forcing )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5640 : !gr%zt(1,2), 299.8_core_rknd, 101540._core_rknd, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5948 : call stat_update_var_pt( stats_metadata%ish, 1, wpthlp_sfc(i)*rho_zm(i,1)*Cp,& ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5951 : call stat_update_var_pt( stats_metadata%ilh, 1, wprtp_sfc(i)*rho_zm(i,1)*Lv, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5954 : call stat_update_var_pt( stats_metadata%iwpthlp_sfc, 1, wpthlp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5957 : call stat_update_var_pt( stats_metadata%iwprtp_sfc, 1, wprtp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5960 : call stat_update_var_pt( stats_metadata%iupwp_sfc, 1, upwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5963 : call stat_update_var_pt( stats_metadata%ivpwp_sfc, 1, vpwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5966 : call stat_update_var_pt( stats_metadata%iustar, 1, ustar(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5969 : call stat_update_var_pt( stats_metadata%iT_sfc, 1, T_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5975 : !$acc exit data delete( um_bot, vm_bot, rtm_bot, thlm_bot, rho_bot, exner_bot, z_bot, ustar, ubar )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6177 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6181 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6185 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6186 : exner_zm(i,km1), exner_zm(i,k00), exner_zm(i,kp1), exner_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6189 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6190 : thlm_zm(i,km1), thlm_zm(i,k00), thlm_zm(i,kp1), thlm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6193 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6194 : rtm_zm(i,km1), rtm_zm(i,k00), rtm_zm(i,kp1), rtm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6863 : hm_metadata, stats_metadata, stats_sfc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/clubb_driver.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Missing 'implicit none' statements. 'Implicit None' check FAILED!
CLUBBStandardsCheck.pl Add a line containing 'implicit none' to each program, module, subroutine, and function.
../src/CLUBB_core/mt95.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
718 : ! MONOFLUX TEST COMMENT DO NOT REMOVE if( any(wpxp_net_adjust /= 0.0) ) write(fstderr,*) "MONOFLUX: wpxp adjusted "
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/mono_flux_limiter.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1277 : status = nf90_def_var( ncid_zm, "columns", NF90_DOUBLE, (/column_id_zm/), column_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1278 : status = nf90_def_var( ncid_zm, "altitude", NF90_DOUBLE, (/vertical_id_zm/), vertical_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1279 : status = nf90_def_var( ncid_zm, "time", NF90_DOUBLE, (/time_id_zm/), time_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1336 : status = nf90_def_var( ncid_zt, "columns", NF90_DOUBLE, (/column_id_zt/), column_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1337 : status = nf90_def_var( ncid_zt, "altitude", NF90_DOUBLE, (/vertical_id_zt/), vertical_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1338 : status = nf90_def_var( ncid_zt, "time", NF90_DOUBLE, (/time_id_zt/), time_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1390 : status = nf90_put_var( ncid_zm, column_var_id_zm, column_list, start=(/1/), count=(/ngrdcol/) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1391 : status = nf90_put_var( ncid_zt, column_var_id_zt, column_list, start=(/1/), count=(/ngrdcol/) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1393 : !=================================== Allocate Output Arrays ===================================
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1460 : !!$acc upwp_out, vpwp_out, up2_out, vp2_out, wp3_out, rcm_out, cloud_frac_out, rtm_out, thlm_out )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/output_netcdf.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1548 : !$acc data copyin( C_uu_shr_zeros, C_uu_shr_plus_one, C11_Skw_fnc_zeros, C11_Skw_fnc_plus_one ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1571 : lhs_wp3_pr2_term ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2677 : !$acc data copyin( C_uu_buoy_zeros, C_uu_buoy_plus_one, C11_Skw_fnc_zeros, C11_Skw_fnc_plus_one ) &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_wp2_wp3_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
709 : call stats_zero( stats_zt(i)%ii, stats_zt(i)%jj, stats_zt(i)%kk, stats_zt(i)%num_output_fields, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
710 : stats_zt(i)%accum_field_values, stats_zt(i)%accum_num_samples, stats_zt(i)%l_in_update ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
738 : call open_netcdf_for_writing( nlat, nlon, fdir, fname, 1, stats_zt(1)%kk, stats_zt(1)%z, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
817 : allocate( stats_lh_zt(i)%l_in_update( stats_lh_zt(i)%ii, stats_lh_zt(i)%jj, stats_lh_zt(i)%kk, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1148 : call stats_zero( stats_zm(i)%ii, stats_zm(i)%jj, stats_zm(i)%kk, stats_zm(i)%num_output_fields, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1149 : stats_zm(i)%accum_field_values, stats_zm(i)%accum_num_samples, stats_zm(i)%l_in_update ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1174 : call open_netcdf_for_writing( nlat, nlon, fdir, fname, 1, stats_zm(1)%kk, stats_zm(1)%z, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1238 : stats_rad_zt(i)%accum_num_samples, stats_rad_zt(i)%l_in_update )! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1325 : stats_rad_zm(i)%accum_num_samples, stats_rad_zm(i)%l_in_update ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1415 : call stats_zero( stats_sfc(i)%ii, stats_sfc(i)%jj, stats_sfc(i)%kk, stats_sfc(i)%num_output_fields, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1416 : stats_sfc(i)%accum_field_values, stats_sfc(i)%accum_num_samples, stats_sfc(i)%l_in_update ) ! out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1440 : call open_netcdf_for_writing( nlat, nlon, fdir, fname, 1, stats_sfc(1)%kk, stats_sfc(1)%z, & ! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_clubb_utilities.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1916 : rhs_bp ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1921 : call wpxp_terms_bp_pr3_rhs( nzm, ngrdcol, C7_Skw_fnc_plus_one, thv_ds_zm, xpthvp, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1922 : rhs_pr3 ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_xm_wpxp_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4228 : ( any(abs(params(:,iC1) - params(:,iC14)) > abs(params(:,iC1) + params(:,iC14)) / 2 * eps) .or. &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_clubb_core_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
144 : else if ( gr%zt(i,k) > z_inversion(i) .and. gr%zt(i,k) <= z_inversion(i)+300._core_rknd ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
172 : else if ( gr%zt(i,k) > z_inversion(i) .and. gr%zt(i,k) <= z_inversion(i)+300._core_rknd ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
227 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
228 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/atex.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
127 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
128 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/bomex.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
132 : ! sat_mixrat_liq( p_sfc, T_in_K ) * 0.8_core_rknd )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/cloud_feedback.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
91 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
92 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/dycoms2_rf01.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
121 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
122 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/dycoms2_rf02.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
152 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
153 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/gabls2.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
96 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
97 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
176 : wpthlp_sfc(i) = convert_sens_ht_to_km_s( ( 270._core_rknd * ft**1.5_core_rknd ), rho_sfc(i) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
177 : wprtp_sfc(i) = convert_latent_ht_to_m_s( ( 554._core_rknd * ft**1.3_core_rknd ), rho_sfc(i) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/lba.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
157 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
158 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/mpace_b.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
272 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
273 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/mpace_a.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
104 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
105 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/wangara.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
159 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
160 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/rico.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
.......................................................................................................................................................................................................................................................................................................................................................................................................................................................................................NVFORTRAN-W-0170-PGI Fortran extension: Unary + or - follows binary + or - (/home/jenkins/workspace/clubb_BFB_multi_col_gpu_nvhpc_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90: 5502)
0 inform, 1 warnings, 0 severes, 0 fatal for calculate_thlp2_rad
advance_clubb_core:
882, Generating enter data create(lhs_splat_wp2(:,:),kmh_zm(:,:),mixt_frac_zm(:,:),tau_max_zm(:,:),stability_correction(:,:),lscale_down(:,:),rcp2_zt(:,:),a3_coef_zt(:,:),brunt_vaisala_freq_sqd_splat(:,:),brunt_vaisala_freq_sqd_moist(:,:),brunt_vaisala_freq_sqd_smth(:,:),brunt_vaisala_freq_sqd_mixed(:,:),brunt_vaisala_freq_sqd(:,:),brunt_vaisala_freq_sqd_dry(:,:),brunt_vaisala_freq_clipped(:,:),cloud_frac_zm(:,:),invrs_tau_wp3_zm(:,:),invrs_tau_xp2_zm(:,:),invrs_tau_no_n2_zm(:,:),invrs_tau_sfc(:,:),ice_supersat_frac_zm(:,:),invrs_tau_n2_zm(:,:),invrs_tau_wp2_zm(:,:),invrs_tau_wp3_zt(:,:),invrs_tau_shear(:,:),invrs_tau_bkgnd(:,:),invrs_tau_c1_zm(:,:),invrs_tau_c6_zm(:,:),invrs_tau_wpxp_zm(:,:),invrs_tau_c14_zm(:,:),invrs_tau_c4_zm(:,:),invrs_tau_n2_iso(:,:),sqrt_em_zt(:,:),rc_coef(:,:),thlm1000(:),tau_zt(:,:),rcm_supersat_adj(:,:),thlm700(:),ri_zm(:,:),gamma_skw_fnc(:,:),brunt_vaisala_freq_sqd_zt(:,:),rcp2(:,:),lscale_zm(:,:),varnce_w_1_zm(:,:),upwp_zt(:,:),w_1_zm(:,:),vpwp_zt(:,:),wpthlp_zt(:,:),skw_zt(:,:),sigma_sqd_w_tmp(:,:),sigma_sqd_w(:,:),rtpthlp_zt(:,:),em(:,:),km_zm(:,:),invrs_tau_zt(:,:),mu(:),wp3_on_wp2(:,:),wp2rcp(:,:),a3_coef(:,:),sigma_sqd_w_zt(:,:),vp2_zt(:,:),up2_zt(:,:),varnce_w_2_zm(:,:),thvm_zm(:,:),rtprcp(:,:),rtm_zm(:,:),wprtp2(:,:),wpthlp2(:,:),thlm_zm(:,:),w_2_zm(:,:),tau_zm(:,:),tau_max_zt(:,:),ddzt_vm(:,:),lhs_splat_wp3(:,:),lscale_up(:,:),lscale_max(:),wp3_on_wp2_zt(:,:),wp2_zt(:,:),wprtp_zt(:,:),wp3_zm(:,:),wprtpthlp(:,:),ddzt_umvm_sqd(:,:),ddzt_um(:,:),ddzt_umvm_sqd_clipped(:,:),ddzm_thvm_zm(:,:),rcm_zm(:,:),rtp2_zt(:,:),cx_fnc_richardson(:,:),thvm(:,:),thlp2_zt(:,:),skw_zm(:,:),skw_velocity(:,:),xp3_coef_fnc(:,:))
903, Generating enter data create(wpsclrp2(:,:,:),wpsclrprtp(:,:,:),wpsclrp_zt(:,:),wp2sclrp(:,:,:),sclrprcp(:,:,:),sclrp2_zt(:,:),wpsclrpthlp(:,:,:))
907, Generating enter data create(wpedsclrp(:,:,:))
924, Generating update self(rtm(:,:),rho_ds_zt(:,:),gr%dzt(:,:),thlm(:,:),wm_zm(:,:),wm_zt(:,:))
951, Generating update self(rtp2(:,:),thlm_forcing(:,:),rtm_forcing(:,:),wp2(:,:),wm_zt(:,:),wprtp_sfc(:),rtpthlp(:,:),wp3(:,:),rho_zm(:,:),vm_forcing(:,:),um_forcing(:,:),vp2(:,:),upwp_sfc(:),up2(:,:),thv_ds_zt(:,:),p_in_pa(:,:),vpwp(:,:),upwp(:,:),wprtp(:,:),wpthlp(:,:),thv_ds_zm(:,:),thlp2(:,:),invrs_rho_ds_zm(:,:),exner(:,:),rho_ds_zm(:,:),rho(:,:),p_sfc(:),rho_ds_zt(:,:),invrs_rho_ds_zt(:,:),wm_zm(:,:),vpwp_sfc(:),vm(:,:),um(:,:),rtm(:,:),thlm(:,:),wpthlp_sfc(:))
958, Generating update self(sclrm(:,:,:),sclrprtp(:,:,:),sclrp2(:,:,:),sclrm_forcing(:,:,:),wpedsclrp_sfc(:,:),sclrpthlp(:,:,:),wpsclrp(:,:,:),wpsclrp_sfc(:,:))
962, Generating update self(edsclrm_forcing(:,:,:),edsclrm(:,:,:))
995, Generating update self(wp2(:,:),upwp(:,:),thlp2(:,:),rtpthlp(:,:),rfrzm(:,:),rtp2(:,:),thlm(:,:),rtm(:,:),vp2(:,:),up2(:,:),wprtp(:,:),wpthlp(:,:),wp3(:,:),um(:,:),vm(:,:),vpwp(:,:))
1056, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
1057, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
1056, Generating default present(wpthlp(:ngrdcol,:1),wpthlp_sfc(:ngrdcol),wprtp_sfc(:ngrdcol),wprtp(:ngrdcol,:1),vpwp_sfc(:ngrdcol),upwp(:ngrdcol,:1),vpwp(:ngrdcol,:1),upwp_sfc(:ngrdcol))
1066, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
1067, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
1066, Generating default present(upwp_pert(:ngrdcol,:1),vpwp_sfc_pert(:ngrdcol),vpwp_pert(:ngrdcol,:1),upwp_sfc_pert(:ngrdcol))
1076, Generating implicit firstprivate(ngrdcol,sclr_dim)
Generating NVIDIA GPU code
1077, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1078, ! blockidx%x threadidx%x collapsed
1076, Generating default present(wpsclrp(:ngrdcol,:1,:sclr_dim),wpsclrp_sfc(:ngrdcol,:sclr_dim))
1086, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
1087, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1088, ! blockidx%x threadidx%x collapsed
1086, Generating default present(wpedsclrp_sfc(:ngrdcol,:edsclr_dim),wpedsclrp(:ngrdcol,:1,:edsclr_dim))
1097, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
1098, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
1097, Generating default present(wprtp(:ngrdcol,:1),wpthlp(:ngrdcol,:1),vpwp(:ngrdcol,:1),upwp(:ngrdcol,:1))
1108, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
1109, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1110, ! blockidx%x threadidx%x collapsed
1108, Generating default present(wpsclrp(:ngrdcol,:1,:sclr_dim))
1118, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
1119, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1120, ! blockidx%x threadidx%x collapsed
1118, Generating default present(wpedsclrp(:ngrdcol,:1,:edsclr_dim))
1136, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
1137, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
1136, Generating default present(mu(:ngrdcol),clubb_params(:ngrdcol,60))
1244, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1245, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1246, ! blockidx%x threadidx%x collapsed
1244, Generating default present(skw_zm(:ngrdcol,:nzm),gamma_skw_fnc(:ngrdcol,:nzm),clubb_params(:ngrdcol,57:59))
1246, Generating implicit firstprivate(gamma_coef,gamma_coefc,gamma_coefb)
1300, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1301, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1302, ! blockidx%x threadidx%x collapsed
1300, Generating default present(sigma_sqd_w(:ngrdcol,:nzm),a3_coef(:ngrdcol,:nzm))
1311, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1312, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1313, ! blockidx%x threadidx%x collapsed
1311, Generating default present(clubb_params(:ngrdcol,98),a3_coef(:ngrdcol,:nzm))
1334, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
1335, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1336, ! blockidx%x threadidx%x collapsed
1334, Generating default present(wp3_on_wp2_zt(:ngrdcol,:nzt),wp3(:ngrdcol,:nzt),wp2_zt(:ngrdcol,:nzt))
1343, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
1344, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1345, ! blockidx%x threadidx%x collapsed
1343, Generating default present(wp3_on_wp2_zt(:ngrdcol,:nzt))
1374, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1375, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1376, ! blockidx%x threadidx%x collapsed
1374, Generating default present(wp2(:ngrdcol,:nzm),em(:ngrdcol,:nzm))
1382, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1383, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1384, ! blockidx%x threadidx%x collapsed
1382, Generating default present(up2(:ngrdcol,:nzm),wp2(:ngrdcol,:nzm),vp2(:ngrdcol,:nzm),em(:ngrdcol,:nzm))
1394, Generating implicit firstprivate(ngrdcol,nzt)
Generating NVIDIA GPU code
1395, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1396, ! blockidx%x threadidx%x collapsed
1394, Generating default present(sqrt_em_zt(:ngrdcol,:nzt))
1425, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1426, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1427, ! blockidx%x threadidx%x collapsed
1425, Generating default present(ddzt_um(:ngrdcol,:nzm),ddzt_vm(:ngrdcol,:nzm),ddzt_umvm_sqd(:ngrdcol,:nzm))
1434, Generating update self(ddzt_umvm_sqd(:,:))
1498, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
1499, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1500, ! blockidx%x threadidx%x collapsed
1498, Generating default present(tau_zt(:ngrdcol,:nzt),sqrt_em_zt(:ngrdcol,:nzt),lscale(:ngrdcol,:nzt),clubb_params(:ngrdcol,69))
1508, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1509, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1510, ! blockidx%x threadidx%x collapsed
1508, Generating default present(lscale_zm(:ngrdcol,:nzm),tau_zm(:ngrdcol,:nzm),clubb_params(:ngrdcol,69),em(:ngrdcol,:nzm))
1517, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1518, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1519, ! blockidx%x threadidx%x collapsed
1517, Generating default present(invrs_tau_zm(:ngrdcol,:nzm),invrs_tau_wp2_zm(:ngrdcol,:nzm),invrs_tau_wp3_zm(:ngrdcol,:nzm),invrs_tau_wpxp_zm(:ngrdcol,:nzm),clubb_params(:ngrdcol,69),invrs_tau_xp2_zm(:ngrdcol,:nzm),tau_zm(:ngrdcol,:nzm),tau_max_zm(:ngrdcol,:nzm))
1530, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
1531, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1532, ! blockidx%x threadidx%x collapsed
1530, Generating default present(invrs_tau_zt(:ngrdcol,:nzt),clubb_params(:ngrdcol,69),invrs_tau_wp3_zt(:ngrdcol,:nzt),tau_zt(:ngrdcol,:nzt),tau_max_zt(:ngrdcol,:nzt))
1588, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
1589, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1590, ! blockidx%x threadidx%x collapsed
1588, Generating default present(clubb_params(:ngrdcol,37),kh_zt(:ngrdcol,:nzt),sqrt_em_zt(:ngrdcol,:nzt),lscale(:ngrdcol,:nzt))
1598, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1599, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1600, ! blockidx%x threadidx%x collapsed
1598, Generating default present(em(:ngrdcol,:nzm),lscale_zm(:ngrdcol,:nzm),kh_zm(:ngrdcol,:nzm),clubb_params(:ngrdcol,37))
1661, Generating update self(exner(:,:),thlm(:,:),rtm(:,:),p_in_pa(:,:),rcm(:,:))
1694, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1695, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1696, ! blockidx%x threadidx%x collapsed
1694, Generating default present(mixt_frac_zm(:ngrdcol,:nzm),pdf_params_zm,varnce_w_1_zm(:ngrdcol,:nzm),pdf_params_zm%varnce_w_1(1:ngrdcol,1:nzm),pdf_params_zm%w_2(1:ngrdcol,1:nzm),pdf_params_zm%mixt_frac(1:ngrdcol,1:nzm),w_1_zm(:ngrdcol,:nzm),w_2_zm(:ngrdcol,:nzm),pdf_params_zm%w_1(1:ngrdcol,1:nzm),varnce_w_2_zm(:ngrdcol,:nzm),pdf_params_zm%varnce_w_2(1:ngrdcol,1:nzm))
1732, Generating update self(stability_correction(:,:))
1743, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1744, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1745, ! blockidx%x threadidx%x collapsed
1743, Generating default present(invrs_tau_c1_zm(:ngrdcol,:nzm),invrs_tau_c6_zm(:ngrdcol,:nzm),stability_correction(:ngrdcol,:nzm),invrs_tau_zm(:ngrdcol,:nzm),invrs_tau_n2_zm(:ngrdcol,:nzm))
1753, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1754, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1755, ! blockidx%x threadidx%x collapsed
1753, Generating default present(invrs_tau_c6_zm(:ngrdcol,:nzm),invrs_tau_c1_zm(:ngrdcol,:nzm),invrs_tau_wpxp_zm(:ngrdcol,:nzm),invrs_tau_wp2_zm(:ngrdcol,:nzm))
1765, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1766, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1767, ! blockidx%x threadidx%x collapsed
1765, Generating default present(invrs_tau_wp2_zm(:ngrdcol,:nzm),invrs_tau_c14_zm(:ngrdcol,:nzm))
1783, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1784, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1785, ! blockidx%x threadidx%x collapsed
1783, Generating default present(invrs_tau_wp2_zm(:ngrdcol,:nzm),invrs_tau_c4_zm(:ngrdcol,:nzm))
1802, Generating update self(brunt_vaisala_freq_sqd_moist(:,:),brunt_vaisala_freq_sqd(:,:),brunt_vaisala_freq_sqd_mixed(:,:),brunt_vaisala_freq_sqd_dry(:,:),brunt_vaisala_freq_sqd_smth(:,:),invrs_tau_sfc(:,:),invrs_tau_no_n2_zm(:,:),brunt_vaisala_freq_sqd_splat(:,:),invrs_tau_bkgnd(:,:),invrs_tau_wp2_zm(:,:),ri_zm(:,:),invrs_tau_zm(:,:),invrs_tau_wp3_zm(:,:),invrs_tau_shear(:,:),invrs_tau_wpxp_zm(:,:),invrs_tau_xp2_zm(:,:))
1880, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
1881, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
1882, ! blockidx%x threadidx%x collapsed
1880, Generating default present(cx_fnc_richardson(:ngrdcol,:nzm))
2201, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
2202, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2203, ! blockidx%x threadidx%x collapsed
2201, Generating default present(kmh_zm(:ngrdcol,:nzm),km_zm(:ngrdcol,:nzm),kh_zm(:ngrdcol,:nzm),clubb_params(:ngrdcol,74:75))
2212, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
2213, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2214, ! blockidx%x threadidx%x collapsed
2212, Generating default present(edsclrm(:ngrdcol,:nzt,edsclr_dim-1:edsclr_dim),thlm(:ngrdcol,:nzt),rtm(:ngrdcol,:nzt))
2214, Generating implicit firstprivate(edsclr_dim)
2254, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
2255, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2256, ! blockidx%x threadidx%x collapsed
2254, Generating default present(rtm(:ngrdcol,:nzt),edsclrm(:ngrdcol,:nzt,edsclr_dim-1:edsclr_dim),thlm700(:ngrdcol),thlm1000(:ngrdcol),thlm(:ngrdcol,:nzt))
2256, Generating implicit firstprivate(edsclr_dim)
2586, Generating update self(cloud_frac_zm(:,:),cloudy_downdraft_frac(:,:),vpwp_zt(:,:),w_down_in_cloud(:,:),sigma_sqd_w_zt(:,:),wp3_on_wp2(:,:),wp3_on_wp2_zt(:,:),a3_coef(:,:),cloudy_updraft_frac(:,:),rcm_zm(:,:),rtp3(:,:),thlp3(:,:),ice_supersat_frac_zm(:,:),skw_velocity(:,:),wp3_zm(:,:),wp2up2(:,:),wp2thvp(:,:),wpup2(:,:),wpthvp(:,:),wprtp2(:,:),wpthlp2(:,:),sigma_sqd_w(:,:),wprtp_zt(:,:),wp2_zt(:,:),kh_zm(:,:),tau_zm(:,:),lscale(:,:),lscale_down(:,:),wp2rcp(:,:),wp2rtp(:,:),kh_zt(:,:),upwp_zt(:,:),thvm(:,:),thv_ds_zt(:,:),rtpthvp(:,:),rcm_in_layer(:,:),a3_coef_zt(:,:),rcm(:,:),ice_supersat_frac(:,:),cloud_frac(:,:),exner(:,:),cloud_cover(:,:),rcm_supersat_adj(:,:),pdf_params_zm%w_2(:,:),rc_coef(:,:),wp4(:,:),rc_coef_zm(:,:),w_up_in_cloud(:,:),wm_zm(:,:),thv_ds_zm(:,:),thlpthvp(:,:),rho_ds_zm(:,:),rho(:,:),rho_ds_zt(:,:),rcp2(:,:),em(:,:),lscale_up(:,:),thlprcp(:,:),rtpthlp_zt(:,:),wp2thlp(:,:),wpthlp_zt(:,:),rtpthlp(:,:),rtprcp(:,:),thlp2_zt(:,:),thlp2(:,:),thlm_zm(:,:),rtp2_zt(:,:),rtp2(:,:),rtm_zm(:,:),wp3(:,:),wp2vp2(:,:),wp2(:,:),wm_zt(:,:),wpthlp(:,:),wprtpthlp(:,:),wprtp(:,:),wprcp(:,:),rtm(:,:),rho_zm(:,:),thlm(:,:),tau_zt(:,:),vp2(:,:),up2(:,:),vpwp(:,:),vp2_zt(:,:),upwp(:,:),up2_zt(:,:),vm(:,:),vg(:,:),um(:,:),ug(:,:),pdf_params_zm%ice_supersat_frac_1(:,:),pdf_params_zm%cthl_2(:,:),pdf_params_zm%ice_supersat_frac_2(:,:),pdf_params_zm%cloud_frac_1(:,:),pdf_params_zm%chi_2(:,:),pdf_params_zm%rc_1(:,:),pdf_params_zm%mixt_frac(:,:),pdf_params_zm%rsatl_1(:,:),pdf_params_zm%rc_2(:,:),pdf_params_zm%corr_chi_eta_1(:,:),pdf_params_zm%cloud_frac_2(:,:),pdf_params_zm%corr_w_eta_1(:,:),pdf_params_zm%corr_w_chi_2(:,:),pdf_params_zm%corr_w_chi_1(:,:),pdf_params_zm%corr_rt_thl_2(:,:),pdf_params_zm%covar_chi_eta_1(:,:),pdf_params_zm%corr_w_thl_2(:,:),pdf_params_zm%stdev_eta_1(:,:),pdf_params_zm%stdev_chi_2(:,:),pdf_params_zm%stdev_chi_1(:,:),pdf_params_zm%rt_2(:,:),pdf_params_zm%chi_1(:,:),pdf_params_zm%alpha_thl(:,:),pdf_params_zm%cthl_1(:,:),pdf_params_zm%crt_2(:,:),pdf_params_zm%crt_1(:,:),pdf_params_zm%covar_chi_eta_2(:,:),pdf_params%w_2(:,:),pdf_params_zm%alpha_rt(:,:),pdf_params_zm%corr_rt_thl_1(:,:),pdf_params_zm%corr_chi_eta_2(:,:),pdf_params_zm%corr_w_thl_1(:,:),pdf_params_zm%corr_w_rt_2(:,:),pdf_params_zm%corr_w_rt_1(:,:),pdf_params_zm%corr_w_eta_2(:,:),pdf_params_zm%varnce_thl_1(:,:),pdf_params_zm%varnce_rt_2(:,:),pdf_params_zm%thl_1(:,:),pdf_params_zm%stdev_eta_2(:,:),pdf_params_zm%varnce_rt_1(:,:),pdf_params_zm%thl_2(:,:),pdf_params_zm%rt_1(:,:),pdf_params_zm%rsatl_2(:,:),pdf_params_zm%varnce_w_1(:,:),pdf_params_zm%varnce_thl_2(:,:),pdf_params_zm%w_1(:,:),pdf_params_zm%varnce_w_2(:,:),pdf_params%ice_supersat_frac_1(:,:),pdf_params%cthl_2(:,:),pdf_params%ice_supersat_frac_2(:,:),pdf_params%cloud_frac_1(:,:),pdf_params%chi_2(:,:),pdf_params%rc_1(:,:),pdf_params%mixt_frac(:,:),pdf_params%rsatl_1(:,:),pdf_params%rc_2(:,:),pdf_params%corr_chi_eta_1(:,:),pdf_params%cloud_frac_2(:,:),pdf_params%corr_w_eta_1(:,:),pdf_params%corr_w_chi_2(:,:),pdf_params%corr_w_chi_1(:,:),pdf_params%corr_rt_thl_2(:,:),pdf_params%covar_chi_eta_1(:,:),pdf_params%corr_w_thl_2(:,:),pdf_params%stdev_eta_1(:,:),pdf_params%stdev_chi_2(:,:),pdf_params%stdev_chi_1(:,:),pdf_params%rt_2(:,:),pdf_params%chi_1(:,:),pdf_params%alpha_thl(:,:),pdf_params%cthl_1(:,:),pdf_params%crt_2(:,:),pdf_params%crt_1(:,:),pdf_params%covar_chi_eta_2(:,:),p_in_pa(:,:),pdf_params%alpha_rt(:,:),pdf_params%corr_rt_thl_1(:,:),pdf_params%corr_chi_eta_2(:,:),pdf_params%corr_w_thl_1(:,:),pdf_params%corr_w_rt_2(:,:),pdf_params%corr_w_rt_1(:,:),pdf_params%corr_w_eta_2(:,:),pdf_params%varnce_thl_1(:,:),pdf_params%varnce_rt_2(:,:),pdf_params%thl_1(:,:),pdf_params%stdev_eta_2(:,:),pdf_params%varnce_rt_1(:,:),pdf_params%thl_2(:,:),pdf_params%rt_1(:,:),pdf_params%rsatl_2(:,:),pdf_params%varnce_w_1(:,:),pdf_params%varnce_thl_2(:,:),pdf_params%w_1(:,:),pdf_params%varnce_w_2(:,:),wpvp2(:,:))
2656, Generating update self(wp2sclrp(:,:,:),wpsclrprtp(:,:,:),wpsclrp2(:,:,:),wpsclrp(:,:,:),sclrpthvp(:,:,:),sclrp2(:,:,:),wpedsclrp(:,:,:),sclrpthlp(:,:,:),sclrm(:,:,:),sclrprtp(:,:,:),sclrprcp(:,:,:),sclrm_forcing(:,:,:),wpsclrpthlp(:,:,:))
2661, Generating update self(edsclrm_forcing(:,:,:),edsclrm(:,:,:))
2788, Generating update self(rtp2(:,:),thlm_forcing(:,:),rtm_forcing(:,:),wp2(:,:),wm_zt(:,:),wprtp_sfc(:),rtpthlp(:,:),wp3(:,:),rho_zm(:,:),vm_forcing(:,:),um_forcing(:,:),vp2(:,:),upwp_sfc(:),up2(:,:),thv_ds_zt(:,:),p_in_pa(:,:),vpwp(:,:),upwp(:,:),wprtp(:,:),wpthlp(:,:),thv_ds_zm(:,:),thlp2(:,:),invrs_rho_ds_zm(:,:),exner(:,:),rho_ds_zm(:,:),rho(:,:),p_sfc(:),rho_ds_zt(:,:),invrs_rho_ds_zt(:,:),wm_zm(:,:),vpwp_sfc(:),vm(:,:),um(:,:),rtm(:,:),thlm(:,:),wpthlp_sfc(:))
2795, Generating update self(sclrm(:,:,:),sclrprtp(:,:,:),sclrp2(:,:,:),sclrm_forcing(:,:,:),wpedsclrp_sfc(:,:),sclrpthlp(:,:,:),wpsclrp(:,:,:),wpsclrp_sfc(:,:))
2799, Generating update self(edsclrm_forcing(:,:,:),edsclrm(:,:,:))
2831, Generating update self(thlm(:,:),rtm_forcing(:,:),rtm(:,:),rho_ds_zt(:,:),rho_ds_zm(:,:),wprtp_sfc(:),wprtp(:,:),wm_zt(:,:),thlm_forcing(:,:),wm_zm(:,:))
2903, Generating exit data delete(wpsclrp2(:,:,:),wpsclrprtp(:,:,:),wpsclrp_zt(:,:),wp2sclrp(:,:,:),sclrprcp(:,:,:),sclrp2_zt(:,:),wpsclrpthlp(:,:,:))
2907, Generating exit data delete(wpedsclrp(:,:,:))
2910, Generating exit data delete(lhs_splat_wp2(:,:),kmh_zm(:,:),mixt_frac_zm(:,:),tau_max_zm(:,:),stability_correction(:,:),lscale_down(:,:),rcp2_zt(:,:),a3_coef_zt(:,:),brunt_vaisala_freq_sqd_splat(:,:),brunt_vaisala_freq_sqd_moist(:,:),brunt_vaisala_freq_sqd_smth(:,:),brunt_vaisala_freq_sqd_mixed(:,:),brunt_vaisala_freq_sqd(:,:),brunt_vaisala_freq_sqd_dry(:,:),brunt_vaisala_freq_clipped(:,:),cloud_frac_zm(:,:),invrs_tau_wp3_zm(:,:),invrs_tau_xp2_zm(:,:),invrs_tau_no_n2_zm(:,:),invrs_tau_sfc(:,:),ice_supersat_frac_zm(:,:),invrs_tau_n2_zm(:,:),invrs_tau_wp2_zm(:,:),invrs_tau_wp3_zt(:,:),invrs_tau_shear(:,:),invrs_tau_bkgnd(:,:),invrs_tau_c1_zm(:,:),invrs_tau_c6_zm(:,:),invrs_tau_wpxp_zm(:,:),invrs_tau_c14_zm(:,:),invrs_tau_c4_zm(:,:),invrs_tau_n2_iso(:,:),sqrt_em_zt(:,:),rc_coef(:,:),thlm1000(:),tau_zt(:,:),rcm_supersat_adj(:,:),thlm700(:),ri_zm(:,:),gamma_skw_fnc(:,:),brunt_vaisala_freq_sqd_zt(:,:),rcp2(:,:),lscale_zm(:,:),varnce_w_1_zm(:,:),upwp_zt(:,:),w_1_zm(:,:),vpwp_zt(:,:),xp3_coef_fnc(:,:),wpthlp_zt(:,:),skw_zt(:,:),sigma_sqd_w(:,:),rtpthlp_zt(:,:),em(:,:),km_zm(:,:),invrs_tau_zt(:,:),mu(:),wp3_on_wp2(:,:),wp2rcp(:,:),a3_coef(:,:),sigma_sqd_w_zt(:,:),vp2_zt(:,:),up2_zt(:,:),varnce_w_2_zm(:,:),thvm_zm(:,:),rtprcp(:,:),rtm_zm(:,:),wprtp2(:,:),wpthlp2(:,:),thlm_zm(:,:),w_2_zm(:,:),ddzt_umvm_sqd(:,:),ddzt_um(:,:),ddzt_umvm_sqd_clipped(:,:),ddzm_thvm_zm(:,:),sigma_sqd_w_tmp(:,:),tau_zm(:,:),tau_max_zt(:,:),ddzt_vm(:,:),lhs_splat_wp3(:,:),lscale_up(:,:),lscale_max(:),wp3_on_wp2_zt(:,:),wp2_zt(:,:),wprtp_zt(:,:),wp3_zm(:,:),wprtpthlp(:,:),rcm_zm(:,:),rtp2_zt(:,:),cx_fnc_richardson(:,:),thvm(:,:),thlp2_zt(:,:),skw_zm(:,:),skw_velocity(:,:))
pdf_closure_driver:
3420, Generating enter data create(rtpthvp_zt(:,:),skw_zt(:,:),upwp_zt(:,:),thlpthvp_zt(:,:),gamma_skw_fnc_zt(:,:),rel_humidity(:,:),vp3_zm(:,:),up3_zm(:,:),thlp3_zm(:,:),rtp3_zm(:,:),wp4_zt(:,:),thlprcp_zt(:,:),rtpthlp_zt(:,:),wpthlp_zt(:,:),wp3_zm(:,:),wp2up2_zt(:,:),wp2_zt(:,:),sku_zt(:,:),skv_zm(:,:),skthl_zt(:,:),sku_zm(:,:),skrt_zt(:,:),skthl_zm(:,:),sigma_sqd_w_zt(:,:),skrt_zm(:,:),skv_zt(:,:),skw_zm(:,:),sigma_sqd_w_tmp(:,:),gamma_skw_fnc(:,:),vprcp_zt(:,:),uprcp_zt(:,:),vp2_zt(:,:),vm_zm(:,:),up2_zt(:,:),um_zm(:,:),rtprcp_zt(:,:),wprtp_zt(:,:),wprcp_zt(:,:),thlp2_zt(:,:),t_in_k(:,:),rtp2_zt(:,:),rsat(:,:),wp2vp2_zt(:,:),vpwp_zt(:,:),wpthvp_zt(:,:))
3430, Generating enter data create(w_up_in_cloud_zm(:,:),wp2thlp_zm(:,:),wprtp2_zm(:,:),wp2rtp_zm(:,:),wprtpthlp_zm(:,:),wp2rcp_zm(:,:),wp2thvp_zm(:,:),cloudy_updraft_frac_zm(:,:),exner_zm(:,:),cloudy_downdraft_frac_zm(:,:),p_in_pa_zm(:,:),wpup2_zm(:,:),wpthlp2_zm(:,:),w_down_in_cloud_zm(:,:),wpvp2_zm(:,:))
3437, Generating enter data create(sksclr_zt(:,:,:),wpsclrprtp_zm(:,:,:),wp2sclrp_zm(:,:,:),wpsclrp_zt(:,:,:),sclrp3_zm(:,:,:),sclrpthlp_zt(:,:,:),sclrpthvp_zt(:,:,:),sksclr_zm(:,:,:),sclrprtp_zt(:,:,:),sclrprcp_zt(:,:,:),sclrp2_zt(:,:,:),sclrm_zm(:,:,:),wpsclrp2_zm(:,:,:),wpsclrpthlp_zm(:,:,:))
3442, Generating enter data create(rtphmp(:,:,:),thlphmp(:,:,:),wp2hmp_zm(:,:,:),wphydrometp_zt(:,:,:))
3526, Generating update self(skrt_zt(:,:),skrt_zm(:,:),skthl_zm(:,:),skthl_zt(:,:),skw_zt(:,:),skw_zm(:,:))
3551, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
3552, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
3553, ! blockidx%x threadidx%x collapsed
3551, Generating default present(skw_zm(:ngrdcol,:nzm),gamma_skw_fnc(:ngrdcol,:nzm),clubb_params(:ngrdcol,57:59))
3553, Generating implicit firstprivate(gamma_coef,gamma_coefc,gamma_coefb)
3575, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
3576, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
3577, ! blockidx%x threadidx%x collapsed
3575, Generating default present(skw_zt(:ngrdcol,:nzt),gamma_skw_fnc_zt(:ngrdcol,:nzt),clubb_params(:ngrdcol,57:59))
3577, Generating implicit firstprivate(gamma_coef,gamma_coefc,gamma_coefb)
3620, Generating update self(gamma_skw_fnc(:,:))
3669, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
3670, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
3671, ! blockidx%x threadidx%x collapsed
3669, Generating default present(sigma_sqd_w(:ngrdcol,:nzm),skw_velocity(:ngrdcol,:nzm),wp3_zm(:ngrdcol,:nzm),wp2(:ngrdcol,:nzm))
3751, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
3752, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
3753, ! blockidx%x threadidx%x collapsed
3751, Generating default present(rtm_ref(:ngrdcol,:nzt),rtm(:ngrdcol,:nzt),gr,gr%zt(1:ngrdcol,1:nzt))
3753, Generating implicit firstprivate(dt,rtm_min,ts_nudge,rtm_nudge_max_altitude)
3780, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
3781, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
3780, Generating default present(p_sfc(:ngrdcol),p_in_pa_zm(:ngrdcol,:),p_in_pa(:ngrdcol,nzt))
3781, Generating implicit firstprivate(nzt,nzm)
3790, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
3791, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
3792, ! blockidx%x threadidx%x collapsed
3790, Generating default present(p_in_pa_zm(:ngrdcol,:nzm),exner_zm(:ngrdcol,:nzm))
3876, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
3877, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
3876, Generating default present(wp4(:ngrdcol,:))
3877, Generating implicit firstprivate(nzm)
3896, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
3897, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
3896, Generating default present(rcp2(:ngrdcol,nzm))
3897, Generating implicit firstprivate(nzm)
3916, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
3917, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
3916, Generating default present(wpthvp(:ngrdcol,nzm),wprcp(:ngrdcol,nzm),thlprcp(:ngrdcol,nzm),rtprcp(:ngrdcol,nzm),wp2vp2(:ngrdcol,nzm),rc_coef_zm(:ngrdcol,nzm),rtpthvp(:ngrdcol,nzm),thlpthvp(:ngrdcol,nzm),uprcp(:ngrdcol,nzm),vprcp(:ngrdcol,nzm),wp2up2(:ngrdcol,nzm))
3917, Generating implicit firstprivate(nzm)
3933, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
3934, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
3935, ! blockidx%x threadidx%x collapsed
3933, Generating default present(thlm_zm(:ngrdcol,:nzm),rtm_zm(:ngrdcol,:nzm),rcm_zm(:ngrdcol,:nzm),ice_supersat_frac_zm(:ngrdcol,:nzm),cloud_frac_zm(:ngrdcol,:nzm))
3950, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
3951, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
3950, Generating default present(sclrpthvp(:ngrdcol,nzm,sclr),sclrprcp(:ngrdcol,nzm,sclr))
3951, Generating implicit firstprivate(sclr,nzm)
3962, Generating update self(vprcp(:,:),uprcp(:,:))
3990, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
3991, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
3990, Generating default present(cloud_frac_zm(:ngrdcol,nzm))
3991, Generating implicit firstprivate(nzm)
4026, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
4027, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
4028, ! blockidx%x threadidx%x collapsed
4026, Generating default present(cloud_frac(:ngrdcol,:nzt),rcm_in_layer(:ngrdcol,:nzt),rcm(:ngrdcol,:nzt),cloud_cover(:ngrdcol,:nzt))
4036, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
4037, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
4038, ! blockidx%x threadidx%x collapsed
4036, Generating default present(ice_supersat_frac(:ngrdcol,:nzt),cloud_frac(:ngrdcol,:nzt))
4050, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
4051, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
4052, ! blockidx%x threadidx%x collapsed
4050, Generating default present(rcm(:ngrdcol,:nzt),rcm_supersat_adj(:ngrdcol,:nzt),rel_humidity(:ngrdcol,:nzt),rtm(:ngrdcol,:nzt),rsat(:ngrdcol,:nzt))
4067, Generating implicit firstprivate(nzt,ngrdcol)
Generating NVIDIA GPU code
4068, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
Generating reduction(.or.:l_spur_supersat)
4069, ! blockidx%x threadidx%x collapsed
4067, Generating default present(rtm(:ngrdcol,:nzt),rsat(:ngrdcol,:nzt),rel_humidity(:ngrdcol,:nzt),rcm(:ngrdcol,:nzt),rcm_supersat_adj(:ngrdcol,:nzt))
Generating implicit copy(l_spur_supersat) [if not already present]
4085, Generating exit data delete(rtpthvp_zt(:,:),skw_zt(:,:),upwp_zt(:,:),thlpthvp_zt(:,:),gamma_skw_fnc_zt(:,:),rel_humidity(:,:),vp3_zm(:,:),up3_zm(:,:),thlp3_zm(:,:),rtp3_zm(:,:),wp4_zt(:,:),thlprcp_zt(:,:),rtpthlp_zt(:,:),wpthlp_zt(:,:),wp3_zm(:,:),wp2up2_zt(:,:),wp2_zt(:,:),sku_zt(:,:),skv_zm(:,:),skthl_zt(:,:),sku_zm(:,:),skrt_zt(:,:),skthl_zm(:,:),sigma_sqd_w_zt(:,:),skrt_zm(:,:),skv_zt(:,:),skw_zm(:,:),sigma_sqd_w_tmp(:,:),gamma_skw_fnc(:,:),vprcp_zt(:,:),uprcp_zt(:,:),vp2_zt(:,:),vm_zm(:,:),up2_zt(:,:),um_zm(:,:),rtprcp_zt(:,:),wprtp_zt(:,:),wprcp_zt(:,:),thlp2_zt(:,:),t_in_k(:,:),rtp2_zt(:,:),rsat(:,:),wp2vp2_zt(:,:),vpwp_zt(:,:),wpthvp_zt(:,:))
4095, Generating exit data delete(w_up_in_cloud_zm(:,:),wp2thlp_zm(:,:),wprtp2_zm(:,:),wp2rtp_zm(:,:),wprtpthlp_zm(:,:),wp2rcp_zm(:,:),wp2thvp_zm(:,:),cloudy_updraft_frac_zm(:,:),exner_zm(:,:),cloudy_downdraft_frac_zm(:,:),p_in_pa_zm(:,:),wpup2_zm(:,:),wpthlp2_zm(:,:),w_down_in_cloud_zm(:,:),wpvp2_zm(:,:))
4102, Generating exit data delete(sksclr_zt(:,:,:),wpsclrprtp_zm(:,:,:),wp2sclrp_zm(:,:,:),wpsclrp_zt(:,:,:),sclrp3_zm(:,:,:),sclrpthlp_zt(:,:,:),sclrpthvp_zt(:,:,:),sksclr_zm(:,:,:),sclrprtp_zt(:,:,:),sclrprcp_zt(:,:,:),sclrp2_zt(:,:,:),sclrm_zm(:,:,:),wpsclrp2_zm(:,:,:),wpsclrpthlp_zm(:,:,:))
4107, Generating exit data delete(rtphmp(:,:,:),thlphmp(:,:,:),wphydrometp_zt(:,:,:),wp2hmp_zm(:,:,:))
trapezoidal_rule_zt:
4832, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
4833, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
4832, Generating default present(wp2thvp_zm(:ngrdcol,nzm),wprtpthlp_zm(:ngrdcol,nzm),wpthlp2_zm(:ngrdcol,nzm),wprtp2_zm(:ngrdcol,nzm),cloud_frac_zm(:ngrdcol,nzm),ice_supersat_frac_zm(:ngrdcol,nzm),rcm_zm(:ngrdcol,nzm))
4833, Generating implicit firstprivate(nzm)
4849, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
4850, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
4849, Generating default present(wpsclrp2_zm(:ngrdcol,nzm,sclr),wpsclrprtp_zm(:ngrdcol,nzm,sclr),wpsclrpthlp_zm(:ngrdcol,nzm,sclr))
4850, Generating implicit firstprivate(sclr,nzm)
calc_trapezoid_zt:
5023, Generating implicit firstprivate(ngrdcol,nzt)
Generating NVIDIA GPU code
5024, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5025, ! blockidx%x threadidx%x collapsed
5023, Generating default present(variable_zt(:ngrdcol,:nzt),variable_zm(:ngrdcol,:nzt+1),gr%zt(1:ngrdcol,1:nzt),gr%invrs_dzt(1:ngrdcol,1:nzt),gr%zm(1:ngrdcol,1:nzt+1),gr)
calc_trapezoid_zm:
5081, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
5082, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5083, ! blockidx%x threadidx%x collapsed
5081, Generating default present(gr%zt(1:ngrdcol,1:nzm-1),variable_zt(:ngrdcol,:nzm-1),variable_zm(:ngrdcol,2:nzm-1),gr%zm(1:ngrdcol,2:nzm-1),gr%invrs_dzm(1:ngrdcol,2:nzm-1),gr)
compute_cloud_cover:
5166, Generating enter data create(chi_mean(:,:),vert_cloud_frac(:,:),vert_cloud_frac_upper(:,:),vert_cloud_frac_lower(:,:))
5169, Generating implicit firstprivate(ngrdcol,nzt)
Generating NVIDIA GPU code
5170, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5171, ! blockidx%x threadidx%x collapsed
5169, Generating default present(chi_mean(:ngrdcol,:nzt),pdf_params,pdf_params%mixt_frac(1:ngrdcol,1:nzt),pdf_params%chi_2(1:ngrdcol,1:nzt),pdf_params%chi_1(1:ngrdcol,1:nzt))
5180, Generating implicit firstprivate(ngrdcol,nzt)
Generating NVIDIA GPU code
5181, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
Generating reduction(.or.:err_code)
5182, ! blockidx%x threadidx%x collapsed
5180, Generating default present(rcm(:ngrdcol,:),chi_mean(:ngrdcol,:),cloud_cover(:ngrdcol,:nzt-1),gr%zt(1:ngrdcol,1:nzt-1),cloud_frac(:ngrdcol,:nzt-1),gr%zm(1:ngrdcol,:),gr%invrs_dzm(1:ngrdcol,:),gr,vert_cloud_frac_upper(:ngrdcol,:nzt-1),vert_cloud_frac_lower(:ngrdcol,:nzt-1),vert_cloud_frac(:ngrdcol,:nzt-1),rcm_in_layer(:ngrdcol,:nzt-1))
Generating implicit copy(err_code) [if not already present]
5182, Generating implicit firstprivate(kp1,km1)
5268, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5269, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5268, Generating default present(cloud_cover(:ngrdcol,nzt),cloud_frac(:ngrdcol,nzt),rcm_in_layer(:ngrdcol,nzt),rcm(:ngrdcol,nzt))
5269, Generating implicit firstprivate(nzt)
5278, Generating update self(rcm(:,:),pdf_params%mixt_frac(:,:),pdf_params%chi_1(:,:),cloud_frac(:,:),pdf_params%chi_2(:,:))
5292, Generating exit data delete(chi_mean(:,:),vert_cloud_frac(:,:),vert_cloud_frac_upper(:,:),vert_cloud_frac_lower(:,:))
clip_rcm:
5343, Generating copy(rcm(:,:)) [if not already present]
Generating copyin(rtm(:,:)) [if not already present]
5348, Generating update self(rcm(:,:),rtm(:,:))
5368, Generating implicit firstprivate(ngrdcol,nzt)
Generating NVIDIA GPU code
5369, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5370, ! blockidx%x threadidx%x collapsed
set_lscale_max:
5432, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5433, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5432, Generating default present(host_dx(:ngrdcol),lscale_max(:ngrdcol),host_dy(:ngrdcol))
5438, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5439, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5438, Generating default present(lscale_max(:ngrdcol))
advance_clubb_core_api_single_col:
1210, Generating copyin(fcor_col(:),gr%weights_zt2zm(:,:,:),gr%zm(:,:),gr,gr%dzm(:,:),gr%invrs_dzm(:,:),gr%dzt(:,:),gr%weights_zm2zt(:,:,:),gr%invrs_dzt(:,:)) [if not already present]
Generating copyout(lscale_col(:,:)) [if not already present]
Generating copyin(nu_vert_res_dep%nu10(:),nu_vert_res_dep%nu8(:),nu_vert_res_dep,nu_vert_res_dep%nu6(:),nu_vert_res_dep%nu1(:),nu_vert_res_dep%nu2(:)) [if not already present]
Generating copy(rtpthvp_col(:,:)) [if not already present]
Generating copyout(cloudy_updraft_frac_col(:,:)) [if not already present]
Generating copy(exner_col(:,:)) [if not already present]
Generating copyin(sclr_idx) [if not already present]
Generating copy(thlm_col(:,:),rtm_col(:,:),um_col(:,:),vm_col(:,:),wprtp_col(:,:),wpthlp_col(:,:),rtp2_col(:,:),thlp2_col(:,:),rtpthlp_col(:,:)) [if not already present]
Generating copyout(w_up_in_cloud_col(:,:)) [if not already present]
Generating copyin(wm_zm_col(:,:),rho_ds_zt_col(:,:),rfrzm_col(:,:),rho_col(:,:),rho_ds_zm_col(:,:)) [if not already present]
Generating copy(ice_supersat_frac_col(:,:)) [if not already present]
Generating copyin(invrs_rho_ds_zm_col(:,:)) [if not already present]
Generating copy(thlpthvp_col(:,:)) [if not already present]
Generating copyin(thv_ds_zm_col(:,:)) [if not already present]
Generating copyout(rcm_in_layer_col(:,:)) [if not already present]
Generating copyin(wpthlp_forcing_col(:,:),wprtp_forcing_col(:,:)) [if not already present]
Generating copy(upwp_pert_col(:,:),vpwp_pert_col(:,:),p_in_pa_col(:,:)) [if not already present]
Generating copyin(upwp_sfc_col(:),vpwp_sfc_col(:),rtm_forcing_col(:,:),thlm_forcing_col(:,:)) [if not already present]
Generating copy(um_pert_col(:,:),vm_pert_col(:,:)) [if not already present]
Generating copyin(thv_ds_zt_col(:,:),upwp_sfc_pert_col(:),gr%zt(:,:),host_dx_col(:),p_sfc_col(:)) [if not already present]
Generating copy(pdf_params%w_2(:,:)) [if not already present]
Generating copyin(ug_col(:,:)) [if not already present]
Generating copy(uprcp_col(:,:)) [if not already present]
Generating copyin(vg_col(:,:)) [if not already present]
Generating copy(vprcp_col(:,:)) [if not already present]
Generating copyin(um_ref_col(:,:),vm_ref_col(:,:)) [if not already present]
Generating copy(up2_col(:,:),vp2_col(:,:)) [if not already present]
Generating copyin(rho_zm_col(:,:)) [if not already present]
Generating copyout(wprcp_col(:,:)) [if not already present]
Generating copyin(sfc_elevation_col(:),wprtp_sfc_col(:),rtm_ref_col(:,:),rtp2_forcing_col(:,:),thlm_ref_col(:,:),thlp2_forcing_col(:,:)) [if not already present]
Generating copy(rtp3_col(:,:)) [if not already present]
Generating copyin(wm_zt_col(:,:)) [if not already present]
Generating copy(wp2vp2_col(:,:)) [if not already present]
Generating copyin(nu_vert_res_dep%nu9(:),clubb_params_col(:,:)) [if not already present]
Generating copy(rc_coef_zm_col(:,:)) [if not already present]
Generating copyout(cloud_cover_col(:,:)) [if not already present]
Generating copyin(wpthlp_sfc_col(:)) [if not already present]
Generating copy(wp2thlp_col(:,:)) [if not already present]
Generating copyin(rtpthlp_forcing_col(:,:)) [if not already present]
Generating copyout(thlprcp_col(:,:)) [if not already present]
Generating copy(wp2_col(:,:),wp2rtp_col(:,:),up3_col(:,:),vp3_col(:,:),pdf_params_zm%w_2(:,:),wp3_col(:,:),wpthvp_col(:,:),wpup2_col(:,:),wp2thvp_col(:,:),wp2up2_col(:,:)) [if not already present]
Generating copyin(host_dy_col(:),um_forcing_col(:,:),vm_forcing_col(:,:)) [if not already present]
Generating copy(upwp_col(:,:),vpwp_col(:,:),pdf_params%varnce_w_2(:,:),pdf_params%w_1(:,:),pdf_params%varnce_thl_2(:,:),pdf_params%varnce_w_1(:,:),pdf_params%rsatl_2(:,:),pdf_params%rt_1(:,:),pdf_params%thl_2(:,:),pdf_params%varnce_rt_1(:,:),pdf_params%stdev_eta_2(:,:),pdf_params%thl_1(:,:),pdf_params%varnce_rt_2(:,:),pdf_params%varnce_thl_1(:,:),pdf_params%corr_w_eta_2(:,:),pdf_params%corr_w_rt_1(:,:),pdf_params%corr_w_rt_2(:,:),pdf_params%corr_w_thl_1(:,:),pdf_params%corr_chi_eta_2(:,:),pdf_params%corr_rt_thl_1(:,:),pdf_params%alpha_rt(:,:)) [if not already present]
Generating copyin(pdf_params) [if not already present]
Generating copy(pdf_params%covar_chi_eta_2(:,:),pdf_params%crt_1(:,:),pdf_params%crt_2(:,:),pdf_params%cthl_1(:,:),pdf_params%alpha_thl(:,:),pdf_params%chi_1(:,:),pdf_params%rt_2(:,:),pdf_params%stdev_chi_1(:,:),pdf_params%stdev_chi_2(:,:),pdf_params%stdev_eta_1(:,:),pdf_params%corr_w_thl_2(:,:),pdf_params%covar_chi_eta_1(:,:),pdf_params%corr_rt_thl_2(:,:),pdf_params%corr_w_chi_1(:,:),pdf_params%corr_w_chi_2(:,:),pdf_params%corr_w_eta_1(:,:),pdf_params%cloud_frac_2(:,:),pdf_params%corr_chi_eta_1(:,:),pdf_params%rc_2(:,:),pdf_params%rsatl_1(:,:),pdf_params%mixt_frac(:,:),pdf_params%rc_1(:,:),pdf_params%chi_2(:,:),pdf_params%cloud_frac_1(:,:),pdf_params%ice_supersat_frac_2(:,:),pdf_params%cthl_2(:,:),pdf_params%ice_supersat_frac_1(:,:),pdf_params_zm%varnce_w_2(:,:),pdf_params_zm%w_1(:,:),pdf_params_zm%varnce_thl_2(:,:),pdf_params_zm%varnce_w_1(:,:),pdf_params_zm%rsatl_2(:,:),pdf_params_zm%rt_1(:,:),pdf_params_zm%thl_2(:,:),pdf_params_zm%varnce_rt_1(:,:),pdf_params_zm%stdev_eta_2(:,:),pdf_params_zm%thl_1(:,:),pdf_params_zm%varnce_rt_2(:,:),pdf_params_zm%varnce_thl_1(:,:),pdf_params_zm%corr_w_eta_2(:,:),pdf_params_zm%corr_w_rt_1(:,:),pdf_params_zm%corr_w_rt_2(:,:),pdf_params_zm%corr_w_thl_1(:,:),pdf_params_zm%corr_chi_eta_2(:,:),pdf_params_zm%corr_rt_thl_1(:,:),pdf_params_zm%alpha_rt(:,:)) [if not already present]
Generating copyin(pdf_params_zm) [if not already present]
Generating copy(pdf_params_zm%covar_chi_eta_2(:,:),pdf_params_zm%crt_1(:,:),pdf_params_zm%crt_2(:,:),pdf_params_zm%cthl_1(:,:),pdf_params_zm%alpha_thl(:,:),pdf_params_zm%chi_1(:,:),pdf_params_zm%rt_2(:,:),pdf_params_zm%stdev_chi_1(:,:),pdf_params_zm%stdev_chi_2(:,:),pdf_params_zm%stdev_eta_1(:,:),pdf_params_zm%corr_w_thl_2(:,:),pdf_params_zm%covar_chi_eta_1(:,:),pdf_params_zm%corr_rt_thl_2(:,:),pdf_params_zm%corr_w_chi_1(:,:),pdf_params_zm%corr_w_chi_2(:,:),pdf_params_zm%corr_w_eta_1(:,:),pdf_params_zm%cloud_frac_2(:,:),pdf_params_zm%corr_chi_eta_1(:,:),pdf_params_zm%rc_2(:,:),pdf_params_zm%rsatl_1(:,:),pdf_params_zm%mixt_frac(:,:),pdf_params_zm%rc_1(:,:),pdf_params_zm%chi_2(:,:),pdf_params_zm%cloud_frac_1(:,:),pdf_params_zm%ice_supersat_frac_2(:,:),pdf_params_zm%cthl_2(:,:),pdf_params_zm%ice_supersat_frac_1(:,:),rcm_col(:,:),wp4_col(:,:)) [if not already present]
Generating copyout(w_down_in_cloud_col(:,:)) [if not already present]
Generating copyin(vpwp_sfc_pert_col(:)) [if not already present]
Generating copyout(cloudy_downdraft_frac_col(:,:)) [if not already present]
Generating copy(cloud_frac_col(:,:)) [if not already present]
Generating copyin(invrs_rho_ds_zt_col(:,:)) [if not already present]
Generating copyout(kh_zm_col(:,:),invrs_tau_zm_col(:,:)) [if not already present]
Generating copy(thlp3_col(:,:)) [if not already present]
Generating copyout(kh_zt_col(:,:)) [if not already present]
Generating copy(wpvp2_col(:,:)) [if not already present]
1290, Generating copy(sclrm_col(:,:,:),wpsclrp_col(:,:,:)) [if not already present]
Generating copyin(sclr_tol(:)) [if not already present]
Generating copy(sclrpthvp_col(:,:,:)) [if not already present]
Generating copyin(sclrm_forcing_col(:,:,:)) [if not already present]
Generating copy(sclrp2_col(:,:,:),sclrp3_col(:,:,:),sclrprtp_col(:,:,:),sclrpthlp_col(:,:,:)) [if not already present]
Generating copyin(wpsclrp_sfc_col(:,:)) [if not already present]
1295, Generating copyin(edsclrm_forcing_col(:,:,:)) [if not already present]
Generating copy(edsclrm_col(:,:,:)) [if not already present]
Generating copyin(wpedsclrp_sfc_col(:,:)) [if not already present]
1299, Generating copyin(wphydrometp_col(:,:,:),wp2hmp_col(:,:,:),thlphmp_zt_col(:,:,:),l_mix_rat_hm(:),rtphmp_zt_col(:,:,:)) [if not already present]
advance_clubb_core_api_multi_col:
1813, Generating copyin(fcor(:),gr%weights_zt2zm(:,:,:),gr%zm(:,:),gr,gr%dzm(:,:),gr%invrs_dzm(:,:),gr%dzt(:,:),gr%weights_zm2zt(:,:,:),gr%invrs_dzt(:,:)) [if not already present]
Generating copyout(lscale(:,:)) [if not already present]
Generating copyin(nu_vert_res_dep%nu10(:),nu_vert_res_dep%nu8(:),nu_vert_res_dep,nu_vert_res_dep%nu6(:),nu_vert_res_dep%nu1(:),nu_vert_res_dep%nu2(:)) [if not already present]
Generating copy(rtpthvp(:,:)) [if not already present]
Generating copyout(cloudy_updraft_frac(:,:)) [if not already present]
Generating copy(exner(:,:)) [if not already present]
Generating copyin(sclr_idx) [if not already present]
Generating copy(thlm(:,:),rtm(:,:),um(:,:),vm(:,:),wprtp(:,:),wpthlp(:,:),rtp2(:,:),thlp2(:,:),rtpthlp(:,:)) [if not already present]
Generating copyout(w_up_in_cloud(:,:)) [if not already present]
Generating copyin(wm_zm(:,:),rho_ds_zt(:,:),rfrzm(:,:),rho(:,:),rho_ds_zm(:,:)) [if not already present]
Generating copy(ice_supersat_frac(:,:)) [if not already present]
Generating copyin(invrs_rho_ds_zm(:,:)) [if not already present]
Generating copy(thlpthvp(:,:)) [if not already present]
Generating copyin(thv_ds_zm(:,:)) [if not already present]
Generating copyout(rcm_in_layer(:,:)) [if not already present]
Generating copyin(wpthlp_forcing(:,:),wprtp_forcing(:,:)) [if not already present]
Generating copy(upwp_pert(:,:),vpwp_pert(:,:),p_in_pa(:,:)) [if not already present]
Generating copyin(upwp_sfc(:),vpwp_sfc(:),rtm_forcing(:,:),thlm_forcing(:,:)) [if not already present]
Generating copy(um_pert(:,:),vm_pert(:,:)) [if not already present]
Generating copyin(thv_ds_zt(:,:),upwp_sfc_pert(:),gr%zt(:,:),host_dx(:),p_sfc(:)) [if not already present]
Generating copy(pdf_params%w_2(:,:)) [if not already present]
Generating copyin(ug(:,:)) [if not already present]
Generating copy(uprcp(:,:)) [if not already present]
Generating copyin(vg(:,:)) [if not already present]
Generating copy(vprcp(:,:)) [if not already present]
Generating copyin(um_ref(:,:),vm_ref(:,:)) [if not already present]
Generating copy(up2(:,:),vp2(:,:)) [if not already present]
Generating copyin(rho_zm(:,:)) [if not already present]
Generating copyout(wprcp(:,:)) [if not already present]
Generating copyin(sfc_elevation(:),wprtp_sfc(:),rtm_ref(:,:),rtp2_forcing(:,:),thlm_ref(:,:),thlp2_forcing(:,:)) [if not already present]
Generating copy(rtp3(:,:)) [if not already present]
Generating copyin(wm_zt(:,:)) [if not already present]
Generating copy(wp2vp2(:,:)) [if not already present]
Generating copyin(nu_vert_res_dep%nu9(:),clubb_params(:,:)) [if not already present]
Generating copy(rc_coef_zm(:,:)) [if not already present]
Generating copyout(cloud_cover(:,:)) [if not already present]
Generating copyin(wpthlp_sfc(:)) [if not already present]
Generating copy(wp2thlp(:,:)) [if not already present]
Generating copyin(rtpthlp_forcing(:,:)) [if not already present]
Generating copyout(thlprcp(:,:)) [if not already present]
Generating copy(wp2(:,:),wp2rtp(:,:),up3(:,:),vp3(:,:),pdf_params_zm%w_2(:,:),wp3(:,:),wpthvp(:,:),wpup2(:,:),wp2thvp(:,:),wp2up2(:,:)) [if not already present]
Generating copyin(host_dy(:),um_forcing(:,:),vm_forcing(:,:)) [if not already present]
Generating copy(upwp(:,:),vpwp(:,:),pdf_params%varnce_w_2(:,:),pdf_params%w_1(:,:),pdf_params%varnce_thl_2(:,:),pdf_params%varnce_w_1(:,:),pdf_params%rsatl_2(:,:),pdf_params%rt_1(:,:),pdf_params%thl_2(:,:),pdf_params%varnce_rt_1(:,:),pdf_params%stdev_eta_2(:,:),pdf_params%thl_1(:,:),pdf_params%varnce_rt_2(:,:),pdf_params%varnce_thl_1(:,:),pdf_params%corr_w_eta_2(:,:),pdf_params%corr_w_rt_1(:,:),pdf_params%corr_w_rt_2(:,:),pdf_params%corr_w_thl_1(:,:),pdf_params%corr_chi_eta_2(:,:),pdf_params%corr_rt_thl_1(:,:),pdf_params%alpha_rt(:,:)) [if not already present]
Generating copyin(pdf_params) [if not already present]
Generating copy(pdf_params%covar_chi_eta_2(:,:),pdf_params%crt_1(:,:),pdf_params%crt_2(:,:),pdf_params%cthl_1(:,:),pdf_params%alpha_thl(:,:),pdf_params%chi_1(:,:),pdf_params%rt_2(:,:),pdf_params%stdev_chi_1(:,:),pdf_params%stdev_chi_2(:,:),pdf_params%stdev_eta_1(:,:),pdf_params%corr_w_thl_2(:,:),pdf_params%covar_chi_eta_1(:,:),pdf_params%corr_rt_thl_2(:,:),pdf_params%corr_w_chi_1(:,:),pdf_params%corr_w_chi_2(:,:),pdf_params%corr_w_eta_1(:,:),pdf_params%cloud_frac_2(:,:),pdf_params%corr_chi_eta_1(:,:),pdf_params%rc_2(:,:),pdf_params%rsatl_1(:,:),pdf_params%mixt_frac(:,:),pdf_params%rc_1(:,:),pdf_params%chi_2(:,:),pdf_params%cloud_frac_1(:,:),pdf_params%ice_supersat_frac_2(:,:),pdf_params%cthl_2(:,:),pdf_params%ice_supersat_frac_1(:,:),pdf_params_zm%varnce_w_2(:,:),pdf_params_zm%w_1(:,:),pdf_params_zm%varnce_thl_2(:,:),pdf_params_zm%varnce_w_1(:,:),pdf_params_zm%rsatl_2(:,:),pdf_params_zm%rt_1(:,:),pdf_params_zm%thl_2(:,:),pdf_params_zm%varnce_rt_1(:,:),pdf_params_zm%stdev_eta_2(:,:),pdf_params_zm%thl_1(:,:),pdf_params_zm%varnce_rt_2(:,:),pdf_params_zm%varnce_thl_1(:,:),pdf_params_zm%corr_w_eta_2(:,:),pdf_params_zm%corr_w_rt_1(:,:),pdf_params_zm%corr_w_rt_2(:,:),pdf_params_zm%corr_w_thl_1(:,:),pdf_params_zm%corr_chi_eta_2(:,:),pdf_params_zm%corr_rt_thl_1(:,:),pdf_params_zm%alpha_rt(:,:)) [if not already present]
Generating copyin(pdf_params_zm) [if not already present]
Generating copy(pdf_params_zm%covar_chi_eta_2(:,:),pdf_params_zm%crt_1(:,:),pdf_params_zm%crt_2(:,:),pdf_params_zm%cthl_1(:,:),pdf_params_zm%alpha_thl(:,:),pdf_params_zm%chi_1(:,:),pdf_params_zm%rt_2(:,:),pdf_params_zm%stdev_chi_1(:,:),pdf_params_zm%stdev_chi_2(:,:),pdf_params_zm%stdev_eta_1(:,:),pdf_params_zm%corr_w_thl_2(:,:),pdf_params_zm%covar_chi_eta_1(:,:),pdf_params_zm%corr_rt_thl_2(:,:),pdf_params_zm%corr_w_chi_1(:,:),pdf_params_zm%corr_w_chi_2(:,:),pdf_params_zm%corr_w_eta_1(:,:),pdf_params_zm%cloud_frac_2(:,:),pdf_params_zm%corr_chi_eta_1(:,:),pdf_params_zm%rc_2(:,:),pdf_params_zm%rsatl_1(:,:),pdf_params_zm%mixt_frac(:,:),pdf_params_zm%rc_1(:,:),pdf_params_zm%chi_2(:,:),pdf_params_zm%cloud_frac_1(:,:),pdf_params_zm%ice_supersat_frac_2(:,:),pdf_params_zm%cthl_2(:,:),pdf_params_zm%ice_supersat_frac_1(:,:),rcm(:,:),wp4(:,:)) [if not already present]
Generating copyout(w_down_in_cloud(:,:)) [if not already present]
Generating copyin(vpwp_sfc_pert(:)) [if not already present]
Generating copyout(cloudy_downdraft_frac(:,:)) [if not already present]
Generating copy(cloud_frac(:,:)) [if not already present]
Generating copyin(invrs_rho_ds_zt(:,:)) [if not already present]
Generating copyout(kh_zm(:,:),invrs_tau_zm(:,:)) [if not already present]
Generating copy(thlp3(:,:)) [if not already present]
Generating copyout(kh_zt(:,:)) [if not already present]
Generating copy(wpvp2(:,:)) [if not already present]
1884, Generating copy(sclrm(:,:,:),wpsclrp(:,:,:)) [if not already present]
Generating copyin(sclr_tol(:)) [if not already present]
Generating copy(sclrpthvp(:,:,:)) [if not already present]
Generating copyin(sclrm_forcing(:,:,:)) [if not already present]
Generating copy(sclrp2(:,:,:),sclrp3(:,:,:),sclrprtp(:,:,:),sclrpthlp(:,:,:)) [if not already present]
Generating copyin(wpsclrp_sfc(:,:)) [if not already present]
1888, Generating copyin(edsclrm_forcing(:,:,:)) [if not already present]
Generating copy(edsclrm(:,:,:)) [if not already present]
Generating copyin(wpedsclrp_sfc(:,:)) [if not already present]
1892, Generating copyin(wphydrometp(:,:,:),wp2hmp(:,:,:),thlphmp_zt(:,:,:),l_mix_rat_hm(:),rtphmp_zt(:,:,:)) [if not already present]
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 300)
0 inform, 1 warnings, 0 severes, 0 fatal for module_mp_graupel
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 5894)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 5905)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 5928)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 5976)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 5980)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 6066)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 6073)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 6079)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 6204)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 6210)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 6248)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 6253)
NVFORTRAN-W-0173-PGI Fortran extension: nonstandard use of data type length specifier (../src/Morrison_microphys/module_mp_graupel.F90: 6257)
NVFORTRAN-W-0435-Array declared with zero size (../src/clubb_driver.F90: 450)
run_clubb:
2449, Generating copy(rtpthlp_forcing(:,:)) [if not already present]
Generating copyin(exner(:,:),gr%zm(:,:),gr) [if not already present]
Generating copy(ug(:,:),vg(:,:),t_sfc(:)) [if not already present]
Generating copyin(gr%zt(:,:)) [if not already present]
Generating copy(p_sfc(:),thlp2_forcing(:,:)) [if not already present]
Generating copyin(rho(:,:)) [if not already present]
Generating copy(upwp_sfc(:)) [if not already present]
Generating copyin(rho_zm(:,:)) [if not already present]
Generating copy(wm_zm(:,:)) [if not already present]
Generating copyin(thvm(:,:),veg_t_in_k(:)) [if not already present]
Generating copy(um_forcing(:,:),vm_forcing(:,:)) [if not already present]
Generating copyin(thlm(:,:)) [if not already present]
Generating copy(rtm(:,:)) [if not already present]
Generating copyin(um(:,:),vm(:,:)) [if not already present]
Generating copy(vpwp_sfc(:),wm_zt(:,:),wprtp_sfc(:),rtm_forcing(:,:),thlm_forcing(:,:),rtp2_forcing(:,:),wpthlp_forcing(:,:),wprtp_forcing(:,:),um_ref(:,:),vm_ref(:,:)) [if not already present]
Generating copyin(sclr_idx,p_in_pa(:,:)) [if not already present]
Generating copy(wpthlp_sfc(:)) [if not already present]
2455, Generating copy(sclrm_forcing(:,:,:),wpsclrp(:,:,:),wpsclrp_sfc(:,:)) [if not already present]
2458, Generating copy(wpedsclrp_sfc(:,:),edsclrm_forcing(:,:,:)) [if not already present]
2716, Generating copyout(lh_thl_clipped(:,:,:),x_nl_all_levs(:,:,:,:),x_mixt_comp_all_levs(:,:,:),lh_rv_clipped(:,:,:),lh_rc_clipped(:,:,:),lh_sample_point_weights(:,:,:),lh_nc_clipped(:,:,:),lh_rt_clipped(:,:,:)) [if not already present]
Generating copyin(hm_metadata) [if not already present]
2820, Generating copyout(skw_zm(:,:)) [if not already present]
Generating copyin(wp3_zm(:,:),wp2(:,:),clubb_params(:,:)) [if not already present]
prescribe_forcings:
5413, Generating enter data create(thlm_bot(:),um_bot(:),vm_bot(:),z_bot(:),exner_bot(:),rtm_bot(:),rho_bot(:),ustar(:),ubar(:))
5428, Generating implicit firstprivate(ngrdcol,nzt)
Generating NVIDIA GPU code
5429, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5430, ! blockidx%x threadidx%x collapsed
5428, Generating default present(thlm_forcing(:ngrdcol,:nzt),rtm_forcing(:ngrdcol,:nzt))
5436, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
5437, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5438, ! blockidx%x threadidx%x collapsed
5436, Generating default present(rtp2_forcing(:ngrdcol,:nzm),rtpthlp_forcing(:ngrdcol,:nzm),wpthlp_forcing(:ngrdcol,:nzm),wprtp_forcing(:ngrdcol,:nzm),thlp2_forcing(:ngrdcol,:nzm))
5467, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5468, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5467, Generating default present(thlm_forcing(:ngrdcol,nzt),rtm_forcing(:ngrdcol,nzt))
5468, Generating implicit firstprivate(nzt)
5516, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5517, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5518, ! blockidx%x threadidx%x collapsed
5516, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),rtm_forcing(:ngrdcol,:gr%nzt),gr)
5540, Generating update self(p_in_pa(:,:))
5546, Generating update device(rtm_forcing(:,:),um_ref(:,:),thlm_forcing(:,:),edsclrm_forcing(:,:,:),sclrm_forcing(:,:,:),vm_ref(:,:),wm_zt(:,:),wm_zm(:,:))
5564, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5565, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5566, ! blockidx%x threadidx%x collapsed
5564, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),rtm_forcing(:ngrdcol,:gr%nzt),gr)
5573, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
5574, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5575, ! blockidx%x threadidx%x collapsed
5576, !$acc loop seq
5573, Generating default present(sclrm_forcing(:ngrdcol,:gr%nzt,:sclr_dim),gr)
5576, Loop is parallelizable
5584, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
5585, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5586, ! blockidx%x threadidx%x collapsed
5587, !$acc loop seq
5584, Generating default present(gr,edsclrm_forcing(:ngrdcol,:gr%nzt,:edsclr_dim))
5587, Loop is parallelizable
5665, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5666, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5665, Generating default present(ustar(:ngrdcol))
5689, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5690, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5689, Generating default present(ustar(:ngrdcol))
5703, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5704, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5703, Generating default present(ustar(:ngrdcol))
5725, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5726, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5725, Generating default present(ustar(:ngrdcol))
5855, Generating update self(rho_bot(:))
5858, Generating update device(ustar(:),wpthlp_sfc(:),wprtp_sfc(:))
5916, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
5917, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
5916, Generating default present(wpthlp_sfc(:ngrdcol),wprtp_sfc(:ngrdcol))
5917, Generating implicit firstprivate(sens_ht,latent_ht)
5923, Generating implicit firstprivate(ngrdcol,nzm)
Generating NVIDIA GPU code
5924, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5925, ! blockidx%x threadidx%x collapsed
5923, Generating default present(wpsclrp(:ngrdcol,:nzm,sclr_idx%iisclr_thl),sclr_idx)
5925, Generating implicit firstprivate(sens_ht)
5932, Generating implicit firstprivate(ngrdcol,nzm)
Generating NVIDIA GPU code
5933, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
5934, ! blockidx%x threadidx%x collapsed
5932, Generating default present(wpsclrp(:ngrdcol,:nzm,sclr_idx%iisclr_rt),sclr_idx)
5934, Generating implicit firstprivate(latent_ht)
5945, Generating update self(rho_zm(:,:),upwp_sfc(:),ustar(:),t_sfc(:),vpwp_sfc(:),wpthlp_sfc(:),wprtp_sfc(:))
5975, Generating exit data delete(thlm_bot(:),um_bot(:),z_bot(:),vm_bot(:),exner_bot(:),rtm_bot(:),rho_bot(:),ustar(:),ubar(:))
read_surface_var_for_bc:
6080, Generating create(thlm_zm(:,:),um_zm(:,:),vm_zm(:,:),k_min(:),rtm_zm(:,:),exner_zm(:,:)) [if not already present]
6085, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6086, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6085, Generating default present(exner_bot(:ngrdcol),gr,z_bot(:ngrdcol),vm_bot(:ngrdcol),thlm_bot(:ngrdcol),um(:ngrdcol,:1),um_bot(:ngrdcol),vm(:ngrdcol,:1),rho_zm(:ngrdcol,:1),rtm(:ngrdcol,:1),rtm_bot(:ngrdcol),thlm(:ngrdcol,:1),rho_bot(:ngrdcol),p_sfc(:ngrdcol),gr%zt(1:ngrdcol,1))
6105, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6106, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6113, !$acc loop seq
6105, Generating default present(gr,z_bot(:ngrdcol),gr%zt(1:ngrdcol,:))
6106, Generating implicit firstprivate(k,min_val)
6113, Loop carried scalar dependence for min_val at line 6114
Loop carried reuse of k_min prevents parallelization
6123, Generating update self(k_min(:))
6156, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6157, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6156, Generating default present(gr,rho_bot(:ngrdcol),p_sfc(:ngrdcol),exner_bot(:ngrdcol),z_bot(:),vm_bot(:ngrdcol),thlm_bot(:ngrdcol),um_bot(:ngrdcol),rtm_bot(:ngrdcol),rho_zm(:ngrdcol,:))
6157, Generating implicit firstprivate(k00,km1,kp2,kp1)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 218)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 222)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 275)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 278)
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
nvfortran-Warning-The flag -Mcuda has been deprecated, please use -cuda and -gpu instead.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
91 : call run_clubb( ngrdcol, calls_per_out, clubb_params, namelist_filename, l_stdout, l_output_multi_col )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/clubb_standalone.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Expected read_random_seed for end function.
CLUBBStandardsCheck.pl WARNING: Endings of either program, module, subroutine, or function blocks to not match the beginning
../src/error.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
165 : call stat_update_var_pt( stats_metadata%isfc_soil_T_in_K, 1, sfc_soil_T_in_K(i), stats_sfc(i) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
166 : call stat_update_var_pt( stats_metadata%ideep_soil_T_in_K, 1, deep_soil_T_in_K(i), stats_sfc(i) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
200 : call stat_update_var_pt( stats_metadata%isoil_heat_flux, 1, soil_heat_flux(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
201 : stats_sfc(i) ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/soil_vegetation.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
381 : um(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
383 : vm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
385 : ugm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
387 : vgm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
389 : thlm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
391 : rtm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
393 : press(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
396 : wm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
413 : edsclr_snd(km1,edsclr), edsclr_snd(k00,edsclr), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
414 : edsclr_snd(kp1,edsclr), edsclr_snd(kp2,edsclr) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
438 : um(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), u(k_above), u(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
439 : vm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), v(k_above), v(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
440 : ugm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), ug(k_above), ug(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
441 : vgm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), vg(k_above), vg(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
442 : thlm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), theta(k_above), theta(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
443 : rtm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), rt(k_above), rt(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
444 : press(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), p_in_Pa(k_above), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
446 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
450 : sclrm(i,k,sclr) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
456 : edsclrm(i,k,edsclr) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
485 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
511 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/sounding.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
45 : subroutine run_clubb ( ngrdcol, calls_per_out, clubb_params, runfile, l_stdout, l_output_multi_col, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1733 : allocate( um_ref(ngrdcol, gr%nzt) ) ! Reference u wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1734 : allocate( vm_ref(ngrdcol, gr%nzt) ) ! Reference v wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2215 : ! Initialize statistics output, note that this will allocate/initialize stats variables for all
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2236 : ! Initialize statistics output, note that this will allocate/initialize stats variables for all
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2410 : wp2_zt = max( zm2zt( gr%nzm, gr%nzt, ngrdcol, gr, wp2 ), w_tol_sqd ) ! Positive definite quantity
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2426 : um(i,:), vm(i,:), rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2449 : !$acc data copyin( sclr_idx, gr, gr%zt, gr%zm, um, vm, thlm, p_in_Pa, exner, rho, thvm, rho_zm, veg_T_in_K ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2622 : call setup_pdf_parameters( gr, gr%nzm, gr%nzt, ngrdcol, pdf_dim, hydromet_dim, dt_main, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2623 : Nc_in_cloud, cloud_frac, Kh_zm, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2624 : ice_supersat_frac, hydromet, wphydrometp, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2625 : corr_array_n_cloud, corr_array_n_below, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2626 : hm_metadata, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2627 : pdf_params, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2628 : clubb_params, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2629 : clubb_config_flags%iiPDF_type, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2630 : l_use_precip_frac, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2631 : clubb_config_flags%l_predict_upwp_vpwp, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2632 : clubb_config_flags%l_diagnose_correlations, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2633 : clubb_config_flags%l_calc_w_corr, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2634 : clubb_config_flags%l_const_Nc_in_cloud, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2635 : clubb_config_flags%l_fix_w_chi_eta_correlations, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2636 : stats_metadata, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2637 : stats_zt, stats_zm, stats_sfc, & ! In/Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2643 : precip_fracs, & ! In/Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2644 : hydromet_pdf_params ) ! Optional(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2664 : stats_zt(i), stats_zm(i), & ! In/Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2665 : rtphmp_zt(i,:,:), thlphmp_zt(i,:,:), wp2hmp(i,:,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2777 : wp2_zt = max( zm2zt( gr%nzm, gr%nzt, ngrdcol, gr, wp2 ), w_tol_sqd ) ! Positive definite quantity
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2783 : thlm(i,:), p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), rtm(i,:), &! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2784 : rcm(i,:), cloud_frac(i,:), wm_zt(i,:), wm_zm(i,:), wp2_zt(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2785 : hydromet(i,:,:), Nc_in_cloud(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2801 : stats_zt(i), stats_zm(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2802 : stats_sfc(i), stats_lh_zt(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2803 : Nccnm(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2804 : hydromet_mc(i,:,:), Ncm_mc(i,:), rcm_mc(i,:), rvm_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2805 : thlm_mc(i,:), hydromet_vel_zt(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2806 : hydromet_vel_covar_zt_impc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2807 : hydromet_vel_covar_zt_expc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2808 : wprtp_mc(i,:), wpthlp_mc(i,:), rtp2_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2809 : thlp2_mc(i,:), rtpthlp_mc(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2847 : hydromet(i,:,:), hydromet_vel_zt(i,:,:), hydrometp2(i,:,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2848 : K_hm(i,:,:), Ncm(i,:), Nc_in_cloud(i,:), rvm_mc(i,:), thlm_mc(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2905 : call stat_update_var( stats_metadata%iwprtp_mc, wprtp_mc, stats_zm(i) ) ! m*(kg/kg)/s^2
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2929 : time_current, time_initial, rho(i,:), rho_zm(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2930 : p_in_Pa(i,:), exner(i,:), cloud_frac(i,:), ice_supersat_frac(i,:), X_nl_all_levs(i,:,:,:), & !In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2932 : lh_sample_point_weights(i,:,:), hydromet(i,:,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2933 : stats_metadata, stats_sfc(i), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2934 : radht(i,:), Frad(i,:), Frad_SW_up(i,:), Frad_LW_up(i,:), Frad_SW_down(i,:), Frad_LW_down(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2961 : call update_radiation_variables( gr%nzm, gr%nzt, radht, Frad_SW_up(i,:), Frad_LW_up(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2990 : if ( ( stats_metadata%l_stats_last .or. stats_metadata%l_stats .or. l_output_multi_col ) .and. l_stdout ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5413 : !$acc enter data create( um_bot, vm_bot, rtm_bot, thlm_bot, rho_bot, exner_bot, z_bot, ustar, ubar )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5546 : !$acc update device( wm_zt, wm_zm, thlm_forcing, rtm_forcing, um_ref, vm_ref, sclrm_forcing, edsclrm_forcing )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5640 : !gr%zt(1,2), 299.8_core_rknd, 101540._core_rknd, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5948 : call stat_update_var_pt( stats_metadata%ish, 1, wpthlp_sfc(i)*rho_zm(i,1)*Cp,& ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5951 : call stat_update_var_pt( stats_metadata%ilh, 1, wprtp_sfc(i)*rho_zm(i,1)*Lv, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5954 : call stat_update_var_pt( stats_metadata%iwpthlp_sfc, 1, wpthlp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5957 : call stat_update_var_pt( stats_metadata%iwprtp_sfc, 1, wprtp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5960 : call stat_update_var_pt( stats_metadata%iupwp_sfc, 1, upwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5963 : call stat_update_var_pt( stats_metadata%ivpwp_sfc, 1, vpwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5966 : call stat_update_var_pt( stats_metadata%iustar, 1, ustar(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5969 : call stat_update_var_pt( stats_metadata%iT_sfc, 1, T_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5975 : !$acc exit data delete( um_bot, vm_bot, rtm_bot, thlm_bot, rho_bot, exner_bot, z_bot, ustar, ubar )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6177 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6181 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6185 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6186 : exner_zm(i,km1), exner_zm(i,k00), exner_zm(i,kp1), exner_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6189 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6190 : thlm_zm(i,km1), thlm_zm(i,k00), thlm_zm(i,kp1), thlm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6193 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6194 : rtm_zm(i,km1), rtm_zm(i,k00), rtm_zm(i,kp1), rtm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6863 : hm_metadata, stats_metadata, stats_sfc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/clubb_driver.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Missing 'implicit none' statements. 'Implicit None' check FAILED!
CLUBBStandardsCheck.pl Add a line containing 'implicit none' to each program, module, subroutine, and function.
../src/CLUBB_core/mt95.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1277 : status = nf90_def_var( ncid_zm, "columns", NF90_DOUBLE, (/column_id_zm/), column_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1278 : status = nf90_def_var( ncid_zm, "altitude", NF90_DOUBLE, (/vertical_id_zm/), vertical_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1279 : status = nf90_def_var( ncid_zm, "time", NF90_DOUBLE, (/time_id_zm/), time_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1336 : status = nf90_def_var( ncid_zt, "columns", NF90_DOUBLE, (/column_id_zt/), column_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1337 : status = nf90_def_var( ncid_zt, "altitude", NF90_DOUBLE, (/vertical_id_zt/), vertical_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1338 : status = nf90_def_var( ncid_zt, "time", NF90_DOUBLE, (/time_id_zt/), time_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1390 : status = nf90_put_var( ncid_zm, column_var_id_zm, column_list, start=(/1/), count=(/ngrdcol/) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1391 : status = nf90_put_var( ncid_zt, column_var_id_zt, column_list, start=(/1/), count=(/ngrdcol/) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1393 : !=================================== Allocate Output Arrays ===================================
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1460 : !!$acc upwp_out, vpwp_out, up2_out, vp2_out, wp3_out, rcm_out, cloud_frac_out, rtm_out, thlm_out )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/output_netcdf.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
718 : ! MONOFLUX TEST COMMENT DO NOT REMOVE if( any(wpxp_net_adjust /= 0.0) ) write(fstderr,*) "MONOFLUX: wpxp adjusted "
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/mono_flux_limiter.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1548 : !$acc data copyin( C_uu_shr_zeros, C_uu_shr_plus_one, C11_Skw_fnc_zeros, C11_Skw_fnc_plus_one ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1571 : lhs_wp3_pr2_term ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2677 : !$acc data copyin( C_uu_buoy_zeros, C_uu_buoy_plus_one, C11_Skw_fnc_zeros, C11_Skw_fnc_plus_one ) &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_wp2_wp3_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
709 : call stats_zero( stats_zt(i)%ii, stats_zt(i)%jj, stats_zt(i)%kk, stats_zt(i)%num_output_fields, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
710 : stats_zt(i)%accum_field_values, stats_zt(i)%accum_num_samples, stats_zt(i)%l_in_update ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
738 : call open_netcdf_for_writing( nlat, nlon, fdir, fname, 1, stats_zt(1)%kk, stats_zt(1)%z, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
817 : allocate( stats_lh_zt(i)%l_in_update( stats_lh_zt(i)%ii, stats_lh_zt(i)%jj, stats_lh_zt(i)%kk, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1148 : call stats_zero( stats_zm(i)%ii, stats_zm(i)%jj, stats_zm(i)%kk, stats_zm(i)%num_output_fields, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1149 : stats_zm(i)%accum_field_values, stats_zm(i)%accum_num_samples, stats_zm(i)%l_in_update ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1174 : call open_netcdf_for_writing( nlat, nlon, fdir, fname, 1, stats_zm(1)%kk, stats_zm(1)%z, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1238 : stats_rad_zt(i)%accum_num_samples, stats_rad_zt(i)%l_in_update )! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1325 : stats_rad_zm(i)%accum_num_samples, stats_rad_zm(i)%l_in_update ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1415 : call stats_zero( stats_sfc(i)%ii, stats_sfc(i)%jj, stats_sfc(i)%kk, stats_sfc(i)%num_output_fields, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1416 : stats_sfc(i)%accum_field_values, stats_sfc(i)%accum_num_samples, stats_sfc(i)%l_in_update ) ! out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1440 : call open_netcdf_for_writing( nlat, nlon, fdir, fname, 1, stats_sfc(1)%kk, stats_sfc(1)%z, & ! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_clubb_utilities.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4228 : ( any(abs(params(:,iC1) - params(:,iC14)) > abs(params(:,iC1) + params(:,iC14)) / 2 * eps) .or. &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_clubb_core_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1916 : rhs_bp ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1921 : call wpxp_terms_bp_pr3_rhs( nzm, ngrdcol, C7_Skw_fnc_plus_one, thv_ds_zm, xpthvp, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1922 : rhs_pr3 ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_xm_wpxp_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
144 : else if ( gr%zt(i,k) > z_inversion(i) .and. gr%zt(i,k) <= z_inversion(i)+300._core_rknd ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
172 : else if ( gr%zt(i,k) > z_inversion(i) .and. gr%zt(i,k) <= z_inversion(i)+300._core_rknd ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
227 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
228 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/atex.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
127 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
128 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/bomex.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
132 : ! sat_mixrat_liq( p_sfc, T_in_K ) * 0.8_core_rknd )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/cloud_feedback.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
91 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
92 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/dycoms2_rf01.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
121 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
122 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/dycoms2_rf02.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
96 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
97 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
176 : wpthlp_sfc(i) = convert_sens_ht_to_km_s( ( 270._core_rknd * ft**1.5_core_rknd ), rho_sfc(i) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
177 : wprtp_sfc(i) = convert_latent_ht_to_m_s( ( 554._core_rknd * ft**1.3_core_rknd ), rho_sfc(i) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/lba.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
152 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
153 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/gabls2.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
157 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
158 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/mpace_b.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
272 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
273 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/mpace_a.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
104 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
105 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/wangara.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
159 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
160 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/Benchmark_cases/rico.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
Directory 1 is 2c534889b08af602b0652a339364119dfcd595a7
Directory 2 is a1fcfe8d0eff3f15d3fca37af1fe263cd6203cd9
Using reporting threshold: 0.0
The following cases will be compared: ['arm', 'arm_97', 'atex', 'bomex', 'dycoms2_rf01', 'dycoms2_rf02_ds', 'gabls3_night', 'lba', 'rico', 'twp_ice', 'wangara']
###DIFFING arm netCDF (*.nc) files###
>No differences detected by the linux diff in arm_zm.nc<
>No differences detected by the linux diff in arm_zt.nc<
>No differences detected by the linux diff in arm_sfc.nc<
>No differences detected by the linux diff in arm_multi_col_zm.nc<
>No differences detected by the linux diff in arm_multi_col_zt.nc<
>>>The linux diff could not detect any differences in the file pairs for case arm.<<<
**********************************************************************************************************
###DIFFING arm_97 netCDF (*.nc) files###
>No differences detected by the linux diff in arm_97_zm.nc<
>No differences detected by the linux diff in arm_97_zt.nc<
>No differences detected by the linux diff in arm_97_sfc.nc<
>>>The linux diff could not detect any differences in the file pairs for case arm_97.<<<
**********************************************************************************************************
###DIFFING atex netCDF (*.nc) files###
>No differences detected by the linux diff in atex_zm.nc<
>No differences detected by the linux diff in atex_zt.nc<
>No differences detected by the linux diff in atex_sfc.nc<
>No differences detected by the linux diff in atex_multi_col_zm.nc<
>No differences detected by the linux diff in atex_multi_col_zt.nc<
>>>The linux diff could not detect any differences in the file pairs for case atex.<<<
**********************************************************************************************************
###DIFFING bomex netCDF (*.nc) files###
>No differences detected by the linux diff in bomex_zm.nc<
>No differences detected by the linux diff in bomex_zt.nc<
>No differences detected by the linux diff in bomex_sfc.nc<
>No differences detected by the linux diff in bomex_multi_col_zm.nc<
>No differences detected by the linux diff in bomex_multi_col_zt.nc<
>>>The linux diff could not detect any differences in the file pairs for case bomex.<<<
**********************************************************************************************************
###DIFFING dycoms2_rf01 netCDF (*.nc) files###
>No differences detected by the linux diff in dycoms2_rf01_zm.nc<
>No differences detected by the linux diff in dycoms2_rf01_zt.nc<
>No differences detected by the linux diff in dycoms2_rf01_sfc.nc<
>No differences detected by the linux diff in dycoms2_rf01_multi_col_zm.nc<
>No differences detected by the linux diff in dycoms2_rf01_multi_col_zt.nc<
>>>The linux diff could not detect any differences in the file pairs for case dycoms2_rf01.<<<
**********************************************************************************************************
###DIFFING dycoms2_rf02_ds netCDF (*.nc) files###
>No differences detected by the linux diff in dycoms2_rf02_ds_zm.nc<
>No differences detected by the linux diff in dycoms2_rf02_ds_zt.nc<
>No differences detected by the linux diff in dycoms2_rf02_ds_sfc.nc<
>No differences detected by the linux diff in dycoms2_rf02_ds_multi_col_zm.nc<
>No differences detected by the linux diff in dycoms2_rf02_ds_multi_col_zt.nc<
>>>The linux diff could not detect any differences in the file pairs for case dycoms2_rf02_ds.<<<
**********************************************************************************************************
###DIFFING gabls3_night netCDF (*.nc) files###
>No differences detected by the linux diff in gabls3_night_zm.nc<
>No differences detected by the linux diff in gabls3_night_zt.nc<
>No differences detected by the linux diff in gabls3_night_sfc.nc<
>No differences detected by the linux diff in gabls3_night_multi_col_zm.nc<
>No differences detected by the linux diff in gabls3_night_multi_col_zt.nc<
>>>The linux diff could not detect any differences in the file pairs for case gabls3_night.<<<
**********************************************************************************************************
###DIFFING lba netCDF (*.nc) files###
>No differences detected by the linux diff in lba_zm.nc<
>No differences detected by the linux diff in lba_zt.nc<
>No differences detected by the linux diff in lba_sfc.nc<
>>>The linux diff could not detect any differences in the file pairs for case lba.<<<
**********************************************************************************************************
###DIFFING rico netCDF (*.nc) files###
>No differences detected by the linux diff in rico_zm.nc<
>No differences detected by the linux diff in rico_zt.nc<
>No differences detected by the linux diff in rico_sfc.nc<
>No differences detected by the linux diff in rico_multi_col_zm.nc<
>No differences detected by the linux diff in rico_multi_col_zt.nc<
>>>The linux diff could not detect any differences in the file pairs for case rico.<<<
**********************************************************************************************************
###DIFFING twp_ice netCDF (*.nc) files###
>No differences detected by the linux diff in twp_ice_zm.nc<
>No differences detected by the linux diff in twp_ice_zt.nc<
>No differences detected by the linux diff in twp_ice_sfc.nc<
>>>The linux diff could not detect any differences in the file pairs for case twp_ice.<<<
**********************************************************************************************************
###DIFFING wangara netCDF (*.nc) files###
>No differences detected by the linux diff in wangara_zm.nc<
>No differences detected by the linux diff in wangara_zt.nc<
>No differences detected by the linux diff in wangara_sfc.nc<
>No differences detected by the linux diff in wangara_multi_col_zm.nc<
>No differences detected by the linux diff in wangara_multi_col_zt.nc<
>>>The linux diff could not detect any differences in the file pairs for case wangara.<<<
**********************************************************************************************************
SUMMARY:
Linux diff did not detect any differences in the compared files.
=============================== Configuring Test ===============================
Working directory set to: /home/jenkins/workspace/clubb_BFB_multi_col_gpu_nvhpc_test
Checking specified repo: /home/jenkins/workspace/clubb_BFB_multi_col_gpu_nvhpc_test
Using /home/jenkins/workspace/clubb_BFB_multi_col_gpu_nvhpc_test with origin https://github.com/larson-group/clubb.git
Output Save Mode: none
Using branch: master
Making list from 'UnresolvedCommits':
CheckRange = True: Getting commit range
Run Output Path: output
Run commands: ['compile/compile.bash -c config/linux_x86_64_nvhpc_gpu_openacc.bash', '\nrm -rf output', '\nmkdir output', '\nrun_scripts/create_multi_col_params.py -n 4 -out_file run_scripts/clubb_params_multi_col.in -param_file input/tunable_parameters/tunable_parameters.in', '\nrun_scripts/run_scm_all.bash --min-cases -p clubb_params_multi_col.in']
Diffing command: run_scripts/run_bindiff_all.py
=============================== Running Test ===============================
Parsing message from commit: fa4b24b4d37aabefbd37d6ebcaab6425016cada3
Parsing message from commit: 2c534889b08af602b0652a339364119dfcd595a7
Checking Commit: fa4b24b4d37aabefbd37d6ebcaab6425016cada3
Skipping: not final commit and not labelled BIT_CHANGING
Checking Commit: 2c534889b08af602b0652a339364119dfcd595a7
Running: final commit to check, not labelled BIT_CHANGING
Checking out 2c534889b08af602b0652a339364119dfcd595a7
Running: 'compile/compile.bash -c config/linux_x86_64_nvhpc_gpu_openacc.bash'
Running: 'rm -rf output'
Running: 'mkdir output'
Running: 'run_scripts/create_multi_col_params.py -n 4 -out_file run_scripts/clubb_params_multi_col.in -param_file input/tunable_parameters/tunable_parameters.in'
Running: 'run_scripts/run_scm_all.bash --min-cases -p clubb_params_multi_col.in'
Checking out a1fcfe8d0eff3f15d3fca37af1fe263cd6203cd9
Running: 'compile/compile.bash -c config/linux_x86_64_nvhpc_gpu_openacc.bash'
Running: 'rm -rf output'
Running: 'mkdir output'
Running: 'run_scripts/create_multi_col_params.py -n 4 -out_file run_scripts/clubb_params_multi_col.in -param_file input/tunable_parameters/tunable_parameters.in'
Running: 'run_scripts/run_scm_all.bash --min-cases -p clubb_params_multi_col.in'
Diffing: 'run_scripts/run_bindiff_all.py 2c534889b08af602b0652a339364119dfcd595a7 a1fcfe8d0eff3f15d3fca37af1fe263cd6203cd9'
=============================== Test Results ===============================
Commit Range Checked = a1fcfe8d0eff3f15d3fca37af1fe263cd6203cd9...2c534889b08af602b0652a339364119dfcd595a7
No new Unresolved commits found.
No fake BIT_CHANGING commits found.
No remaining Unresolved Commits.
=============================== Updating Config File ===============================
Saving into UnresolvedCommits:
Saving into BaselineCommit: 2c534889b08af602b0652a339364119dfcd595a7
=============================== Cleanup ===============================
Removing all generated output
REMOVING: a1fcfe8d0eff3f15d3fca37af1fe263cd6203cd9
REMOVING: 2c534889b08af602b0652a339364119dfcd595a7
================== Unresolved Commit Status ==================
No remaining Unresolved Commits.
Exiting with code: 0
[Pipeline] }
[Pipeline] // stage
[Pipeline] }
[Pipeline] // withEnv
[Pipeline] }
[Pipeline] // node
[Pipeline] End of Pipeline
Finished: SUCCESS
![[Jenkins]](/jenkins/static/57c8a776/images/svgs/logo.svg){kind=logo}
