Skipping 375 KB..
Full LogTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTest
277, Generating implicit firstprivate(t_sfc_calc,saturation_formula)
293, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
294, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
293, Generating default present(ustar(:ngrdcol),lowest_level(:),p_sfc(:ngrdcol),wpthlp_sfc(:ngrdcol),wprtp_sfc(:ngrdcol),t_sfc(:ngrdcol),ubar(:))
294, Generating implicit firstprivate(sstheta,bflx)
305, Generating exit data delete(rsat(:),cz(:))
mpace_b_tndcy:
106, Generating enter data create(t_tendency,velocity_omega)
109, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
110, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
111, ! blockidx%x threadidx%x collapsed
109, Generating default present(gr,p_in_pa(:ngrdcol,:gr%nzt),wm_zt(:ngrdcol,:gr%nzt),thvm(:ngrdcol,:gr%nzt))
111, Generating implicit firstprivate(velocity_omega)
121, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
122, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
121, Generating default present(wm_zm(:ngrdcol,:),gr)
128, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
129, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
130, ! blockidx%x threadidx%x collapsed
128, Generating default present(gr,thlm_forcing(:ngrdcol,:gr%nzt),rtm_forcing(:ngrdcol,:gr%nzt),p_in_pa(:ngrdcol,:gr%nzt))
130, Generating implicit firstprivate(t_tendency)
143, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
144, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
145, ! blockidx%x threadidx%x collapsed
143, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),sclrm_forcing(:ngrdcol,:gr%nzt,:),rtm_forcing(:ngrdcol,:gr%nzt),sclr_idx,gr)
154, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
155, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
156, ! blockidx%x threadidx%x collapsed
154, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),sclr_idx,rtm_forcing(:ngrdcol,:gr%nzt),gr,edsclrm_forcing(:ngrdcol,:gr%nzt,:))
163, Generating exit data delete(velocity_omega,t_tendency)
mpace_b_sfclyr:
232, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
233, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
232, Generating default present(rho_sfc(:),wprtp_sfc(:ngrdcol),wpthlp_sfc(:ngrdcol),ustar(:ngrdcol))
233, Generating implicit firstprivate(latent_heat_flx,sensible_heat_flx)
run_clubb:
2331, 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 create(mu_x_2_n(:,:,:)) [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(:),p_sfc(:),pdf_params%w_2(:,:)) [if not already present]
Generating create(rvm_mc(:,:),cloudy_updraft_frac(:,:)) [if not already present]
Generating copyin(gr%zt(:,:)) [if not already present]
Generating create(sigma_x_2_n(:,:,:)) [if not already present]
Generating copyin(p_in_pa_init(:),exner_init(:),sclr_idx,deep_soil_t_in_k_init(:),dummy_dx(:),pdf_params%varnce_w_2(:,:),pdf_params%w_1(:,:)) [if not already present]
Generating create(pdf_params%varnce_thl_2(:,:)) [if not already present]
Generating copyin(pdf_params%varnce_w_1(:,:)) [if not already present]
Generating create(pdf_params%ice_supersat_frac_2(:,:)) [if not already present]
Generating copyin(pdf_params_zm%varnce_w_2(:,:),pdf_params_zm%w_1(:,:)) [if not already present]
Generating create(pdf_params_zm%varnce_thl_2(:,:)) [if not already present]
Generating copyin(pdf_params_zm%varnce_w_1(:,:)) [if not already present]
Generating create(pdf_params_zm%ice_supersat_frac_2(:,:),thlm_forcing(:,:),rtm_forcing(:,:),um_forcing(:,:),vm_forcing(:,:),ug(:,:),vg(:,:),wp2(:,:),up2(:,:),vp2(:,:),rcm_in_layer(:,:),wm_zt(:,:),wm_zm(:,:)) [if not already present]
Generating copyin(dummy_dy(:)) [if not already present]
Generating create(exner(:,:),thvm(:,:),p_in_pa(:,:)) [if not already present]
Generating copyin(rho_ds_zt_init(:)) [if not already present]
Generating create(rho_zm(:,:)) [if not already present]
Generating copyin(rho_ds_zm_dycore_init(:)) [if not already present]
Generating create(rho_ds_zt(:,:),invrs_rho_ds_zm(:,:),invrs_rho_ds_zt(:,:),thv_ds_zm(:,:),thv_ds_zt(:,:),rtm_ref(:,:),thlm_ref(:,:),um_ref(:,:),deep_soil_t_in_k(:),sfc_soil_t_in_k(:),veg_t_in_k(:),vm_ref(:,:),rho_ds_zm_dycore(:,:)) [if not already present]
Generating copyin(em_init(:)) [if not already present]
Generating create(err_info%err_code(:)) [if not already present]
Generating copyin(rho_zm_init(:),wm_zm_init(:),thvm_init(:),veg_t_in_k_init(:)) [if not already present]
Generating create(um_pert(:,:),vm_pert(:,:),thlm(:,:),rtm(:,:),um(:,:),vm(:,:),w_up_in_cloud(:,:),wprtp(:,:),wpthlp(:,:),rtp2(:,:),thlp2(:,:),rtpthlp(:,:),wpthlp_mc(:,:),wprtp_mc(:,:),upwp_pert(:,:),vpwp_pert(:,:),corr_cholesky_mtx_2(:,:,:,:)) [if not already present]
Generating copyin(sfc_elevation(:)) [if not already present]
Generating create(upwp_sfc_pert(:)) [if not already present]
Generating copyin(rcm_init(:)) [if not already present]
Generating create(rtpthvp(:,:)) [if not already present]
Generating copyin(thlm_init(:),pdf_params_zm%w_2(:,:)) [if not already present]
Generating create(wprtp_forcing(:,:),wpthlp_forcing(:,:),rtp2_forcing(:,:),thlp2_forcing(:,:),rtpthlp_forcing(:,:),thlp3(:,:),wprcp(:,:),wprtp_sfc(:)) [if not already present]
Generating copyin(rtm_ref_init(:),thlm_ref_init(:)) [if not already present]
Generating create(rtp3(:,:)) [if not already present]
Generating copyin(wm_zt_init(:)) [if not already present]
Generating create(wp2vp2(:,:),wp2thlp(:,:),rtpthlp_mc(:,:),thlprcp(:,:)) [if not already present]
Generating copyin(rho_init(:)) [if not already present]
Generating create(rfrzm(:,:),rho(:,:)) [if not already present]
Generating copyin(rho_ds_zm_init(:)) [if not already present]
Generating create(ice_supersat_frac(:,:)) [if not already present]
Generating copyin(invrs_rho_ds_zm_init(:)) [if not already present]
Generating create(thlpthvp(:,:)) [if not already present]
Generating copyin(thv_ds_zm_init(:)) [if not already present]
Generating create(upwp_sfc(:),vpwp_sfc(:)) [if not already present]
Generating copyin(rtm_init(:)) [if not already present]
Generating create(thlm_mc(:,:)) [if not already present]
Generating copyin(ug_init(:)) [if not already present]
Generating create(uprcp(:,:)) [if not already present]
Generating copyin(vg_init(:)) [if not already present]
Generating create(vprcp(:,:)) [if not already present]
Generating copyin(um_ref_init(:),vm_ref_init(:),up2_init(:),vp2_init(:),t_sfc(:)) [if not already present]
Generating create(rtp2_mc(:,:),thlp2_mc(:,:)) [if not already present]
Generating copyin(nu_vert_res_dep%nu9(:),err_info%err_header(:)) [if not already present]
Generating create(rc_coef_zm(:,:),cloud_cover(:,:),wpthlp_sfc(:)) [if not already present]
Generating copyin(wp2_init(:)) [if not already present]
Generating create(wp2rtp(:,:),up3(:,:),vp3(:,:),radht(:,:),wp3(:,:),wpthvp(:,:),wpup2(:,:),wp2thvp(:,:),wp2up2(:,:)) [if not already present]
Generating copyin(hm_metadata,um_init(:),vm_init(:)) [if not already present]
Generating create(upwp(:,:),vpwp(:,:),rcm(:,:),wp4(:,:),w_down_in_cloud(:,:),vpwp_sfc_pert(:),cloudy_downdraft_frac(:,:),cloud_frac(:,:)) [if not already present]
Generating copyin(invrs_rho_ds_zt_init(:)) [if not already present]
Generating create(kh_zm(:,:),invrs_tau_zm(:,:),lh_thl_clipped(:,:,:),x_mixt_comp_all_levs(:,:,:),wpvp2(:,:),lh_rv_clipped(:,:,:),lh_rc_clipped(:,:,:),lh_sample_point_weights(:,:,:),lh_nc_clipped(:,:,:),lh_rt_clipped(:,:,:),kh_zt(:,:),lscale(:,:),mu_x_1_n(:,:,:)) [if not already present]
Generating copyin(sfc_soil_t_in_k_init(:)) [if not already present]
Generating create(sigma_x_1_n(:,:,:)) [if not already present]
Generating copyin(clubb_params(:,:)) [if not already present]
Generating create(corr_array_1_n(:,:,:,:),corr_array_2_n(:,:,:,:),corr_cholesky_mtx_1(:,:,:,:),rcm_mc(:,:)) [if not already present]
Generating copyin(thv_ds_zt_init(:)) [if not already present]
Generating create(rho_ds_zm(:,:)) [if not already present]
Generating copyin(err_info) [if not already present]
Generating create(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 create(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(:,:)) [if not already present]
Generating copyin(pdf_params%mixt_frac(:,:)) [if not already present]
Generating create(pdf_params%rc_1(:,:),pdf_params%chi_2(:,:),pdf_params%cloud_frac_1(:,:),pdf_params%cthl_2(:,:),pdf_params%ice_supersat_frac_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 create(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(:,:)) [if not already present]
Generating copyin(pdf_params_zm%mixt_frac(:,:)) [if not already present]
Generating create(pdf_params_zm%rc_1(:,:),pdf_params_zm%chi_2(:,:),pdf_params_zm%cloud_frac_1(:,:),pdf_params_zm%cthl_2(:,:),pdf_params_zm%ice_supersat_frac_1(:,:),x_nl_all_levs(:,:,:,:)) [if not already present]
2407, Generating create(sclrm_forcing(:,:,:),sclrm(:,:,:),wpsclrp(:,:,:)) [if not already present]
Generating copyin(sclr_tol(:)) [if not already present]
Generating create(sclrpthvp(:,:,:)) [if not already present]
Generating copyin(sclrm_init(:,:)) [if not already present]
Generating create(sclrp2(:,:,:),sclrp3(:,:,:),sclrprtp(:,:,:),sclrpthlp(:,:,:),wpsclrp_sfc(:,:)) [if not already present]
2412, Generating create(edsclrm_forcing(:,:,:)) [if not already present]
Generating copyin(edsclrm_init(:,:)) [if not already present]
Generating create(edsclrm(:,:,:),wpedsclrp_sfc(:,:)) [if not already present]
2416, Generating create(wphydrometp(:,:,:),wp2hmp(:,:,:),thlphmp_zt(:,:,:)) [if not already present]
Generating copyin(hm_metadata%l_mix_rat_hm(:)) [if not already present]
Generating create(rtphmp_zt(:,:,:)) [if not already present]
2421, Generating implicit firstprivate(ngrdcol,lh_num_samples)
Generating NVIDIA GPU code
2422, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2423, ! blockidx%x threadidx%x collapsed
2424, ! blockidx%x threadidx%x collapsed
2425, !$acc loop seq
2425, Loop is parallelizable
2432, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2433, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2434, ! blockidx%x threadidx%x collapsed
2488, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2489, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2490, ! blockidx%x threadidx%x collapsed
2535, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2536, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
2549, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
2550, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2551, ! blockidx%x threadidx%x collapsed
2552, ! blockidx%x threadidx%x collapsed
2549, Generating default present(sclrm_forcing(:,:,:),sclrm(:,:,:),sclrm_init(:,:),sclrp3(:,:,:))
2560, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
2561, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2562, ! blockidx%x threadidx%x collapsed
2563, ! blockidx%x threadidx%x collapsed
2560, Generating default present(sclrpthlp(:,:,:),sclr_tol(:),sclrp2(:,:,:),sclrprtp(:,:,:),wpsclrp(:,:,:),sclrpthvp(:,:,:))
2573, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
2574, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2575, ! blockidx%x threadidx%x collapsed
2573, Generating default present(wpsclrp_sfc(:,:))
2584, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
2585, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2586, ! blockidx%x threadidx%x collapsed
2587, ! blockidx%x threadidx%x collapsed
2584, Generating default present(edsclrm_init(:,:),edsclrm_forcing(:,:,:),edsclrm(:,:,:))
2594, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
2595, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2596, ! blockidx%x threadidx%x collapsed
2594, Generating default present(wpedsclrp_sfc(:,:))
2605, Generating implicit firstprivate(ngrdcol,hydromet_dim)
Generating NVIDIA GPU code
2606, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2607, ! blockidx%x threadidx%x collapsed
2608, ! blockidx%x threadidx%x collapsed
2605, Generating default present(rtphmp_zt(:,:,:),wp2hmp(:,:,:),thlphmp_zt(:,:,:))
2616, Generating implicit firstprivate(ngrdcol,hydromet_dim)
Generating NVIDIA GPU code
2617, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2618, ! blockidx%x threadidx%x collapsed
2619, ! blockidx%x threadidx%x collapsed
2616, Generating default present(wphydrometp(:,:,:))
2637, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2638, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2639, ! blockidx%x threadidx%x collapsed
2637, Generating default present(gr_dycore)
2789, Generating update self(thlp2(:,:),rtpthlp(:,:),wp2(:,:),wp2thvp(:,:),vm(:,:),rtp2(:,:),thlm(:,:),rtm(:,:),wprtp(:,:),rtpthvp(:,:),wp3(:,:),um(:,:),thlpthvp(:,:),wpthlp(:,:))
2792, Generating update self(sclrm(:,:,:))
2793, Generating update self(edsclrm(:,:,:))
2859, Generating update self(rho_zm(:,:),wpthlp_sfc(:),wprtp_sfc(:),p_sfc(:))
2870, Generating update device(veg_t_in_k(:),sfc_soil_t_in_k(:),deep_soil_t_in_k(:))
2874, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2875, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2876, ! blockidx%x threadidx%x collapsed
2892, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2893, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2894, ! blockidx%x threadidx%x collapsed
2905, Generating update self(rfrzm(:,:))
2915, Generating update device(rfrzm(:,:))
3128, Generating update self(pdf_params%varnce_w_1(:,:),pdf_params%thl_2(:,:),pdf_params%stdev_chi_1(:,:),pdf_params%rt_2(:,:),pdf_params%crt_1(:,:),pdf_params%cloud_frac_2(:,:),pdf_params%cthl_1(:,:),pdf_params%crt_2(:,:),pdf_params%cloud_frac_1(:,:),pdf_params%chi_2(:,:),pdf_params%w_1(:,:),pdf_params%varnce_w_2(:,:),pdf_params%thl_1(:,:),pdf_params%stdev_chi_2(:,:),pdf_params%rc_1(:,:),pdf_params%mixt_frac(:,:),pdf_params%rt_1(:,:),pdf_params%rc_2(:,:),pdf_params%chi_1(:,:),p_in_pa(:,:),pdf_params%cthl_2(:,:),kh_zm(:,:),lh_rt_clipped(:,:,:),lh_nc_clipped(:,:,:),lh_sample_point_weights(:,:,:),lh_rc_clipped(:,:,:),corr_array_1_n(:,:,:,:),cloud_frac(:,:),sigma_x_1_n(:,:,:),rtm(:,:),mu_x_1_n(:,:,:),lh_thl_clipped(:,:,:),lh_rv_clipped(:,:,:),wp3(:,:),x_nl_all_levs(:,:,:,:),x_mixt_comp_all_levs(:,:,:),exner(:,:),rho_ds_zm(:,:),rho(:,:),invrs_rho_ds_zt(:,:),wp2(:,:),wm_zt(:,:),thlm(:,:),wm_zm(:,:),pdf_params%w_2(:,:),rho_zm(:,:),rho_ds_zt(:,:),rcm(:,:),corr_array_2_n(:,:,:,:),mu_x_2_n(:,:,:),sigma_x_2_n(:,:,:))
3143, Generating copyout(skw_zm(:,:)) [if not already present]
Generating copyin(wp3_zm(:,:),wp2(:,:),clubb_params(:,:)) [if not already present]
3223, Generating update device(rtp2_mc(:,:),thlm_mc(:,:),rcm_mc(:,:),wprtp_mc(:,:),thlp2_mc(:,:),rvm_mc(:,:),rtpthlp_mc(:,:),wpthlp_mc(:,:))
3225, Generating update device(wphydrometp(:,:,:))
3244, Generating update self(cloud_frac(:,:),rcm(:,:),rho_zm(:,:),rho(:,:),exner(:,:))
3260, Generating update device(thlm_mc(:,:),rcm_mc(:,:))
3266, Generating update self(cloud_frac(:,:))
3281, Generating update self(rtp2_mc(:,:),thlm_mc(:,:),rcm_mc(:,:),wpthlp_mc(:,:),wprtp_mc(:,:),thlp2_mc(:,:),rvm_mc(:,:),rtpthlp_mc(:,:))
3330, Generating update self(p_in_pa(:,:),rho_zm(:,:),thlm(:,:),rtm(:,:),exner(:,:),cloud_frac(:,:),ice_supersat_frac(:,:),rho(:,:),rcm(:,:))
3345, Generating update device(radht(:,:))
3362, Generating update self(radht(:,:))
prescribe_forcings:
6047, Generating enter data create(thlm_bot(:),um_bot(:),z_bot(:),vm_bot(:),exner_bot(:),rtm_bot(:),rho_bot(:),ustar(:),ubar(:))
6062, Generating implicit firstprivate(ngrdcol,nzt)
Generating NVIDIA GPU code
6063, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6064, ! blockidx%x threadidx%x collapsed
6062, Generating default present(rtm_forcing(:ngrdcol,:nzt),thlm_forcing(:ngrdcol,:nzt))
6070, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
6071, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6072, ! blockidx%x threadidx%x collapsed
6070, Generating default present(rtp2_forcing(:ngrdcol,:nzm),rtpthlp_forcing(:ngrdcol,:nzm),wpthlp_forcing(:ngrdcol,:nzm),wprtp_forcing(:ngrdcol,:nzm),thlp2_forcing(:ngrdcol,:nzm))
6117, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6118, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6117, Generating default present(thlm_forcing(:ngrdcol,nzt),rtm_forcing(:ngrdcol,nzt))
6118, Generating implicit firstprivate(nzt)
6178, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6179, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6180, ! blockidx%x threadidx%x collapsed
6178, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),rtm_forcing(:ngrdcol,:gr%nzt),gr)
6202, Generating update self(p_in_pa(:,:))
6208, Generating update device(rtm_forcing(:,:),um_ref(:,:),thlm_forcing(:,:),edsclrm_forcing(:,:,:),sclrm_forcing(:,:,:),vm_ref(:,:),wm_zt(:,:),wm_zm(:,:))
6226, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6227, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6228, ! blockidx%x threadidx%x collapsed
6226, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),rtm_forcing(:ngrdcol,:gr%nzt),gr)
6235, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
6236, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6237, ! blockidx%x threadidx%x collapsed
6238, !$acc loop seq
6235, Generating default present(sclrm_forcing(:ngrdcol,:gr%nzt,:sclr_dim),gr)
6238, Loop is parallelizable
6246, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
6247, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6248, ! blockidx%x threadidx%x collapsed
6249, !$acc loop seq
6246, Generating default present(gr,edsclrm_forcing(:ngrdcol,:gr%nzt,:edsclr_dim))
6249, Loop is parallelizable
6327, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6328, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6327, Generating default present(ustar(:ngrdcol))
6351, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6352, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6351, Generating default present(ustar(:ngrdcol))
6365, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6366, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6365, Generating default present(ustar(:ngrdcol))
6387, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6388, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6387, Generating default present(ustar(:ngrdcol))
6517, Generating update self(rho_bot(:))
6520, Generating update device(ustar(:),wpthlp_sfc(:),wprtp_sfc(:))
6578, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6579, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6578, Generating default present(wpthlp_sfc(:ngrdcol),wprtp_sfc(:ngrdcol))
6579, Generating implicit firstprivate(sens_ht,latent_ht)
6585, Generating implicit firstprivate(ngrdcol,nzm)
Generating NVIDIA GPU code
6586, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6587, ! blockidx%x threadidx%x collapsed
6585, Generating default present(wpsclrp(:ngrdcol,:nzm,sclr_idx%iisclr_thl),sclr_idx)
6587, Generating implicit firstprivate(sens_ht)
6594, Generating implicit firstprivate(ngrdcol,nzm)
Generating NVIDIA GPU code
6595, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6596, ! blockidx%x threadidx%x collapsed
6594, Generating default present(wpsclrp(:ngrdcol,:nzm,sclr_idx%iisclr_rt),sclr_idx)
6596, Generating implicit firstprivate(latent_ht)
6607, Generating update self(rho_zm(:,:),upwp_sfc(:),ustar(:),t_sfc(:),vpwp_sfc(:),wpthlp_sfc(:),wprtp_sfc(:))
6637, 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:
6742, Generating create(thlm_zm(:,:),um_zm(:,:),vm_zm(:,:),k_min(:),rtm_zm(:,:),exner_zm(:,:)) [if not already present]
6747, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6748, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6747, 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))
6767, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6768, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6775, !$acc loop seq
6767, Generating default present(gr,z_bot(:ngrdcol),gr%zt(1:ngrdcol,:))
6768, Generating implicit firstprivate(k,min_val)
6775, Loop carried scalar dependence for min_val at line 6776
Loop carried reuse of k_min prevents parallelization
6785, Generating update self(k_min(:))
6818, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6819, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6818, 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,:))
6819, 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-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 223)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 227)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 280)
NVFORTRAN-W-0435-Array declared with zero size (../src/G_unit_test_types/spurious_source_test.F90: 283)
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/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.
174 : 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.
175 : 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.
212 : 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.
213 : stats_sfc(i) ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/soil_vegetation.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
../src/pdf_hydromet_microphys_wrapper.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
296 : stats_zt(i), stats_zm(i), & ! In/Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
300 : !$acc update device( mu_x_1_n, mu_x_2_n, sigma_x_1_n, sigma_x_2_n, corr_array_1_n, corr_array_2_n, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
396 : !$acc lh_rt_clipped, lh_thl_clipped, lh_rc_clipped, lh_rv_clipped, lh_Nc_clipped )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/pdf_hydromet_microphys_wrapper.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: 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: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
../src/generalized_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
736 : pdf_params_zm_flip%ice_supersat_frac_1(i,:) = flip( pdf_params_zm%ice_supersat_frac_1(i,:), nzm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
737 : pdf_params_zm_flip%ice_supersat_frac_2(i,:) = flip( pdf_params_zm%ice_supersat_frac_2(i,:), nzm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
904 : rtm_ref_flip, thlm_ref_flip, um_ref_flip, vm_ref_flip, ug_flip, vg_flip, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
916 : um_flip, vm_flip, upwp_flip, vpwp_flip, up2_flip, vp2_flip, up3_flip, vp3_flip, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
918 : wp2_flip, wp3_flip, rtp2_flip, rtp3_flip, thlp2_flip, thlp3_flip, rtpthlp_flip, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
924 : wp2rtp_flip, wp2thlp_flip, uprcp_flip, vprcp_flip, rc_coef_zm_flip, wp4_flip, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
925 : wpup2_flip, wpvp2_flip, wp2up2_flip, wp2vp2_flip, ice_supersat_frac_flip, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/generalized_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1865 : allocate( um_ref(ngrdcol, gr%nzt) ) ! Reference u wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1866 : allocate( vm_ref(ngrdcol, gr%nzt) ) ! Reference v wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2194 : ! Initialize statistics output, note that this will allocate/initialize stats variables for all
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2216 : ! Initialize statistics output, note that this will allocate/initialize stats variables for all
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2369 : !$acc rcm_in_layer, cloud_cover, wprcp, w_up_in_cloud, w_down_in_cloud, cloudy_updraft_frac, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2381 : !$acc pdf_params%corr_w_thl_2, pdf_params%corr_rt_thl_1, pdf_params%corr_rt_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2382 : !$acc pdf_params%alpha_thl, pdf_params%alpha_rt, pdf_params%crt_1, pdf_params%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2385 : !$acc pdf_params%stdev_eta_2, pdf_params%covar_chi_eta_1, pdf_params%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2387 : !$acc pdf_params%corr_w_eta_2, pdf_params%corr_chi_eta_1, pdf_params%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2393 : !$acc pdf_params_zm%thl_2, pdf_params_zm%varnce_thl_1, pdf_params_zm%varnce_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2394 : !$acc pdf_params_zm%corr_w_rt_1, pdf_params_zm%corr_w_rt_2, pdf_params_zm%corr_w_thl_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2395 : !$acc pdf_params_zm%corr_w_thl_2, pdf_params_zm%corr_rt_thl_1, pdf_params_zm%corr_rt_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2396 : !$acc pdf_params_zm%alpha_thl, pdf_params_zm%alpha_rt, pdf_params_zm%crt_1, pdf_params_zm%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2397 : !$acc pdf_params_zm%cthl_1, pdf_params_zm%cthl_2, pdf_params_zm%chi_1, pdf_params_zm%chi_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2398 : !$acc pdf_params_zm%stdev_chi_1, pdf_params_zm%stdev_chi_2, pdf_params_zm%stdev_eta_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2399 : !$acc pdf_params_zm%stdev_eta_2, pdf_params_zm%covar_chi_eta_1, pdf_params_zm%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2400 : !$acc pdf_params_zm%corr_w_chi_1, pdf_params_zm%corr_w_chi_2, pdf_params_zm%corr_w_eta_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2401 : !$acc pdf_params_zm%corr_w_eta_2, pdf_params_zm%corr_chi_eta_1, pdf_params_zm%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2402 : !$acc pdf_params_zm%rsatl_1, pdf_params_zm%rsatl_2, pdf_params_zm%rc_1, pdf_params_zm%rc_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2450 : invrs_rho_ds_zt(i,k) = invrs_rho_ds_zt_init(k) ! inv. dry, static density: t-levs
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2456 : um_pert(i,k) = zero ! Variables used to track perturbed version of winds.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2458 : wm_zt(i,k) = wm_zt_init(k) ! Imposed large scale w - Thermodynamic levels
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2800 : um(i,:), vm(i,:), rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3130 : !$acc X_nl_all_levs, X_mixt_comp_all_levs, lh_sample_point_weights, mu_x_1_n, mu_x_2_n, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3132 : !$acc lh_rt_clipped, lh_thl_clipped, lh_rc_clipped, lh_rv_clipped, lh_Nc_clipped, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3136 : !$acc pdf_params%cloud_frac_1, pdf_params%cloud_frac_2, pdf_params%cthl_1, pdf_params%cthl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3137 : !$acc pdf_params%crt_1, pdf_params%crt_2, pdf_params%stdev_chi_1, pdf_params%stdev_chi_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3160 : thlm(i,:), p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), rtm(i,:), &! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3161 : rcm(i,:), cloud_frac(i,:), wm_zt(i,:), wm_zm(i,:), wp2_zt(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3162 : hydromet(i,:,:), Nc_in_cloud(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3178 : stats_zt(i), stats_zm(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3179 : stats_sfc(i), stats_lh_zt(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3180 : Nccnm(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3181 : hydromet_mc(i,:,:), Ncm_mc(i,:), rcm_mc(i,:), rvm_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3182 : thlm_mc(i,:), hydromet_vel_zt(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3183 : hydromet_vel_covar_zt_impc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3184 : hydromet_vel_covar_zt_expc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3185 : wprtp_mc(i,:), wpthlp_mc(i,:), rtp2_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3186 : thlp2_mc(i,:), rtpthlp_mc(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3210 : stats_zt(i), stats_zm(i), stats_sfc(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3211 : hydromet(i,:,:), hydromet_vel_zt(i,:,:), hydrometp2(i,:,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3212 : K_hm(i,:,:), Ncm(i,:), Nc_in_cloud(i,:), rvm_mc(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3213 : thlm_mc(i,:), err_info, & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3214 : wphydrometp(i,:,:), wpNcp(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3223 : !$acc update device( rcm_mc, rvm_mc, thlm_mc, wprtp_mc, wpthlp_mc, rtp2_mc, thlp2_mc, rtpthlp_mc )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3281 : !$acc update host( rvm_mc, rcm_mc, thlm_mc, wprtp_mc, wpthlp_mc, rtp2_mc, thlp2_mc, rtpthlp_mc )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3287 : call stat_update_var( stats_metadata%irtm_mc, rvm_mc(i,:)+rcm_mc(i,:), stats_zt(i) ) ! kg/kg/s
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3289 : call stat_update_var( stats_metadata%iwprtp_mc, wprtp_mc(i,:), stats_zm(i) ) ! m*(kg/kg)/s^2
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3291 : call stat_update_var( stats_metadata%irtp2_mc, rtp2_mc(i,:), stats_zm(i) ) ! (kg/kg)^2/s
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3293 : call stat_update_var( stats_metadata%irtpthlp_mc, rtpthlp_mc(i,:), stats_zm(i) ) ! K*(kg/kg)/s
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3310 : !$acc update host( rho, rho_zm, p_in_Pa, exner, cloud_frac, ice_supersat_frac, X_nl_all_levs, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3330 : !$acc update host( rho, rho_zm, p_in_Pa, exner, cloud_frac, ice_supersat_frac, thlm, rtm, rcm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3370 : call update_radiation_variables( gr%nzm, gr%nzt, radht(i,:), Frad_SW_up(i,:), Frad_LW_up(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3399 : 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.
6047 : !$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.
6208 : !$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.
6610 : 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.
6613 : 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.
6616 : call stat_update_var_pt( stats_metadata%iwpthlp_sfc, 1, wpthlp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6619 : call stat_update_var_pt( stats_metadata%iwprtp_sfc, 1, wprtp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6622 : call stat_update_var_pt( stats_metadata%iupwp_sfc, 1, upwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6625 : call stat_update_var_pt( stats_metadata%ivpwp_sfc, 1, vpwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6628 : call stat_update_var_pt( stats_metadata%iustar, 1, ustar(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6631 : call stat_update_var_pt( stats_metadata%iT_sfc, 1, T_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6637 : !$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.
6839 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6843 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6847 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6848 : exner_zm(i,km1), exner_zm(i,k00), exner_zm(i,kp1), exner_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6851 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6852 : thlm_zm(i,km1), thlm_zm(i,k00), thlm_zm(i,kp1), thlm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6855 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6856 : rtm_zm(i,km1), rtm_zm(i,k00), rtm_zm(i,kp1), rtm_zm(i,kp2) )
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: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
../src/CLUBB_core/err_info_type_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
265 : write(err_info%err_header_global,'(A38, I3, A15, I3, A, A28, A33, F6.2, A1, F6.2, A, A39, A40)') &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
276 : write(err_info%err_header(i),'(A38, I3, A15, I3, A, A22, I2, A11, F6.2, A13, F6.2, A, A39, A40)') &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/err_info_type_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1002 : call windm_edsclrm_rhs( nzm, nzt, ngrdcol, gr, windm_edsclrm_scalar, dt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1003 : lhs_diff, edsclrm(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1004 : edsclrm_forcing(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1005 : rho_ds_zm, invrs_rho_ds_zt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1006 : l_imp_sfc_momentum_flux, wpedsclrp(:,gr%k_lb_zm,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1007 : stats_metadata, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1008 : stats_zt, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1009 : rhs(:,:,edsclr) ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_windm_edsclrm_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
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.
1371 : status = nf90_def_var( ncid_zm, "columns", NF90_INT, (/column_id_zm/), column_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1372 : status = nf90_def_var( ncid_zm, "altitude", NF90_PREC, (/vertical_id_zm/), vertical_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1373 : status = nf90_def_var( ncid_zm, "time", NF90_PREC, (/time_id_zm/), time_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1425 : status = nf90_def_var( ncid_zt, "columns", NF90_INT, (/column_id_zt/), column_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1426 : status = nf90_def_var( ncid_zt, "altitude", NF90_PREC, (/vertical_id_zt/), vertical_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1427 : status = nf90_def_var( ncid_zt, "time", NF90_PREC, (/time_id_zt/), time_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1473 : status = nf90_put_var( ncid_zm, column_var_id_zm, column_list, start=(/1/), count=(/ngrdcol/) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1474 : status = nf90_put_var( ncid_zt, column_var_id_zt, column_list, start=(/1/), count=(/ngrdcol/) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1476 : !=================================== Allocate Output Arrays ===================================
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1603 : !$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.
775 : call sfc_varnce_check( sclr_dim, wp2(i,gr%k_lb_zm), up2(i,gr%k_lb_zm), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
776 : vp2(i,gr%k_lb_zm), thlp2(i,gr%k_lb_zm), rtp2(i,gr%k_lb_zm), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
777 : rtpthlp(i,gr%k_lb_zm), sclrp2(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
778 : sclrprtp(i,gr%k_lb_zm,:), sclrpthlp(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
779 : err_info ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/sfc_varnce_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
688 : !$acc parallel loop gang vector collapse(2) default(present) reduction(.or.:l_any_adjustment_needed)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
839 : ! 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.
2305 : call stat_update_var( stats_metadata%icovar_chi_eta_1, pdf_params%covar_chi_eta_1(icol,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2307 : call stat_update_var( stats_metadata%icovar_chi_eta_2, pdf_params%covar_chi_eta_2(icol,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2317 : call stat_update_var( stats_metadata%icorr_chi_eta_1, pdf_params%corr_chi_eta_1(icol,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2319 : call stat_update_var( stats_metadata%icorr_chi_eta_2, pdf_params%corr_chi_eta_2(icol,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2380 : chip2 = compute_variance_binormal( chi, pdf_params%chi_1(icol,:), pdf_params%chi_2(icol,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2381 : pdf_params%stdev_chi_1(icol,:), pdf_params%stdev_chi_2(icol,:), &
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.
1319 : sclrprtp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1354 : sclrpthlp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_xp2_xpyp_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
782 : call wpxp_term_pr1_lhs( nzm, ngrdcol, gr, C6rt_Skw_fnc, C6thl_Skw_fnc, C7_Skw_fnc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
783 : invrs_tau_C6_zm, l_scalar_calc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
784 : lhs_pr1_wprtp, lhs_pr1_wpthlp, lhs_pr1_wpsclrp ) ! Intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
862 : stats_zt, stats_zm, stats_sfc, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
863 : rtm, wprtp, thlm, wpthlp, sclrm, wpsclrp, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
864 : err_info ) ! InOut
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.
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.
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.
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.
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.
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 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 has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
../src/G_unit_test_types/rev_direction_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
229 : !seed used = -1102123834 1480475276 -248259584 525496705 1614213535 -1267052688 6290033 -78466652
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
230 : !seed_output = (/ -1102123834, 1480475276, -248259584, 525496705, 1614213535, -1267052688, 6290033, -78466652 /)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
746 : call xpyp_term_ta_pdf_lhs_godunov( gr_ascending%nzm, gr_ascending%nzt, 1, gr_ascending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
750 : call xpyp_term_ta_pdf_lhs_godunov( gr_descending%nzm, gr_descending%nzt, 1, gr_descending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
791 : call xpyp_term_ta_pdf_rhs_godunov( gr_ascending%nzm, gr_ascending%nzt, 1, gr_ascending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
797 : call xpyp_term_ta_pdf_rhs_godunov( gr_descending%nzm, gr_descending%nzt, 1, gr_descending, & ! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/G_unit_test_types/rev_direction_grid_test.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
............................................................................................................................................................................................................................................................................................................................................................................................................................................................................................run_clubb:
2331, 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 create(mu_x_2_n(:,:,:)) [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(:),p_sfc(:),pdf_params%w_2(:,:)) [if not already present]
Generating create(rvm_mc(:,:),cloudy_updraft_frac(:,:)) [if not already present]
Generating copyin(gr%zt(:,:)) [if not already present]
Generating create(sigma_x_2_n(:,:,:)) [if not already present]
Generating copyin(p_in_pa_init(:),exner_init(:),sclr_idx,deep_soil_t_in_k_init(:),dummy_dx(:),pdf_params%varnce_w_2(:,:),pdf_params%w_1(:,:)) [if not already present]
Generating create(pdf_params%varnce_thl_2(:,:)) [if not already present]
Generating copyin(pdf_params%varnce_w_1(:,:)) [if not already present]
Generating create(pdf_params%ice_supersat_frac_2(:,:)) [if not already present]
Generating copyin(pdf_params_zm%varnce_w_2(:,:),pdf_params_zm%w_1(:,:)) [if not already present]
Generating create(pdf_params_zm%varnce_thl_2(:,:)) [if not already present]
Generating copyin(pdf_params_zm%varnce_w_1(:,:)) [if not already present]
Generating create(pdf_params_zm%ice_supersat_frac_2(:,:),thlm_forcing(:,:),rtm_forcing(:,:),um_forcing(:,:),vm_forcing(:,:),ug(:,:),vg(:,:),wp2(:,:),up2(:,:),vp2(:,:),rcm_in_layer(:,:),wm_zt(:,:),wm_zm(:,:)) [if not already present]
Generating copyin(dummy_dy(:)) [if not already present]
Generating create(exner(:,:),thvm(:,:),p_in_pa(:,:)) [if not already present]
Generating copyin(rho_ds_zt_init(:)) [if not already present]
Generating create(rho_zm(:,:)) [if not already present]
Generating copyin(rho_ds_zm_dycore_init(:)) [if not already present]
Generating create(rho_ds_zt(:,:),invrs_rho_ds_zm(:,:),invrs_rho_ds_zt(:,:),thv_ds_zm(:,:),thv_ds_zt(:,:),rtm_ref(:,:),thlm_ref(:,:),um_ref(:,:),deep_soil_t_in_k(:),sfc_soil_t_in_k(:),veg_t_in_k(:),vm_ref(:,:),rho_ds_zm_dycore(:,:)) [if not already present]
Generating copyin(em_init(:)) [if not already present]
Generating create(err_info%err_code(:)) [if not already present]
Generating copyin(rho_zm_init(:),wm_zm_init(:),thvm_init(:),veg_t_in_k_init(:)) [if not already present]
Generating create(um_pert(:,:),vm_pert(:,:),thlm(:,:),rtm(:,:),um(:,:),vm(:,:),w_up_in_cloud(:,:),wprtp(:,:),wpthlp(:,:),rtp2(:,:),thlp2(:,:),rtpthlp(:,:),wpthlp_mc(:,:),wprtp_mc(:,:),upwp_pert(:,:),vpwp_pert(:,:),corr_cholesky_mtx_2(:,:,:,:)) [if not already present]
Generating copyin(sfc_elevation(:)) [if not already present]
Generating create(upwp_sfc_pert(:)) [if not already present]
Generating copyin(rcm_init(:)) [if not already present]
Generating create(rtpthvp(:,:)) [if not already present]
Generating copyin(thlm_init(:),pdf_params_zm%w_2(:,:)) [if not already present]
Generating create(wprtp_forcing(:,:),wpthlp_forcing(:,:),rtp2_forcing(:,:),thlp2_forcing(:,:),rtpthlp_forcing(:,:),thlp3(:,:),wprcp(:,:),wprtp_sfc(:)) [if not already present]
Generating copyin(rtm_ref_init(:),thlm_ref_init(:)) [if not already present]
Generating create(rtp3(:,:)) [if not already present]
Generating copyin(wm_zt_init(:)) [if not already present]
Generating create(wp2vp2(:,:),wp2thlp(:,:),rtpthlp_mc(:,:),thlprcp(:,:)) [if not already present]
Generating copyin(rho_init(:)) [if not already present]
Generating create(rfrzm(:,:),rho(:,:)) [if not already present]
Generating copyin(rho_ds_zm_init(:)) [if not already present]
Generating create(ice_supersat_frac(:,:)) [if not already present]
Generating copyin(invrs_rho_ds_zm_init(:)) [if not already present]
Generating create(thlpthvp(:,:)) [if not already present]
Generating copyin(thv_ds_zm_init(:)) [if not already present]
Generating create(upwp_sfc(:),vpwp_sfc(:)) [if not already present]
Generating copyin(rtm_init(:)) [if not already present]
Generating create(thlm_mc(:,:)) [if not already present]
Generating copyin(ug_init(:)) [if not already present]
Generating create(uprcp(:,:)) [if not already present]
Generating copyin(vg_init(:)) [if not already present]
Generating create(vprcp(:,:)) [if not already present]
Generating copyin(um_ref_init(:),vm_ref_init(:),up2_init(:),vp2_init(:),t_sfc(:)) [if not already present]
Generating create(rtp2_mc(:,:),thlp2_mc(:,:)) [if not already present]
Generating copyin(nu_vert_res_dep%nu9(:),err_info%err_header(:)) [if not already present]
Generating create(rc_coef_zm(:,:),cloud_cover(:,:),wpthlp_sfc(:)) [if not already present]
Generating copyin(wp2_init(:)) [if not already present]
Generating create(wp2rtp(:,:),up3(:,:),vp3(:,:),radht(:,:),wp3(:,:),wpthvp(:,:),wpup2(:,:),wp2thvp(:,:),wp2up2(:,:)) [if not already present]
Generating copyin(hm_metadata,um_init(:),vm_init(:)) [if not already present]
Generating create(upwp(:,:),vpwp(:,:),rcm(:,:),wp4(:,:),w_down_in_cloud(:,:),vpwp_sfc_pert(:),cloudy_downdraft_frac(:,:),cloud_frac(:,:)) [if not already present]
Generating copyin(invrs_rho_ds_zt_init(:)) [if not already present]
Generating create(kh_zm(:,:),invrs_tau_zm(:,:),lh_thl_clipped(:,:,:),x_mixt_comp_all_levs(:,:,:),wpvp2(:,:),lh_rv_clipped(:,:,:),lh_rc_clipped(:,:,:),lh_sample_point_weights(:,:,:),lh_nc_clipped(:,:,:),lh_rt_clipped(:,:,:),kh_zt(:,:),lscale(:,:),mu_x_1_n(:,:,:)) [if not already present]
Generating copyin(sfc_soil_t_in_k_init(:)) [if not already present]
Generating create(sigma_x_1_n(:,:,:)) [if not already present]
Generating copyin(clubb_params(:,:)) [if not already present]
Generating create(corr_array_1_n(:,:,:,:),corr_array_2_n(:,:,:,:),corr_cholesky_mtx_1(:,:,:,:),rcm_mc(:,:)) [if not already present]
Generating copyin(thv_ds_zt_init(:)) [if not already present]
Generating create(rho_ds_zm(:,:)) [if not already present]
Generating copyin(err_info) [if not already present]
Generating create(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 create(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(:,:)) [if not already present]
Generating copyin(pdf_params%mixt_frac(:,:)) [if not already present]
Generating create(pdf_params%rc_1(:,:),pdf_params%chi_2(:,:),pdf_params%cloud_frac_1(:,:),pdf_params%cthl_2(:,:),pdf_params%ice_supersat_frac_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 create(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(:,:)) [if not already present]
Generating copyin(pdf_params_zm%mixt_frac(:,:)) [if not already present]
Generating create(pdf_params_zm%rc_1(:,:),pdf_params_zm%chi_2(:,:),pdf_params_zm%cloud_frac_1(:,:),pdf_params_zm%cthl_2(:,:),pdf_params_zm%ice_supersat_frac_1(:,:),x_nl_all_levs(:,:,:,:)) [if not already present]
2407, Generating create(sclrm_forcing(:,:,:),sclrm(:,:,:),wpsclrp(:,:,:)) [if not already present]
Generating copyin(sclr_tol(:)) [if not already present]
Generating create(sclrpthvp(:,:,:)) [if not already present]
Generating copyin(sclrm_init(:,:)) [if not already present]
Generating create(sclrp2(:,:,:),sclrp3(:,:,:),sclrprtp(:,:,:),sclrpthlp(:,:,:),wpsclrp_sfc(:,:)) [if not already present]
2412, Generating create(edsclrm_forcing(:,:,:)) [if not already present]
Generating copyin(edsclrm_init(:,:)) [if not already present]
Generating create(edsclrm(:,:,:),wpedsclrp_sfc(:,:)) [if not already present]
2416, Generating create(wphydrometp(:,:,:),wp2hmp(:,:,:),thlphmp_zt(:,:,:)) [if not already present]
Generating copyin(hm_metadata%l_mix_rat_hm(:)) [if not already present]
Generating create(rtphmp_zt(:,:,:)) [if not already present]
2421, Generating implicit firstprivate(ngrdcol,lh_num_samples)
Generating NVIDIA GPU code
2422, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2423, ! blockidx%x threadidx%x collapsed
2424, ! blockidx%x threadidx%x collapsed
2425, !$acc loop seq
2425, Loop is parallelizable
2432, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2433, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2434, ! blockidx%x threadidx%x collapsed
2488, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2489, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2490, ! blockidx%x threadidx%x collapsed
2535, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2536, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
2549, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
2550, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2551, ! blockidx%x threadidx%x collapsed
2552, ! blockidx%x threadidx%x collapsed
2549, Generating default present(sclrm_forcing(:,:,:),sclrm(:,:,:),sclrm_init(:,:),sclrp3(:,:,:))
2560, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
2561, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2562, ! blockidx%x threadidx%x collapsed
2563, ! blockidx%x threadidx%x collapsed
2560, Generating default present(sclrpthlp(:,:,:),sclr_tol(:),sclrp2(:,:,:),sclrprtp(:,:,:),wpsclrp(:,:,:),sclrpthvp(:,:,:))
2573, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
2574, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2575, ! blockidx%x threadidx%x collapsed
2573, Generating default present(wpsclrp_sfc(:,:))
2584, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
2585, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2586, ! blockidx%x threadidx%x collapsed
2587, ! blockidx%x threadidx%x collapsed
2584, Generating default present(edsclrm_init(:,:),edsclrm_forcing(:,:,:),edsclrm(:,:,:))
2594, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
2595, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2596, ! blockidx%x threadidx%x collapsed
2594, Generating default present(wpedsclrp_sfc(:,:))
2605, Generating implicit firstprivate(ngrdcol,hydromet_dim)
Generating NVIDIA GPU code
2606, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2607, ! blockidx%x threadidx%x collapsed
2608, ! blockidx%x threadidx%x collapsed
2605, Generating default present(rtphmp_zt(:,:,:),wp2hmp(:,:,:),thlphmp_zt(:,:,:))
2616, Generating implicit firstprivate(ngrdcol,hydromet_dim)
Generating NVIDIA GPU code
2617, !$acc loop gang, vector(128) collapse(3) ! blockidx%x threadidx%x
2618, ! blockidx%x threadidx%x collapsed
2619, ! blockidx%x threadidx%x collapsed
2616, Generating default present(wphydrometp(:,:,:))
2637, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2638, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2639, ! blockidx%x threadidx%x collapsed
2637, Generating default present(gr_dycore)
2789, Generating update self(thlp2(:,:),rtpthlp(:,:),wp2(:,:),wp2thvp(:,:),vm(:,:),rtp2(:,:),thlm(:,:),rtm(:,:),wprtp(:,:),rtpthvp(:,:),wp3(:,:),um(:,:),thlpthvp(:,:),wpthlp(:,:))
2792, Generating update self(sclrm(:,:,:))
2793, Generating update self(edsclrm(:,:,:))
2859, Generating update self(rho_zm(:,:),wpthlp_sfc(:),wprtp_sfc(:),p_sfc(:))
2870, Generating update device(veg_t_in_k(:),sfc_soil_t_in_k(:),deep_soil_t_in_k(:))
2874, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2875, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2876, ! blockidx%x threadidx%x collapsed
2892, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
2893, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
2894, ! blockidx%x threadidx%x collapsed
2905, Generating update self(rfrzm(:,:))
2915, Generating update device(rfrzm(:,:))
3128, Generating update self(pdf_params%varnce_w_1(:,:),pdf_params%thl_2(:,:),pdf_params%stdev_chi_1(:,:),pdf_params%rt_2(:,:),pdf_params%crt_1(:,:),pdf_params%cloud_frac_2(:,:),pdf_params%cthl_1(:,:),pdf_params%crt_2(:,:),pdf_params%cloud_frac_1(:,:),pdf_params%chi_2(:,:),pdf_params%w_1(:,:),pdf_params%varnce_w_2(:,:),pdf_params%thl_1(:,:),pdf_params%stdev_chi_2(:,:),pdf_params%rc_1(:,:),pdf_params%mixt_frac(:,:),pdf_params%rt_1(:,:),pdf_params%rc_2(:,:),pdf_params%chi_1(:,:),p_in_pa(:,:),pdf_params%cthl_2(:,:),kh_zm(:,:),lh_rt_clipped(:,:,:),lh_nc_clipped(:,:,:),lh_sample_point_weights(:,:,:),lh_rc_clipped(:,:,:),corr_array_1_n(:,:,:,:),cloud_frac(:,:),sigma_x_1_n(:,:,:),rtm(:,:),mu_x_1_n(:,:,:),lh_thl_clipped(:,:,:),lh_rv_clipped(:,:,:),wp3(:,:),x_nl_all_levs(:,:,:,:),x_mixt_comp_all_levs(:,:,:),exner(:,:),rho_ds_zm(:,:),rho(:,:),invrs_rho_ds_zt(:,:),wp2(:,:),wm_zt(:,:),thlm(:,:),wm_zm(:,:),pdf_params%w_2(:,:),rho_zm(:,:),rho_ds_zt(:,:),rcm(:,:),corr_array_2_n(:,:,:,:),mu_x_2_n(:,:,:),sigma_x_2_n(:,:,:))
3143, Generating copyout(skw_zm(:,:)) [if not already present]
Generating copyin(wp3_zm(:,:),wp2(:,:),clubb_params(:,:)) [if not already present]
3223, Generating update device(rtp2_mc(:,:),thlm_mc(:,:),rcm_mc(:,:),wprtp_mc(:,:),thlp2_mc(:,:),rvm_mc(:,:),rtpthlp_mc(:,:),wpthlp_mc(:,:))
3225, Generating update device(wphydrometp(:,:,:))
3244, Generating update self(cloud_frac(:,:),rcm(:,:),rho_zm(:,:),rho(:,:),exner(:,:))
3260, Generating update device(thlm_mc(:,:),rcm_mc(:,:))
3266, Generating update self(cloud_frac(:,:))
3281, Generating update self(rtp2_mc(:,:),thlm_mc(:,:),rcm_mc(:,:),wpthlp_mc(:,:),wprtp_mc(:,:),thlp2_mc(:,:),rvm_mc(:,:),rtpthlp_mc(:,:))
3330, Generating update self(p_in_pa(:,:),rho_zm(:,:),thlm(:,:),rtm(:,:),exner(:,:),cloud_frac(:,:),ice_supersat_frac(:,:),rho(:,:),rcm(:,:))
3345, Generating update device(radht(:,:))
prescribe_forcings:
6045, Generating enter data create(thlm_bot(:),um_bot(:),z_bot(:),vm_bot(:),exner_bot(:),rtm_bot(:),rho_bot(:),ustar(:),ubar(:))
6060, Generating implicit firstprivate(ngrdcol,nzt)
Generating NVIDIA GPU code
6061, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6062, ! blockidx%x threadidx%x collapsed
6060, Generating default present(rtm_forcing(:ngrdcol,:nzt),thlm_forcing(:ngrdcol,:nzt))
6068, Generating implicit firstprivate(nzm,ngrdcol)
Generating NVIDIA GPU code
6069, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6070, ! blockidx%x threadidx%x collapsed
6068, Generating default present(rtp2_forcing(:ngrdcol,:nzm),rtpthlp_forcing(:ngrdcol,:nzm),wpthlp_forcing(:ngrdcol,:nzm),wprtp_forcing(:ngrdcol,:nzm),thlp2_forcing(:ngrdcol,:nzm))
6115, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6116, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6115, Generating default present(thlm_forcing(:ngrdcol,nzt),rtm_forcing(:ngrdcol,nzt))
6116, Generating implicit firstprivate(nzt)
6176, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6177, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6178, ! blockidx%x threadidx%x collapsed
6176, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),rtm_forcing(:ngrdcol,:gr%nzt),gr)
6200, Generating update self(p_in_pa(:,:))
6206, Generating update device(rtm_forcing(:,:),um_ref(:,:),thlm_forcing(:,:),edsclrm_forcing(:,:,:),sclrm_forcing(:,:,:),vm_ref(:,:),wm_zt(:,:),wm_zm(:,:))
6224, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6225, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6226, ! blockidx%x threadidx%x collapsed
6224, Generating default present(thlm_forcing(:ngrdcol,:gr%nzt),rtm_forcing(:ngrdcol,:gr%nzt),gr)
6233, Generating implicit firstprivate(sclr_dim,ngrdcol)
Generating NVIDIA GPU code
6234, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6235, ! blockidx%x threadidx%x collapsed
6236, !$acc loop seq
6233, Generating default present(sclrm_forcing(:ngrdcol,:gr%nzt,:sclr_dim),gr)
6236, Loop is parallelizable
6244, Generating implicit firstprivate(ngrdcol,edsclr_dim)
Generating NVIDIA GPU code
6245, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6246, ! blockidx%x threadidx%x collapsed
6247, !$acc loop seq
6244, Generating default present(gr,edsclrm_forcing(:ngrdcol,:gr%nzt,:edsclr_dim))
6247, Loop is parallelizable
6325, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6326, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6325, Generating default present(ustar(:ngrdcol))
6349, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6350, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6349, Generating default present(ustar(:ngrdcol))
6363, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6364, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6363, Generating default present(ustar(:ngrdcol))
6385, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6386, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6385, Generating default present(ustar(:ngrdcol))
6515, Generating update self(rho_bot(:))
6518, Generating update device(ustar(:),wpthlp_sfc(:),wprtp_sfc(:))
6576, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6577, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6576, Generating default present(wpthlp_sfc(:ngrdcol),wprtp_sfc(:ngrdcol))
6577, Generating implicit firstprivate(sens_ht,latent_ht)
6583, Generating implicit firstprivate(ngrdcol,nzm)
Generating NVIDIA GPU code
6584, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6585, ! blockidx%x threadidx%x collapsed
6583, Generating default present(wpsclrp(:ngrdcol,:nzm,sclr_idx%iisclr_thl),sclr_idx)
6585, Generating implicit firstprivate(sens_ht)
6592, Generating implicit firstprivate(ngrdcol,nzm)
Generating NVIDIA GPU code
6593, !$acc loop gang, vector(128) collapse(2) ! blockidx%x threadidx%x
6594, ! blockidx%x threadidx%x collapsed
6592, Generating default present(wpsclrp(:ngrdcol,:nzm,sclr_idx%iisclr_rt),sclr_idx)
6594, Generating implicit firstprivate(latent_ht)
6605, Generating update self(rho_zm(:,:),upwp_sfc(:),ustar(:),t_sfc(:),vpwp_sfc(:),wpthlp_sfc(:),wprtp_sfc(:))
6635, 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:
6740, Generating create(thlm_zm(:,:),um_zm(:,:),vm_zm(:,:),k_min(:),rtm_zm(:,:),exner_zm(:,:)) [if not already present]
6745, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6746, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6745, 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))
6765, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6766, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6773, !$acc loop seq
6765, Generating default present(gr,z_bot(:ngrdcol),gr%zt(1:ngrdcol,:))
6766, Generating implicit firstprivate(k,min_val)
6773, Loop carried scalar dependence for min_val at line 6774
Loop carried reuse of k_min prevents parallelization
6783, Generating update self(k_min(:))
6816, Generating implicit firstprivate(ngrdcol)
Generating NVIDIA GPU code
6817, !$acc loop gang, vector(128) ! blockidx%x threadidx%x
6816, 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,:))
6817, Generating implicit firstprivate(k00,km1,kp2,kp1)
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.
174 : 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.
175 : 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.
212 : 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.
213 : stats_sfc(i) ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/soil_vegetation.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
../src/pdf_hydromet_microphys_wrapper.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
296 : stats_zt(i), stats_zm(i), & ! In/Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
300 : !$acc update device( mu_x_1_n, mu_x_2_n, sigma_x_1_n, sigma_x_2_n, corr_array_1_n, corr_array_2_n, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
396 : !$acc lh_rt_clipped, lh_thl_clipped, lh_rc_clipped, lh_rv_clipped, lh_Nc_clipped )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/pdf_hydromet_microphys_wrapper.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: 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: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
../src/generalized_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
736 : pdf_params_zm_flip%ice_supersat_frac_1(i,:) = flip( pdf_params_zm%ice_supersat_frac_1(i,:), nzm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
737 : pdf_params_zm_flip%ice_supersat_frac_2(i,:) = flip( pdf_params_zm%ice_supersat_frac_2(i,:), nzm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
904 : rtm_ref_flip, thlm_ref_flip, um_ref_flip, vm_ref_flip, ug_flip, vg_flip, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
916 : um_flip, vm_flip, upwp_flip, vpwp_flip, up2_flip, vp2_flip, up3_flip, vp3_flip, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
918 : wp2_flip, wp3_flip, rtp2_flip, rtp3_flip, thlp2_flip, thlp3_flip, rtpthlp_flip, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
924 : wp2rtp_flip, wp2thlp_flip, uprcp_flip, vprcp_flip, rc_coef_zm_flip, wp4_flip, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
925 : wpup2_flip, wpvp2_flip, wp2up2_flip, wp2vp2_flip, ice_supersat_frac_flip, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/generalized_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1865 : allocate( um_ref(ngrdcol, gr%nzt) ) ! Reference u wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1866 : allocate( vm_ref(ngrdcol, gr%nzt) ) ! Reference v wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2194 : ! Initialize statistics output, note that this will allocate/initialize stats variables for all
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2216 : ! Initialize statistics output, note that this will allocate/initialize stats variables for all
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2369 : !$acc rcm_in_layer, cloud_cover, wprcp, w_up_in_cloud, w_down_in_cloud, cloudy_updraft_frac, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2381 : !$acc pdf_params%corr_w_thl_2, pdf_params%corr_rt_thl_1, pdf_params%corr_rt_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2382 : !$acc pdf_params%alpha_thl, pdf_params%alpha_rt, pdf_params%crt_1, pdf_params%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2385 : !$acc pdf_params%stdev_eta_2, pdf_params%covar_chi_eta_1, pdf_params%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2387 : !$acc pdf_params%corr_w_eta_2, pdf_params%corr_chi_eta_1, pdf_params%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2393 : !$acc pdf_params_zm%thl_2, pdf_params_zm%varnce_thl_1, pdf_params_zm%varnce_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2394 : !$acc pdf_params_zm%corr_w_rt_1, pdf_params_zm%corr_w_rt_2, pdf_params_zm%corr_w_thl_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2395 : !$acc pdf_params_zm%corr_w_thl_2, pdf_params_zm%corr_rt_thl_1, pdf_params_zm%corr_rt_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2396 : !$acc pdf_params_zm%alpha_thl, pdf_params_zm%alpha_rt, pdf_params_zm%crt_1, pdf_params_zm%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2397 : !$acc pdf_params_zm%cthl_1, pdf_params_zm%cthl_2, pdf_params_zm%chi_1, pdf_params_zm%chi_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2398 : !$acc pdf_params_zm%stdev_chi_1, pdf_params_zm%stdev_chi_2, pdf_params_zm%stdev_eta_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2399 : !$acc pdf_params_zm%stdev_eta_2, pdf_params_zm%covar_chi_eta_1, pdf_params_zm%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2400 : !$acc pdf_params_zm%corr_w_chi_1, pdf_params_zm%corr_w_chi_2, pdf_params_zm%corr_w_eta_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2401 : !$acc pdf_params_zm%corr_w_eta_2, pdf_params_zm%corr_chi_eta_1, pdf_params_zm%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2402 : !$acc pdf_params_zm%rsatl_1, pdf_params_zm%rsatl_2, pdf_params_zm%rc_1, pdf_params_zm%rc_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2450 : invrs_rho_ds_zt(i,k) = invrs_rho_ds_zt_init(k) ! inv. dry, static density: t-levs
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2456 : um_pert(i,k) = zero ! Variables used to track perturbed version of winds.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2458 : wm_zt(i,k) = wm_zt_init(k) ! Imposed large scale w - Thermodynamic levels
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2800 : um(i,:), vm(i,:), rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3130 : !$acc X_nl_all_levs, X_mixt_comp_all_levs, lh_sample_point_weights, mu_x_1_n, mu_x_2_n, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3132 : !$acc lh_rt_clipped, lh_thl_clipped, lh_rc_clipped, lh_rv_clipped, lh_Nc_clipped, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3136 : !$acc pdf_params%cloud_frac_1, pdf_params%cloud_frac_2, pdf_params%cthl_1, pdf_params%cthl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3137 : !$acc pdf_params%crt_1, pdf_params%crt_2, pdf_params%stdev_chi_1, pdf_params%stdev_chi_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3160 : thlm(i,:), p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), rtm(i,:), &! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3161 : rcm(i,:), cloud_frac(i,:), wm_zt(i,:), wm_zm(i,:), wp2_zt(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3162 : hydromet(i,:,:), Nc_in_cloud(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3178 : stats_zt(i), stats_zm(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3179 : stats_sfc(i), stats_lh_zt(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3180 : Nccnm(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3181 : hydromet_mc(i,:,:), Ncm_mc(i,:), rcm_mc(i,:), rvm_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3182 : thlm_mc(i,:), hydromet_vel_zt(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3183 : hydromet_vel_covar_zt_impc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3184 : hydromet_vel_covar_zt_expc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3185 : wprtp_mc(i,:), wpthlp_mc(i,:), rtp2_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3186 : thlp2_mc(i,:), rtpthlp_mc(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3210 : stats_zt(i), stats_zm(i), stats_sfc(i), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3211 : hydromet(i,:,:), hydromet_vel_zt(i,:,:), hydrometp2(i,:,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3212 : K_hm(i,:,:), Ncm(i,:), Nc_in_cloud(i,:), rvm_mc(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3213 : thlm_mc(i,:), err_info, & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3214 : wphydrometp(i,:,:), wpNcp(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3223 : !$acc update device( rcm_mc, rvm_mc, thlm_mc, wprtp_mc, wpthlp_mc, rtp2_mc, thlp2_mc, rtpthlp_mc )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3281 : !$acc update host( rvm_mc, rcm_mc, thlm_mc, wprtp_mc, wpthlp_mc, rtp2_mc, thlp2_mc, rtpthlp_mc )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3287 : call stat_update_var( stats_metadata%irtm_mc, rvm_mc(i,:)+rcm_mc(i,:), stats_zt(i) ) ! kg/kg/s
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3289 : call stat_update_var( stats_metadata%iwprtp_mc, wprtp_mc(i,:), stats_zm(i) ) ! m*(kg/kg)/s^2
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3291 : call stat_update_var( stats_metadata%irtp2_mc, rtp2_mc(i,:), stats_zm(i) ) ! (kg/kg)^2/s
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3293 : call stat_update_var( stats_metadata%irtpthlp_mc, rtpthlp_mc(i,:), stats_zm(i) ) ! K*(kg/kg)/s
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3310 : !$acc update host( rho, rho_zm, p_in_Pa, exner, cloud_frac, ice_supersat_frac, X_nl_all_levs, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3330 : !$acc update host( rho, rho_zm, p_in_Pa, exner, cloud_frac, ice_supersat_frac, thlm, rtm, rcm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3368 : call update_radiation_variables( gr%nzm, gr%nzt, radht(i,:), Frad_SW_up(i,:), Frad_LW_up(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3397 : 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.
6045 : !$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.
6206 : !$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.
6608 : 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.
6611 : 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.
6614 : call stat_update_var_pt( stats_metadata%iwpthlp_sfc, 1, wpthlp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6617 : call stat_update_var_pt( stats_metadata%iwprtp_sfc, 1, wprtp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6620 : call stat_update_var_pt( stats_metadata%iupwp_sfc, 1, upwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6623 : call stat_update_var_pt( stats_metadata%ivpwp_sfc, 1, vpwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6626 : call stat_update_var_pt( stats_metadata%iustar, 1, ustar(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6629 : call stat_update_var_pt( stats_metadata%iT_sfc, 1, T_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6635 : !$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.
6837 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6841 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6845 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6846 : exner_zm(i,km1), exner_zm(i,k00), exner_zm(i,kp1), exner_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6849 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6850 : thlm_zm(i,km1), thlm_zm(i,k00), thlm_zm(i,kp1), thlm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6853 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
6854 : rtm_zm(i,km1), rtm_zm(i,k00), rtm_zm(i,kp1), rtm_zm(i,kp2) )
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: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
../src/CLUBB_core/err_info_type_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
265 : write(err_info%err_header_global,'(A38, I3, A15, I3, A, A28, A33, F6.2, A1, F6.2, A, A39, A40)') &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
276 : write(err_info%err_header(i),'(A38, I3, A15, I3, A, A22, I2, A11, F6.2, A13, F6.2, A, A39, A40)') &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/err_info_type_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1002 : call windm_edsclrm_rhs( nzm, nzt, ngrdcol, gr, windm_edsclrm_scalar, dt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1003 : lhs_diff, edsclrm(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1004 : edsclrm_forcing(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1005 : rho_ds_zm, invrs_rho_ds_zt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1006 : l_imp_sfc_momentum_flux, wpedsclrp(:,gr%k_lb_zm,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1007 : stats_metadata, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1008 : stats_zt, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1009 : rhs(:,:,edsclr) ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_windm_edsclrm_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
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.
1371 : status = nf90_def_var( ncid_zm, "columns", NF90_INT, (/column_id_zm/), column_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1372 : status = nf90_def_var( ncid_zm, "altitude", NF90_PREC, (/vertical_id_zm/), vertical_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1373 : status = nf90_def_var( ncid_zm, "time", NF90_PREC, (/time_id_zm/), time_var_id_zm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1425 : status = nf90_def_var( ncid_zt, "columns", NF90_INT, (/column_id_zt/), column_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1426 : status = nf90_def_var( ncid_zt, "altitude", NF90_PREC, (/vertical_id_zt/), vertical_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1427 : status = nf90_def_var( ncid_zt, "time", NF90_PREC, (/time_id_zt/), time_var_id_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1473 : status = nf90_put_var( ncid_zm, column_var_id_zm, column_list, start=(/1/), count=(/ngrdcol/) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1474 : status = nf90_put_var( ncid_zt, column_var_id_zt, column_list, start=(/1/), count=(/ngrdcol/) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1476 : !=================================== Allocate Output Arrays ===================================
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1603 : !$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.
688 : !$acc parallel loop gang vector collapse(2) default(present) reduction(.or.:l_any_adjustment_needed)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
839 : ! 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.
775 : call sfc_varnce_check( sclr_dim, wp2(i,gr%k_lb_zm), up2(i,gr%k_lb_zm), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
776 : vp2(i,gr%k_lb_zm), thlp2(i,gr%k_lb_zm), rtp2(i,gr%k_lb_zm), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
777 : rtpthlp(i,gr%k_lb_zm), sclrp2(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
778 : sclrprtp(i,gr%k_lb_zm,:), sclrpthlp(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
779 : err_info ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/sfc_varnce_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2305 : call stat_update_var( stats_metadata%icovar_chi_eta_1, pdf_params%covar_chi_eta_1(icol,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2307 : call stat_update_var( stats_metadata%icovar_chi_eta_2, pdf_params%covar_chi_eta_2(icol,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2317 : call stat_update_var( stats_metadata%icorr_chi_eta_1, pdf_params%corr_chi_eta_1(icol,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2319 : call stat_update_var( stats_metadata%icorr_chi_eta_2, pdf_params%corr_chi_eta_2(icol,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2380 : chip2 = compute_variance_binormal( chi, pdf_params%chi_1(icol,:), pdf_params%chi_2(icol,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2381 : pdf_params%stdev_chi_1(icol,:), pdf_params%stdev_chi_2(icol,:), &
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.
782 : call wpxp_term_pr1_lhs( nzm, ngrdcol, gr, C6rt_Skw_fnc, C6thl_Skw_fnc, C7_Skw_fnc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
783 : invrs_tau_C6_zm, l_scalar_calc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
784 : lhs_pr1_wprtp, lhs_pr1_wpthlp, lhs_pr1_wpsclrp ) ! Intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
862 : stats_zt, stats_zm, stats_sfc, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
863 : rtm, wprtp, thlm, wpthlp, sclrm, wpsclrp, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
864 : err_info ) ! InOut
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.
1319 : sclrprtp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1354 : sclrpthlp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_xp2_xpyp_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
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.
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.
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.
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.
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.
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.
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 WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
../src/G_unit_test_types/rev_direction_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
229 : !seed used = -1102123834 1480475276 -248259584 525496705 1614213535 -1267052688 6290033 -78466652
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
230 : !seed_output = (/ -1102123834, 1480475276, -248259584, 525496705, 1614213535, -1267052688, 6290033, -78466652 /)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
746 : call xpyp_term_ta_pdf_lhs_godunov( gr_ascending%nzm, gr_ascending%nzt, 1, gr_ascending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
750 : call xpyp_term_ta_pdf_lhs_godunov( gr_descending%nzm, gr_descending%nzt, 1, gr_descending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
791 : call xpyp_term_ta_pdf_rhs_godunov( gr_ascending%nzm, gr_ascending%nzt, 1, gr_ascending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
797 : call xpyp_term_ta_pdf_rhs_godunov( gr_descending%nzm, gr_descending%nzt, 1, gr_descending, & ! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/G_unit_test_types/rev_direction_grid_test.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
Directory 1 is 71eb9b3c5fd65c33905f17be8476a1dea89a2511
Directory 2 is f9d92113871bdf87b5e3147db6740ab654dc0967
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<
>The linux diff detected differences in arm_zt.nc<
>>Differences above threshold were detected in the common fields in file 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<
>>>Differences in common variables detected 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<
>The linux diff detected differences in gabls3_night_zt.nc<
>>Differences above threshold were detected in the common fields in file 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<
>>>Differences in common variables detected 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<
>The linux diff detected differences in wangara_zt.nc<
>>Differences above threshold were detected in the common fields in file 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<
>>>Differences in common variables detected for case wangara<<<
**********************************************************************************************************
SUMMARY:
There were differences detected in the common variables in netCDF (*.nc) files.
Directory 1 is 71eb9b3c5fd65c33905f17be8476a1dea89a2511
Directory 2 is f9d92113871bdf87b5e3147db6740ab654dc0967
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<
>The linux diff detected differences in arm_zt.nc<
>>Differences above threshold were detected in the common fields in file 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<
>>>Differences in common variables detected 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<
>The linux diff detected differences in gabls3_night_zt.nc<
>>Differences above threshold were detected in the common fields in file 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<
>>>Differences in common variables detected 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<
>The linux diff detected differences in wangara_zt.nc<
>>Differences above threshold were detected in the common fields in file 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<
>>>Differences in common variables detected for case wangara<<<
**********************************************************************************************************
SUMMARY:
There were differences detected in the common variables in netCDF (*.nc) 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: all
Using branch: master
Making list from 'UnresolvedCommits':
- f9d92113871bdf87b5e3147db6740ab654dc0967
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', '\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: 71eb9b3c5fd65c33905f17be8476a1dea89a2511
Found: RESOLVED:f9d92113871bdf87b5e3147db6740ab654dc0967
Checking Commit: 71eb9b3c5fd65c33905f17be8476a1dea89a2511
Running: final commit to check, not labelled BIT_CHANGING
Checking out 71eb9b3c5fd65c33905f17be8476a1dea89a2511
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'
Running: 'run_scripts/run_scm_all.bash --min-cases -p clubb_params_multi_col.in'
Checking out f9d92113871bdf87b5e3147db6740ab654dc0967
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'
Running: 'run_scripts/run_scm_all.bash --min-cases -p clubb_params_multi_col.in'
Diffing: 'run_scripts/run_bindiff_all.py 71eb9b3c5fd65c33905f17be8476a1dea89a2511 f9d92113871bdf87b5e3147db6740ab654dc0967'
ISSUE WITH COMMIT DETECTED: 71eb9b3c5fd65c33905f17be8476a1dea89a2511 differs from f9d92113871bdf87b5e3147db6740ab654dc0967
Finding all BIT_CHANGING commits in range: f9d92113871bdf87b5e3147db6740ab654dc0967...71eb9b3c5fd65c33905f17be8476a1dea89a2511
Output from 71eb9b3c5fd65c33905f17be8476a1dea89a2511 already saved
Output from f9d92113871bdf87b5e3147db6740ab654dc0967 already saved
Diffing: 'run_scripts/run_bindiff_all.py 71eb9b3c5fd65c33905f17be8476a1dea89a2511 f9d92113871bdf87b5e3147db6740ab654dc0967'
Found:
71eb9b3c5fd65c33905f17be8476a1dea89a2511
=============================== Test Results ===============================
Commit Range Checked = f9d92113871bdf87b5e3147db6740ab654dc0967...71eb9b3c5fd65c33905f17be8476a1dea89a2511
New Unresolved Commits:
71eb9b3c5fd65c33905f17be8476a1dea89a2511
No fake BIT_CHANGING commits found.
Resolved: f9d92113871bdf87b5e3147db6740ab654dc0967
Remaining Unresolved Commits (oldest commit is listed first):
71eb9b3c5fd65c33905f17be8476a1dea89a2511
=============================== Updating Config File ===============================
Saving into UnresolvedCommits: 71eb9b3c5fd65c33905f17be8476a1dea89a2511
Saving into BaselineCommit: 71eb9b3c5fd65c33905f17be8476a1dea89a2511
=============================== Cleanup ===============================
Not removing any generated output.
RENAMING 71eb9b3c5fd65c33905f17be8476a1dea89a2511 to latest_revision_validated_71eb9b3c5fd65c33905f17be8476a1dea89a2511
================== Unresolved Commit Status ==================
Remaining Unresolved Commits (oldest commit is listed first):
71eb9b3c5fd65c33905f17be8476a1dea89a2511
Exiting with code: 1
[Pipeline] }
[Pipeline] // stage
[Pipeline] stage
[Pipeline] { (Declarative: Post Actions)
[Pipeline] script
[Pipeline] {
[Pipeline] emailext
Sending email to: messnermet@uwm.edu
[Pipeline] }
[Pipeline] // script
[Pipeline] }
[Pipeline] // stage
[Pipeline] }
[Pipeline] // withEnv
[Pipeline] }
[Pipeline] // node
[Pipeline] End of Pipeline
ERROR: script returned exit code 1
Finished: FAILURE