Skipping 322 KB..
Full LogTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTest
621 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
622 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
633 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
634 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
988 : pdf_params%rsatl_1(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl1(i,:) ) * RH_crit(i, :, 1, 1)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1003 : pdf_params%rsatl_2(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl2(i,:) ) * RH_crit(i, :, 1, 2)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1130 : rcm(i,k) = pdf_params%mixt_frac(i,k) * pdf_params%rc_1(i,k) + ( one - pdf_params%mixt_frac(i,k) ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1305 : = pdf_params%mixt_frac(i,k) * ( ( sclr1(i,k,j) - sclrm(i,k,j) ) * pdf_params%rc_1(i,k) ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1311 : + ( one - pdf_params%mixt_frac(i,k) ) * corr_sclr_rt_2(i,k,j) * pdf_params%crt_2(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1317 : - ( one - pdf_params%mixt_frac(i,k) ) * corr_sclr_thl_2(i,k,j) * pdf_params%cthl_2(i,k) &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/pdf_closure_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
566 : call calc_xp2_xpyp_ta_terms( nz, ngrdcol, gr, wprtp, wprtp2, wpthlp, wpthlp2, wprtpthlp, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1306 : sclrpthlp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1423 : subroutine solve_xp2_xpyp_with_single_lhs( nz, ngrdcol, gr, C2x, invrs_tau_xp2_zm, rtm, thlm, wprtp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1832 : rhs_ta_wpsclrp2, rhs_ta_wprtpsclrp, rhs_ta_wpthlpsclrp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2701 : real( kind = core_rknd ), dimension(ngrdcol) :: rcond ! Est. of the reciprocal of the condition # on the matrix
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2735 : ixapxbp_matrix_condt_num = max( stats_metadata%irtp2_matrix_condt_num, stats_metadata%ithlp2_matrix_condt_num, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2755 : call stat_update_var_pt( stats_metadata%irtp2_matrix_condt_num, 1, one / rcond(i), & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2758 : call stat_update_var_pt( stats_metadata%ithlp2_matrix_condt_num, 1, one / rcond(i), & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2761 : call stat_update_var_pt( stats_metadata%irtpthlp_matrix_condt_num, 1, one / rcond(i), & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4014 : wp_coef(i,k) = ( one - one_third * beta ) * a1(i,k)**2 * wp3_on_wp2(i,k) / wp2(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4015 : wp_coef_zt(i,k) = ( one - one_third * beta ) * a1_zt(i,k)**2 * wp3_on_wp2_zt(i,k) / wp2_zt(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4196 : sgn_t_vel_sclrprtp(i,k) = sign(one,term_wprtpsclrp_explicit_zm(i,k)*sclrprtp(i,k,sclr))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4230 : sgn_t_vel_sclrpthlp(i,k) = sign(one,term_wpthlpsclrp_explicit_zm(i,k)*sclrpthlp(i,k,sclr))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4323 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5223 : call stat_update_var( stats_metadata%icoef_wprtp2_implicit, coef_wprtp2_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5225 : call stat_update_var( stats_metadata%iterm_wprtp2_explicit, term_wprtp2_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5227 : call stat_update_var( stats_metadata%icoef_wpthlp2_implicit, coef_wpthlp2_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5229 : call stat_update_var( stats_metadata%iterm_wpthlp2_explicit, term_wpthlp2_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5231 : call stat_update_var( stats_metadata%icoef_wprtpthlp_implicit, coef_wprtpthlp_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5233 : call stat_update_var( stats_metadata%iterm_wprtpthlp_explicit, term_wprtpthlp_explicit(i,:), & ! intent(in)
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.
776 : call stat_update_var_pt( stats_metadata%ihmp2_zt(j), k, hydrometp2_zt(i,k,j), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
837 : call stat_update_var_pt( stats_metadata%iprecip_frac, k, precip_fracs%precip_frac(i,k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
846 : call stat_update_var_pt( stats_metadata%iprecip_frac_1, k, precip_fracs%precip_frac_1(i,k), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
855 : call stat_update_var_pt( stats_metadata%iprecip_frac_2, k, precip_fracs%precip_frac_2(i,k), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3799 : call stat_update_var_pt( stats_metadata%imu_hm_1(hm_idx), k, mu_x_1(k,ivar), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3809 : call stat_update_var_pt( stats_metadata%imu_hm_2(hm_idx), k, mu_x_2(k,ivar), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3820 : call stat_update_var_pt( stats_metadata%imu_Ncn_1, k, mu_x_1(k,iiPDF_Ncn), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3829 : call stat_update_var_pt( stats_metadata%imu_Ncn_2, k, mu_x_2(k,iiPDF_Ncn), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3844 : call stat_update_var_pt( stats_metadata%isigma_hm_1(hm_idx), k, sigma_x_1(k,ivar), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3855 : call stat_update_var_pt( stats_metadata%isigma_hm_2(hm_idx), k, sigma_x_2(k,ivar), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3866 : call stat_update_var_pt( stats_metadata%isigma_Ncn_1, k, sigma_x_1(k,iiPDF_Ncn), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3875 : call stat_update_var_pt( stats_metadata%isigma_Ncn_2, k, sigma_x_2(k,iiPDF_Ncn), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4202 : call stat_update_var_pt( stats_metadata%icorr_hmx_hmy_1(hm_idx_jvar,hm_idx_ivar), k, & ! in
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4214 : call stat_update_var_pt( stats_metadata%icorr_hmx_hmy_2(hm_idx_jvar,hm_idx_ivar), k, & ! in
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4326 : call stat_update_var_pt( stats_metadata%imu_hm_1_n(hm_idx), k, mu_hm_1_n(k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4345 : call stat_update_var_pt( stats_metadata%imu_hm_2_n(hm_idx), k, mu_hm_2_n(k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/setup_clubb_pdf_params.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
549 : call stat_assign( var_index=stats_metadata%iice_supersat_frac, var_name="ice_supersat_frac", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
781 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
935 : call stat_assign( var_index=stats_metadata%irho, var_name="rho", var_description="rho, Air density", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2887 : call stat_assign( var_index=stats_metadata%iw_KK_evap_covar_zt, var_name="w_KK_evap_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2895 : call stat_assign( var_index=stats_metadata%irt_KK_evap_covar_zt, var_name="rt_KK_evap_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2903 : call stat_assign( var_index=stats_metadata%ithl_KK_evap_covar_zt, var_name="thl_KK_evap_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2912 : call stat_assign( var_index=stats_metadata%iw_KK_auto_covar_zt, var_name="w_KK_auto_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2920 : call stat_assign( var_index=stats_metadata%irt_KK_auto_covar_zt, var_name="rt_KK_auto_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2928 : call stat_assign( var_index=stats_metadata%ithl_KK_auto_covar_zt, var_name="thl_KK_auto_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2937 : call stat_assign( var_index=stats_metadata%iw_KK_accr_covar_zt, var_name="w_KK_accr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2946 : call stat_assign( var_index=stats_metadata%irt_KK_accr_covar_zt, var_name="rt_KK_accr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2955 : call stat_assign( var_index=stats_metadata%ithl_KK_accr_covar_zt, var_name="thl_KK_accr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2963 : call stat_assign( var_index=stats_metadata%irr_KK_mvr_covar_zt, var_name="rr_KK_mvr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2972 : call stat_assign( var_index=stats_metadata%iNr_KK_mvr_covar_zt, var_name="Nr_KK_mvr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2981 : call stat_assign( var_index=stats_metadata%iKK_mvr_variance_zt, var_name="KK_mvr_variance_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4929 : call stat_assign( var_index=stats_metadata%icloud_frac_refined, var_name="cloud_frac_refined", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4945 : call stat_assign( var_index=stats_metadata%ihl_on_Cp_residual, var_name="hl_on_Cp_residual", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4966 : call stat_assign( var_index=stats_metadata%isclrm(j), var_name="sclr"//trim(sclr_idx)//"m", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4977 : call stat_assign( var_index=stats_metadata%isclrm_f(j), var_name="sclr"//trim(sclr_idx)//"m_f", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4988 : call stat_assign( var_index=stats_metadata%iedsclrm(j), var_name="edsclr"//trim(sclr_idx)//"m", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4999 : call stat_assign( var_index=stats_metadata%iedsclrm_f(j), var_name="edsclr"//trim(sclr_idx)//"m_f", &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_zt_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/Benchmark_cases/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has forbidden elements: .gt. .
71 : if (time.gt.80880_time_precision) then
CLUBBStandardsCheck.pl WARNING: File has forbidden elements.
../src/Benchmark_cases/neutral_case.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/KK_microphys/*.F90
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/SILHS/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2210 : ! call stat_update_var( stats_metadata%ilh_cloud_frac_unweighted, lh_cloud_frac, stats_lh_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2554 : ! call stat_update_var( stats_metadata%ilh_precip_frac_unweighted, lh_precip_frac, stats_lh_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2597 : call stat_update_var_pt( stats_metadata%ik_lh_start, 1, real( k_lh_start(i), kind=core_rknd ), stats_lh_sfc )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2644 : ! call stat_update_var( stats_metadata%ilh_samp_frac_category(icategory), lh_samp_frac(:,icategory), &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/SILHS/latin_hypercube_driver_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/G_unit_test_types/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
121 : result = smooth_min(4, 1, input, zero, min_max_smth_mag) ! Order of nz and ngrdcol is opposite to order of indexing! This is very unintuitive!
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
174 : ! Case 3: Make sure that on a large number of arbitrarily chosen points with small min_max_smth_mag,
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/G_unit_test_types/smooth_min_max_tests.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1587 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), &! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/G_unit_test_types/pdf_parameter_tests.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
......................................................................................................................................................................... Make.clubb_lapack is ready.
.................................................................................. Make.clubb_param is ready.
......................... Make.clubb_bugsrad is ready.
... Make.microphys_utils is ready.
..... Make.clubb_parabolic is ready.
.............. Make.clubb_KK_microphys is ready.
................................................. Make.clubb_coamps is ready.
... Make.clubb_morrison is ready.
... Make.clubb_gfdlact is ready.
............. Make.silhs is ready.
.................................................................. Make.clubb_other is ready.
... Make.clubb_standalone is ready.
... Make.clubb_thread_test is ready.
............ Make.clubb_tuner is ready.
... Make.jacobian is ready.
................ Make.G_unit_tests is ready.
... Make.int2txt is ready.
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_param
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_gfdlact
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:5001:47:
5001 | call calc_trapezoid_zm( nz, ngrdcol, gr, wpthvp, wpthvp_zt, & ! Intent(in)
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:5004:47:
5004 | call calc_trapezoid_zm( nz, ngrdcol, gr, thlpthvp, thlpthvp_zt, & ! Intent(in)
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:5007:47:
5007 | call calc_trapezoid_zm( nz, ngrdcol, gr, rtpthvp, rtpthvp_zt, & ! Intent(in)
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4895:34:
4895 | wprtp2, wprtp2_zm, &
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4900:34:
4900 | wpthlp2, wpthlp2_zm, &
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4905:34:
4905 | wprtpthlp, wprtpthlp_zm, &
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4930:30:
4930 | cloud_frac, cloud_frac_zm, &
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4934:30:
4934 | ice_supersat_frac, ice_supersat_frac_zm, &
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4938:30:
4938 | rcm, rcm_zm, &
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4942:30:
4942 | wp2thvp, wp2thvp_zm, &
| 1
Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1)
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4833:21:
4833 | integer :: i, k, sclr
| 1
Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4175:10:
4175 | use model_flags, only: &
| 1
Warning: Unused parameter ‘lapack’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4116:22:
4116 | ( nzmax, T0_in, ts_nudge_in, & ! intent(in)
| 1
Warning: Unused dummy argument ‘nzmax’ at (1) [-Wunused-dummy-argument]
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:137:23:
137 | hydromet, & ! Unused
| 1
Warning: Unused dummy argument ‘hydromet’ at (1) [-Wunused-dummy-argument]
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:208:8:
208 | use parameter_indices, only: &
| 1
Warning: Unused parameter ‘iup2_sfc_coef’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/advance_clubb_core_module.F90:191:8:
191 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘num_hf_draw_points’ which has been explicitly imported at (1) [-Wunused-parameter]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/clubb_api_module.F90
/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../src/CLUBB_core/clubb_api_module.F90:1052:16:
1052 | integer :: i
| 1
Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable]
ar rv /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../lib/libclubb_param.a setup_clubb_pdf_params.o grid_class.o calc_pressure.o hydromet_pdf_parameter_module.o stats_sfc_module.o stats_zm_module.o clubb_api_module.o mt95.o stats_zt_module.o code_timer_module.o penta_lu_solver.o clip_explicit.o pdf_utilities.o interpolation.o calendar.o advance_xm_wpxp_module.o file_functions.o new_pdf.o Nc_Ncn_eqns.o stats_type_utilities.o lapack_wrap.o stats_lh_sfc_module.o matrix_operations.o mean_adv.o constants_clubb.o parameters_tunable.o advance_clubb_core_module.o new_hybrid_pdf.o diffusion.o clubb_precision.o new_tsdadg_pdf.o adg1_adg2_3d_luhar_pdf.o advance_wp2_wp3_module.o advance_helper_module.o corr_varnce_module.o stats_variables.o turbulent_adv_pdf.o input_reader.o new_hybrid_pdf_main.o lapack_interfaces.o saturation.o clip_semi_implicit.o stat_file_module.o Skx_module.o stats_lh_zt_module.o precipitation_fraction.o input_names.o tridiag_lu_solver.o endian.o output_netcdf.o stats_rad_zm_module.o matrix_solver_wrapper.o stats_clubb_utilities.o calc_roots.o stats_type.o diagnose_correlations_module.o pdf_closure_module.o sigma_sqd_w_module.o T_in_K_module.o sponge_layer_damping.o error_code.o LY93_pdf.o output_grads.o new_pdf_main.o advance_xp3_module.o index_mapping.o mono_flux_limiter.o array_index.o advance_xp2_xpyp_module.o pos_definite_module.o parameter_indices.o model_flags.o numerical_check.o parameters_model.o stats_rad_zt_module.o fill_holes.o pdf_parameter_module.o advance_windm_edsclrm_module.o mixing_length.o sfc_varnce_module.o
r - setup_clubb_pdf_params.o
r - grid_class.o
r - calc_pressure.o
r - hydromet_pdf_parameter_module.o
r - stats_sfc_module.o
r - stats_zm_module.o
r - clubb_api_module.o
r - mt95.o
r - stats_zt_module.o
r - code_timer_module.o
r - penta_lu_solver.o
r - clip_explicit.o
r - pdf_utilities.o
r - interpolation.o
r - calendar.o
r - advance_xm_wpxp_module.o
r - file_functions.o
r - new_pdf.o
r - Nc_Ncn_eqns.o
r - stats_type_utilities.o
r - lapack_wrap.o
r - stats_lh_sfc_module.o
r - matrix_operations.o
r - mean_adv.o
r - constants_clubb.o
r - parameters_tunable.o
r - advance_clubb_core_module.o
r - new_hybrid_pdf.o
r - diffusion.o
r - clubb_precision.o
r - new_tsdadg_pdf.o
r - adg1_adg2_3d_luhar_pdf.o
r - advance_wp2_wp3_module.o
r - advance_helper_module.o
r - corr_varnce_module.o
r - stats_variables.o
r - turbulent_adv_pdf.o
r - input_reader.o
r - new_hybrid_pdf_main.o
r - lapack_interfaces.o
r - saturation.o
r - clip_semi_implicit.o
r - stat_file_module.o
r - Skx_module.o
r - stats_lh_zt_module.o
r - precipitation_fraction.o
r - input_names.o
r - tridiag_lu_solver.o
r - endian.o
r - output_netcdf.o
r - stats_rad_zm_module.o
r - matrix_solver_wrapper.o
r - stats_clubb_utilities.o
r - calc_roots.o
r - stats_type.o
r - diagnose_correlations_module.o
r - pdf_closure_module.o
r - sigma_sqd_w_module.o
r - T_in_K_module.o
r - sponge_layer_damping.o
r - error_code.o
r - LY93_pdf.o
r - output_grads.o
r - new_pdf_main.o
r - advance_xp3_module.o
r - index_mapping.o
r - mono_flux_limiter.o
r - array_index.o
r - advance_xp2_xpyp_module.o
r - pos_definite_module.o
r - parameter_indices.o
r - model_flags.o
r - numerical_check.o
r - parameters_model.o
r - stats_rad_zt_module.o
r - fill_holes.o
r - pdf_parameter_module.o
r - advance_windm_edsclrm_module.o
r - mixing_length.o
r - sfc_varnce_module.o
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_lapack
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_bugsrad
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.microphys_utils
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_parabolic
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_coamps
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_morrison
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c ../src/Morrison_microphys/module_mp_graupel.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_KK_microphys
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.silhs
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
ar rv /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../lib/libclubb_morrison.a module_mp_graupel.o
r - module_mp_graupel.o
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_other
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/morrison_microphys_module.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/microphys_init_cleanup.F90
../src/morrison_microphys_module.F90:1213:13:
1213 | .or. is_nan_2d( real( rim_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1214:13:
1214 | .or. is_nan_2d( real( rsm_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1215:13:
1215 | .or. is_nan_2d( real( rrm_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1216:13:
1216 | .or. is_nan_2d( real( rgm_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1217:13:
1217 | .or. is_nan_2d( real( Ncm_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1218:13:
1218 | .or. is_nan_2d( real( Nim_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1219:13:
1219 | .or. is_nan_2d( real( Nsm_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1220:13:
1220 | .or. is_nan_2d( real( Nrm_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1221:13:
1221 | .or. is_nan_2d( real( Ngm_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1222:13:
1222 | .or. is_nan_2d( real( rvm_mc_r4, kind=core_rknd ) ) &
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1223:13:
1223 | .or. is_nan_2d( real( T_in_K_mc, kind=core_rknd ) ) ) then
| 1
Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/microphys_driver.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/clubb_driver.F90
../src/clubb_driver.F90:6379:39:
6379 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in)
| 1
Warning: Unused dummy argument ‘lmin’ at (1) [-Wunused-dummy-argument]
../src/clubb_driver.F90:6379:33:
6379 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in)
| 1
Warning: Unused dummy argument ‘nu_vert_res_dep’ at (1) [-Wunused-dummy-argument]
../src/clubb_driver.F90:5571:8:
5571 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/error.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c -I../src ../src/enhanced_simann.F90
ar rv /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../lib/libclubb_other.a gabls2.o extrapolation.o advance_microphys_module.o silhs_category_variance_module.o lh_microphys_driver_module.o dycoms2_rf02.o mpace_b.o quicksort.o lba.o bomex.o input_interpret.o atex.o cos_solar_zen_module.o soil_vegetation.o neutral_case.o sfc_flux.o estimate_scm_microphys_module.o rad_lwsw_module.o input_grads.o cloud_sed_module.o simple_rad_module.o gabls3.o morrison_microphys_module.o input_fields.o arm.o enhanced_simann.o sounding.o cloud_feedback.o dycoms2_rf01.o microphys_init_cleanup.o gabls3_night.o rico.o arm_97.o parameters_radiation.o parameters_microphys.o gfdl_activation.o microphys_driver.o spec_hum_to_mixing_ratio.o time_dependent_input.o hydrostatic_module.o KK_microphys_module.o twp_ice.o clubb_model_settings.o stat_file_utils.o fire.o ice_dfsn_module.o bugsrad_driver.o clex9_nov02.o jun25.o diag_ustar_module.o arm_0003.o wangara.o mpace_a.o clex9_oct14.o astex_a209.o mixed_moment_PDF_integrals.o extended_atmosphere_module.o cobra.o input_netcdf.o nov11.o clubb_driver.o error.o coamps_microphys_driver_module.o arm_3year.o
r - gabls2.o
r - extrapolation.o
r - advance_microphys_module.o
r - silhs_category_variance_module.o
r - lh_microphys_driver_module.o
r - dycoms2_rf02.o
r - mpace_b.o
r - quicksort.o
r - lba.o
r - bomex.o
r - input_interpret.o
r - atex.o
r - cos_solar_zen_module.o
r - soil_vegetation.o
r - neutral_case.o
r - sfc_flux.o
r - estimate_scm_microphys_module.o
r - rad_lwsw_module.o
r - input_grads.o
r - cloud_sed_module.o
r - simple_rad_module.o
r - gabls3.o
r - morrison_microphys_module.o
r - input_fields.o
r - arm.o
r - enhanced_simann.o
r - sounding.o
r - cloud_feedback.o
r - dycoms2_rf01.o
r - microphys_init_cleanup.o
r - gabls3_night.o
r - rico.o
r - arm_97.o
r - parameters_radiation.o
r - parameters_microphys.o
r - gfdl_activation.o
r - microphys_driver.o
r - spec_hum_to_mixing_ratio.o
r - time_dependent_input.o
r - hydrostatic_module.o
r - KK_microphys_module.o
r - twp_ice.o
r - clubb_model_settings.o
r - stat_file_utils.o
r - fire.o
r - ice_dfsn_module.o
r - bugsrad_driver.o
r - clex9_nov02.o
r - jun25.o
r - diag_ustar_module.o
r - arm_0003.o
r - wangara.o
r - mpace_a.o
r - clex9_oct14.o
r - astex_a209.o
r - mixed_moment_PDF_integrals.o
r - extended_atmosphere_module.o
r - cobra.o
r - input_netcdf.o
r - nov11.o
r - clubb_driver.o
r - error.o
r - coamps_microphys_driver_module.o
r - arm_3year.o
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_standalone
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_tuner
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.jacobian
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/clubb_standalone.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c ../src/clubb_tuner.F90
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.G_unit_tests
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/jacobian.F90
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.int2txt
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/tuner_tests.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/spurious_source_test.F90
gfortran clubb_standalone.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../bin/clubb_standalone -L/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../obj; make -f Make.clubb_thread_test
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/clubb_thread_test.F90
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran nrutil.o ran_state.o nr.o clubb_tuner.o nrtype.o amoeba.o amebsa.o ran1_v.o ran1_s.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../bin/clubb_tuner -L/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
gfortran clubb_thread_test.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../bin/clubb_thread_test -L/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
gfortran jacobian.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../bin/jacobian -L/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -g -fbounds-check -mieee-fp -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_tests.F90
../src/G_unit_tests.F90:176:13:
176 | stats_sfc
| 1
Warning: Unused variable ‘stats_sfc’ declared at (1) [-Wunused-variable]
../src/G_unit_tests.F90:175:12:
175 | stats_zm, &
| 1
Warning: Unused variable ‘stats_zm’ declared at (1) [-Wunused-variable]
../src/G_unit_tests.F90:174:12:
174 | stats_zt, &
| 1
Warning: Unused variable ‘stats_zt’ declared at (1) [-Wunused-variable]
gfortran KK_integrals_tests.o mu_sigma_hm_tests.o tuner_tests.o Nc_Ncn_test.o smooth_heaviside_tests.o hole_filling_tests.o corr_cholesky_mtx_tests.o w_up_in_cloud_tests.o pdf_parameter_tests.o silhs_category_test.o read_corr_mtx_test.o smooth_min_max_tests.o G_unit_tests.o spurious_source_test.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../bin/G_unit_tests -L/home/jenkins/workspace/clubb_error_handling_gfortran_test/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test/obj'
python ../utilities/check_for_missing_threadprivate.py ../src/CLUBB_core/ ../src/SILHS/
check_for_missing_threadprivate.py has begun.
check_for_missing_threadprivate.py passed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
948 : call stat_update_var_pt( stats_metadata%iNsm, k, real(Nsm(k), kind = core_rknd) ,stats_zt )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/coamps_microphys_driver_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
283 : nzt = stat_file_num_vertical_levels( "thlm", "../output/"//trim( stats_metadata%fname_zt )//".ctl" )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
284 : nzm = stat_file_num_vertical_levels( "thlm", "../output/"//trim( stats_metadata%fname_zm )//".ctl" )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/jacobian.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
295 : z_i = lin_interpolate_two_points( 8.0e-3_core_rknd, rtm(k), rtm(k-1), gr%zt(1,k), gr%zt(1,k-1) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/simple_rad_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
377 : z(kp2), p_in_Pa(km1), p_in_Pa(k00), p_in_Pa(kp1), p_in_Pa(kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
426 : press(i) = lin_interpolate_two_points( gr%zt(1,i), z(k), z(k-1), p_in_Pa(k), p_in_Pa(k-1) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/sounding.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
802 : call microphys_put_var( stats_metadata%irsm_sd_morr_int, (/rsm_sd_morr_int/), microphys_stats_sfc )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
820 : call microphys_put_var( stats_metadata%ihl_on_Cp_residual, hl_on_Cp_residual, microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
835 : call microphys_put_var( stats_metadata%iPSMLT, real( PSMLT, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
836 : call microphys_put_var( stats_metadata%iEVPMS, real( EVPMS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
837 : call microphys_put_var( stats_metadata%iPRACS, real( PRACS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
838 : call microphys_put_var( stats_metadata%iEVPMG, real( EVPMG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
839 : call microphys_put_var( stats_metadata%iPRACG, real( PRACG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
840 : call microphys_put_var( stats_metadata%iPGMLT, real( PGMLT, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
841 : call microphys_put_var( stats_metadata%iMNUCCC, real( MNUCCC, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
842 : call microphys_put_var( stats_metadata%iPSACWS, real( PSACWS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
843 : call microphys_put_var( stats_metadata%iPSACWI, real( PSACWI, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
844 : call microphys_put_var( stats_metadata%iQMULTS, real( QMULTS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
845 : call microphys_put_var( stats_metadata%iQMULTG, real( QMULTG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
846 : call microphys_put_var( stats_metadata%iPSACWG, real( PSACWG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
847 : call microphys_put_var( stats_metadata%iPGSACW, real( PGSACW, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
851 : call microphys_put_var( stats_metadata%iQMULTR, real( QMULTR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
852 : call microphys_put_var( stats_metadata%iQMULTRG, real( QMULTRG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
853 : call microphys_put_var( stats_metadata%iMNUCCD, real( MNUCCD, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
854 : call microphys_put_var( stats_metadata%iPRACI, real( PRACI, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
855 : call microphys_put_var( stats_metadata%iPRACIS, real( PRACIS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
857 : call microphys_put_var( stats_metadata%iMNUCCR, real( MNUCCR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
858 : call microphys_put_var( stats_metadata%iPIACR, real( PIACR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
859 : call microphys_put_var( stats_metadata%iPIACRS, real( PIACRS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
860 : call microphys_put_var( stats_metadata%iPGRACS, real( PGRACS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
862 : call microphys_put_var( stats_metadata%iEPRDS, real( EPRDS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
863 : call microphys_put_var( stats_metadata%iPSACR, real( PSACR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
865 : call microphys_put_var( stats_metadata%iEPRDG, real( EPRDG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
868 : call microphys_put_var( stats_metadata%iNGSTEN, real( NGSTEN, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
869 : call microphys_put_var( stats_metadata%iNRSTEN, real( NRSTEN, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
870 : call microphys_put_var( stats_metadata%iNISTEN, real( NISTEN, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
871 : call microphys_put_var( stats_metadata%iNSSTEN, real( NSSTEN, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
872 : call microphys_put_var( stats_metadata%iNCSTEN, real( NCSTEN, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
873 : call microphys_put_var( stats_metadata%iNPRC1, real( NPRC1, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
874 : call microphys_put_var( stats_metadata%iNRAGG, real( NRAGG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
875 : call microphys_put_var( stats_metadata%iNPRACG, real( NPRACG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
876 : call microphys_put_var( stats_metadata%iNSUBR, real( NSUBR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
877 : call microphys_put_var( stats_metadata%iNSMLTR, real( NSMLTR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
878 : call microphys_put_var( stats_metadata%iNGMLTR, real( NGMLTR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
879 : call microphys_put_var( stats_metadata%iNPRACS, real( NPRACS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
880 : call microphys_put_var( stats_metadata%iNNUCCR, real( NNUCCR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
881 : call microphys_put_var( stats_metadata%iNIACR, real( NIACR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
882 : call microphys_put_var( stats_metadata%iNIACRS, real( NIACRS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
883 : call microphys_put_var( stats_metadata%iNGRACS, real( NGRACS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
884 : call microphys_put_var( stats_metadata%iNSMLTS, real( NSMLTS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
885 : call microphys_put_var( stats_metadata%iNSAGG, real( NSAGG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
886 : call microphys_put_var( stats_metadata%iNPRCI, real( NPRCI, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
887 : call microphys_put_var( stats_metadata%iNSCNG, real( NSCNG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
888 : call microphys_put_var( stats_metadata%iNSUBS, real( NSUBS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
891 : call microphys_put_var( stats_metadata%iNNUCCC, real( NNUCCC, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
892 : call microphys_put_var( stats_metadata%iNPSACWS, real( NPSACWS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
895 : call microphys_put_var( stats_metadata%iNPSACWI, real( NPSACWI, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
896 : call microphys_put_var( stats_metadata%iNPSACWG, real( NPSACWG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
897 : call microphys_put_var( stats_metadata%iNPRAI, real( NPRAI, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
898 : call microphys_put_var( stats_metadata%iNMULTS, real( NMULTS, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
899 : call microphys_put_var( stats_metadata%iNMULTG, real( NMULTG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
900 : call microphys_put_var( stats_metadata%iNMULTR, real( NMULTR, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
901 : call microphys_put_var( stats_metadata%iNMULTRG, real( NMULTRG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
902 : call microphys_put_var( stats_metadata%iNNUCCD, real( NNUCCD, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
903 : call microphys_put_var( stats_metadata%iNSUBI, real( NSUBI, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
904 : call microphys_put_var( stats_metadata%iNGMLTG, real( NGMLTG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
905 : call microphys_put_var( stats_metadata%iNSUBG, real( NSUBG, kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
907 : call microphys_put_var( stats_metadata%iSIZEFIX_NR, real( SIZEFIX_NR,kind=core_rknd),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
908 : call microphys_put_var( stats_metadata%iSIZEFIX_NC, real( SIZEFIX_NC,kind=core_rknd),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
909 : call microphys_put_var( stats_metadata%iSIZEFIX_NI, real( SIZEFIX_NI,kind=core_rknd),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
910 : call microphys_put_var( stats_metadata%iSIZEFIX_NS, real( SIZEFIX_NS,kind=core_rknd),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
911 : call microphys_put_var( stats_metadata%iSIZEFIX_NG, real( SIZEFIX_NG,kind=core_rknd),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
912 : call microphys_put_var( stats_metadata%iNEGFIX_NR, real( NEGFIX_NR,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
913 : call microphys_put_var( stats_metadata%iNEGFIX_NC, real( NEGFIX_NC,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
914 : call microphys_put_var( stats_metadata%iNEGFIX_NI, real( NEGFIX_NI,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
915 : call microphys_put_var( stats_metadata%iNEGFIX_NS, real( NEGFIX_NS,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
916 : call microphys_put_var( stats_metadata%iNEGFIX_NG, real( NEGFIX_NG,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
917 : call microphys_put_var( stats_metadata%iNIM_MORR_CL, real( NIM_MORR_CL,kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
918 : call microphys_put_var( stats_metadata%iQC_INST, real( QC_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
919 : call microphys_put_var( stats_metadata%iQR_INST, real( QR_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
920 : call microphys_put_var( stats_metadata%iQI_INST, real( QI_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
921 : call microphys_put_var( stats_metadata%iQS_INST, real( QS_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
922 : call microphys_put_var( stats_metadata%iQG_INST, real( QG_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
923 : call microphys_put_var( stats_metadata%iNC_INST, real( NC_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
924 : call microphys_put_var( stats_metadata%iNR_INST, real( NR_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
925 : call microphys_put_var( stats_metadata%iNI_INST, real( NI_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
926 : call microphys_put_var( stats_metadata%iNS_INST, real( NS_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
927 : call microphys_put_var( stats_metadata%iNG_INST, real( NG_INST,kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
929 : call microphys_put_var( stats_metadata%iT_in_K_mc, real( T_in_K_mc, kind=core_rknd ),microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
934 : call microphys_put_var( stats_metadata%ieff_rad_cloud, real( effc(:), kind = core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
935 : call microphys_put_var( stats_metadata%ieff_rad_ice, real( effi(:), kind = core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
936 : call microphys_put_var( stats_metadata%ieff_rad_snow, real( effs(:), kind = core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
937 : call microphys_put_var( stats_metadata%ieff_rad_rain, real( effr(:), kind = core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
938 : call microphys_put_var( stats_metadata%ieff_rad_graupel, real( effg(:), kind=core_rknd ), microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/morrison_microphys_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
373 : call microphys_put_var( stats_metadata%irrm_src_adj, adj_terms%rrm_src_adj, microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
374 : call microphys_put_var( stats_metadata%iNrm_src_adj, adj_terms%Nrm_src_adj, microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
377 : call microphys_put_var( stats_metadata%irrm_evap_adj, adj_terms%rrm_evap_adj, microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
378 : call microphys_put_var( stats_metadata%iNrm_evap_adj, adj_terms%Nrm_evap_adj, microphys_stats_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
380 : call microphys_put_var( stats_metadata%irrm_mc_nonadj, KK_auto_tndcy+KK_accr_tndcy+KK_evap_tndcy, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1082 : call stat_update_var( stats_metadata%irrm_mc_nonadj, KK_auto_tndcy+KK_accr_tndcy+KK_evap_tndcy, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1659 : call stat_update_var_pt( stats_metadata%im_vol_rad_rain, level, KK_mean_vol_rad, stats_zt )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/KK_microphys_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: 'use' statement w/o 'only' found in the following line:
6500 : use netcdf
CLUBBStandardsCheck.pl WARNING: Use check FAILED!
CLUBBStandardsCheck.pl WARNING: Check that comma is on same line as 'use', as CLUBB requires.
../src/clubb_driver.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1280 : call write_text( "l_modify_ic_with_cubic_int = ", l_modify_ic_with_cubic_int, l_write_to_file, iunit )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1281 : call write_text( "l_modify_bc_for_cnvg_test = ", l_modify_bc_for_cnvg_test, l_write_to_file, iunit )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2177 : (/lon_vals/), (/lat_vals/), time_current, dt_main, l_silhs_out_in,&!intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2188 : (/lon_vals/), (/lat_vals/), time_current, dt_main, l_silhs_out_in,&!intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2225 : if ( .not. (( abs(dt_rad/stats_metadata%stats_tout - real(floor(dt_rad/stats_metadata%stats_tout), kind=core_rknd)) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2227 : ( abs(stats_metadata%stats_tout/dt_rad - real(floor(stats_metadata%stats_tout/dt_rad), kind=core_rknd)) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2540 : stats_zt, stats_zm, stats_sfc, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2546 : precip_fracs, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2565 : stats_zt, stats_zm, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2689 : thlm(1,:), p_in_Pa, exner(1,:), rho, rho_zm, rtm(1,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2797 : exner(1,:), cloud_frac, ice_supersat_frac, thlm(1,:), rtm(1,:), rcm(1,:), hydromet, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3417 : ! em(k) = ( 0.15_core_rknd * (1.0_core_rknd - gr%zm(1,k)/150.0_core_rknd) ) / rho_zm(k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/clubb_driver.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/CLUBB_core/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
154 : stats_metadata, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
459 : call stat_update_var( ixp3_dp, -(C_xp3_dissipation * invrs_tau_zt(i,:))*xp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_xp3_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
683 : * ( one - Skw(i,k) / sqrt( four * ( one - sigma_sqd_w(i,k) )**3 + Skw(i,k)**2 ) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/adg1_adg2_3d_luhar_pdf.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
../src/CLUBB_core/matrix_solver_wrapper.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
480 : write(fstderr,*) "grdcol #", i, "rhs # ", n, "band_solvex backward error est. =", berr(i,n)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/lapack_wrap.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
414 : stats_metadata, & ! intent(in) stats_metadata, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/clip_explicit.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
325 : stability_correction(i,k) = one + min( lambda0_stability(i,k) * brunt_vaisala_freq_sqd(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
621 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
622 : ! for a plot on how output behaves with varying min_max_smth_mag
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_helper_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
480 : = + gr%invrs_dzt(i,k) * ( K_zt(i,k) + nu(i) ) * ( gr%invrs_dzm(i,k) + gr%invrs_dzm(i,k-1) ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1124 : = + gr%invrs_dzm(i,k) * ( K_zm(i,k) + nu(i) ) * ( gr%invrs_dzt(i,k+1) + gr%invrs_dzt(i,k) ) &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/diffusion.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
123 : !$acc enter data create( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
141 : !$acc exit data delete( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
227 : !$acc parallel loop gang vector collapse(2) default(present) reduction(.or.:l_field_below_threshold)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
239 : !$acc exit data delete( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/fill_holes.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
43 : ! lower_1(2)*upper_1(1)+l_diag(2)*1 = lhs(0,2) => l_diag(2) = lhs(0,2) - lower_1(2)*upper_1(1)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
44 : ! lower_1(2)*upper_2(1)+l_diag(2)*upper_1(2) = lhs(-1,2) => upper_1(2) = ( lhs(-1,2)-lower_1(2)*upper_2(1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
46 : ! l_diag(2)*upper_2(2) = lhs(-2,2) => upper_2(2) = lhs(-2,2) / l_diag(2)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
52 : ! l_2(k)*upper_1(k-2)+lower_1(k)*1 = lhs(1,k) => lower_1(k) = lhs(1,k) - l_2(k)*upper_1(k-2)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
53 : ! l_2(k)*upper_2(k-2)+lower_1(k)*upper_1(k-1) = lhs( 0,k) => l_diag(k) = lhs(0,k) - l_2(k)*upper_2(k-2)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
54 : ! +l_diag(k)*1 + lower_1(k)*upper_1(k-1)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/penta_lu_solver.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
501 : call windm_edsclrm_solve( nz, ngrdcol, gr, nrhs, stats_metadata%iwindm_matrix_condt_num, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
891 : call windm_edsclrm_solve( nz, ngrdcol, gr, nrhs, stats_metadata%iwindm_matrix_condt_num, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_windm_edsclrm_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
175 : if ( stats_metadata%iwprtpthlp > 0 ) call check_nan( wprtpthlp, "wprtpthlp", proc_name ) ! intnet(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/numerical_check.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
342 : call calc_coefs_wpxpyp_semiimpl( nz, wp2(i,:), rtp2(i,:), thlp2(i,:), wprtp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/new_pdf_main.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
75 : call stat_assign( var_index=stats_metadata%ilh_morr_snow_rate, var_name="lh_morr_snow_rate", & !intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
99 : call stat_assign( var_index=stats_metadata%ik_lh_start, var_name="k_lh_start", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_lh_sfc_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
114 : call stat_assign( var_index=stats_metadata%iFrad_LW_rad, var_name="Frad_LW_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
123 : call stat_assign( var_index=stats_metadata%iFrad_SW_rad, var_name="Frad_SW_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
132 : call stat_assign( var_index=stats_metadata%iFrad_SW_up_rad, var_name="Frad_SW_up_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
141 : call stat_assign( var_index=stats_metadata%iFrad_LW_up_rad, var_name="Frad_LW_up_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
150 : call stat_assign( var_index=stats_metadata%iFrad_SW_down_rad, var_name="Frad_SW_down_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
160 : call stat_assign( var_index=stats_metadata%iFrad_LW_down_rad, var_name="Frad_LW_down_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_rad_zm_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
939 : write(iunit,*) "l_fix_w_chi_eta_correlations = ", clubb_config_flags%l_fix_w_chi_eta_correlations
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
956 : write(iunit,*) "l_use_tke_in_wp3_pr_turb_term = ", clubb_config_flags%l_use_tke_in_wp3_pr_turb_term
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
958 : write(iunit,*) "l_use_wp3_lim_with_smth_Heaviside = ", clubb_config_flags%l_use_wp3_lim_with_smth_Heaviside
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
960 : write(iunit,*) "l_modify_limiters_for_cnvg_test = ", clubb_config_flags%l_modify_limiters_for_cnvg_test
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/model_flags.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
458 : esat(i,k) = 10._core_rknd**(-7.90298_core_rknd*(373.16_core_rknd/T_in_K_clipped-1._core_rknd)+ &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/saturation.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
177 : call stat_assign( var_index=stats_metadata%ilh_thlm_mc, var_name="lh_thlm_mc", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
306 : call stat_assign( var_index=stats_metadata%ilh_rcm_avg, var_name="lh_rcm_avg", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
459 : call stat_assign( var_index=stats_metadata%ilh_cloud_frac, var_name="lh_cloud_frac", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
513 : call stat_assign( var_index=stats_metadata%ilh_Ncnp2_zt, var_name="lh_Ncnp2_zt", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
522 : call stat_assign( var_index=stats_metadata%ilh_Ncp2_zt, var_name="lh_Ncp2_zt", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
531 : call stat_assign( var_index=stats_metadata%ilh_Nrp2_zt, var_name="lh_Nrp2_zt", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
540 : call stat_assign( var_index=stats_metadata%ilh_rcp2_zt, var_name="lh_rcp2_zt", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
549 : call stat_assign( var_index=stats_metadata%ilh_rtp2_zt, var_name="lh_rtp2_zt", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
558 : call stat_assign( var_index=stats_metadata%ilh_thlp2_zt, var_name="lh_thlp2_zt", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
567 : call stat_assign( var_index=stats_metadata%ilh_rrp2_zt, var_name="lh_rrp2_zt", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
576 : call stat_assign( var_index=stats_metadata%ilh_rrm_auto, var_name="lh_rrm_auto", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
585 : call stat_assign( var_index=stats_metadata%ilh_rrm_accr, var_name="lh_rrm_accr", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
593 : call stat_assign( var_index=stats_metadata%ilh_rrm_evap, var_name="lh_rrm_evap", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
602 : call stat_assign( var_index=stats_metadata%ilh_Nrm_auto, var_name="lh_Nrm_auto", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
611 : call stat_assign( var_index=stats_metadata%ilh_Nrm_evap, var_name="lh_Nrm_evap", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
620 : call stat_assign( var_index=stats_metadata%ilh_rrm_src_adj, var_name="lh_rrm_src_adj", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
629 : call stat_assign( var_index=stats_metadata%ilh_rrm_evap_adj, var_name="lh_rrm_evap_adj", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
638 : call stat_assign( var_index=stats_metadata%ilh_Nrm_src_adj, var_name="lh_Nrm_src_adj", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
648 : call stat_assign( var_index=stats_metadata%ilh_Nrm_evap_adj, var_name="lh_Nrm_evap_adj", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
658 : call stat_assign( var_index=stats_metadata%ilh_precip_frac, var_name="lh_precip_frac", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
677 : call stat_assign( var_index=stats_metadata%ilh_mixt_frac, var_name="lh_mixt_frac", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
697 : call stat_assign( var_index=stats_metadata%ilh_m_vol_rad_rain, var_name="lh_m_vol_rad_rain", & !intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
705 : call stat_assign( var_index=stats_metadata%ilh_rrm_mc_nonadj, var_name="lh_rrm_mc_nonadj", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
717 : call stat_assign( var_index=stats_metadata%isilhs_variance_category(icategory), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
733 : call stat_assign( var_index=stats_metadata%ilh_samp_frac_category(icategory), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_lh_zt_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
88 : call stat_assign( var_index=stats_metadata%iT_in_K_rad, var_name="T_in_K_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
123 : call stat_assign( var_index=stats_metadata%ircm_in_cloud_rad, var_name="rcm_in_cloud_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
132 : call stat_assign( var_index=stats_metadata%icloud_frac_rad, var_name="cloud_frac_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
142 : call stat_assign( var_index=stats_metadata%iice_supersat_frac_rad, var_name="ice_supersat_frac_rad", & !In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
160 : call stat_assign( var_index=stats_metadata%iradht_LW_rad, var_name="radht_LW_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
169 : call stat_assign( var_index=stats_metadata%iradht_SW_rad, var_name="radht_SW_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
178 : call stat_assign( var_index=stats_metadata%ip_in_mb_rad, var_name="p_in_mb_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
187 : call stat_assign( var_index=stats_metadata%isp_humidity_rad, var_name="sp_humidity_rad", & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_rad_zt_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
127 : call stat_assign( var_index=stats_metadata%icc, var_name="cc", var_description="cc, Cloud cover", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
344 : call stat_assign( var_index=stats_metadata%iwp23_matrix_condt_num, var_name="wp23_matrix_condt_num", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
351 : call stat_assign( var_index=stats_metadata%ithlm_matrix_condt_num, var_name="thlm_matrix_condt_num", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
360 : call stat_assign( var_index=stats_metadata%irtm_matrix_condt_num, var_name="rtm_matrix_condt_num", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
369 : call stat_assign( var_index=stats_metadata%ithlp2_matrix_condt_num, var_name="thlp2_matrix_condt_num", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
377 : call stat_assign( var_index=stats_metadata%irtp2_matrix_condt_num, var_name="rtp2_matrix_condt_num", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
403 : call stat_assign( var_index=stats_metadata%iwindm_matrix_condt_num, var_name="windm_matrix_condt_num", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
437 : call stat_assign( var_index=stats_metadata%itot_vartn_normlzd_rtm, var_name="tot_vartn_normlzd_rtm", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
445 : call stat_assign( var_index=stats_metadata%itot_vartn_normlzd_thlm, var_name="tot_vartn_normlzd_thlm", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
453 : call stat_assign( var_index=stats_metadata%itot_vartn_normlzd_wprtp, var_name="tot_vartn_normlzd_wprtp", &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_sfc_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
383 : call stat_update_var_pt( stats_metadata%iprecip_frac_tol, 1, precip_frac_tol(j), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/precipitation_fraction.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
43 : ! lower(k)*upper(k-1)+l_diag(k)*1 = lhs( 0,k) => l_diag(k) = lhs( 0,k) - lower(k)*upper(k-1)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
205 : lower_diag_invrs(i,ndim) = 1.0_core_rknd / ( lhs(0,i,ndim) - lhs(1,i,ndim) * upper(i,ndim-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
292 : lower_diag_invrs(i,ndim) = 1.0_core_rknd / ( lhs(0,i,ndim) - lhs(1,i,ndim) * upper(i,ndim-1) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/tridiag_lu_solver.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
526 : wstar = ( one/T0 * grav * wpthlp(i,1) * 0.2_core_rknd * depth_pos_wpthlp(i) )**(one_third)
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.
371 : thv_par_1(i,j) = thl_par_1(i,j) + ep1 * thv_ds(i,j) * rt_par_1(i,j) + Lv_coef(i,j) * rc_par_1(i,j)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
619 : thv_par_1(i,j) = thl_par_1(i,j) + ep1 * thv_ds(i,j) * rt_par_1(i,j) + Lv_coef(i,j) * rc_par_1(i,j)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
984 : ! if l_avg_Lscale is true, compute_mixing_length is called two additional
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1460 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1461 : ! for a plot on how output behaves with varying min_max_smth_mag
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1464 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1550 : ustar(i) = smooth_max( ( upwp_sfc(i)**2 + vpwp_sfc(i)**2 )**one_fourth, ufmin, min_max_smth_mag )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1649 : 1.e8_core_rknd * abs(brunt_vaisala_freq_sqd_mixed(i,k))**3)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1665 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_smth, brunt_vaisala_freq_sqd_smth(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1687 : brunt_vaisala_freq_clipped = smooth_max( nz, ngrdcol, 1.0e-7_core_rknd, brunt_vaisala_freq_sqd_smth, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1802 : call stat_update_var(stats_metadata%ibrunt_freq_out_cloud, brunt_freq_out_cloud(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1842 : * sqrt(em(i,k)) / ( gr%zm(i,k) - sfc_elevation(i) + z_displace ) ! small
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2056 : tau_zt = smooth_min( nz, ngrdcol, tau_zt_unclipped, tau_max_zt, 1.0e3_core_rknd * min_max_smth_mag )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/mixing_length.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
637 : call stat_update_var( stats_metadata%icoef_wp4_implicit, coef_wp4_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1426 : call stat_update_var_pt( stats_metadata%iwp23_matrix_condt_num, 1, one / rcond(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1514 : call stat_end_update_pt( stats_metadata%iwp2_dp1, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1561 : call stat_end_update_pt( stats_metadata%iwp2_pr1, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1625 : call stat_end_update_pt( stats_metadata%iwp3_ta, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1638 : call stat_end_update_pt( stats_metadata%iwp3_tp, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1644 : call stat_end_update_pt( stats_metadata%iwp3_pr_tp, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2713 : call stat_update_var_pt( stats_metadata%iwp2_pr_dfsn, k, rhs_pr_dfsn_wp2(i,k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2718 : call stat_update_var_pt( stats_metadata%iwp2_splat, k, - lhs_splat_wp2(i,k) * wp2(i,k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2734 : call stat_modify_pt( stats_metadata%iwp2_pr1, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2812 : call stat_begin_update_pt( stats_metadata%iwp3_ta, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2827 : call stat_begin_update_pt( stats_metadata%iwp3_tp, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2833 : call stat_begin_update_pt( stats_metadata%iwp3_pr_tp, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2877 : call stat_update_var_pt( stats_metadata%iwp3_splat, k, - lhs_splat_wp3(i,k) * wp3(i,k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2888 : call stat_begin_update_pt( stats_metadata%iwp3_dp1, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2907 : call stat_update_var_pt( stats_metadata%iwp3_pr_turb, k, rhs_pr_turb_wp3(i,k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2909 : call stat_update_var_pt( stats_metadata%iwp3_pr_dfsn, k, rhs_pr_dfsn_wp3(i,k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_wp2_wp3_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1908 : field ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/clubb_api_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
501 : write(fstderr,*) "l_mono_flux_lim_rtm=T with l_mono_flux_lim_spikefix=F can lead to spikes aloft."
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
940 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
941 : Lscale(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
942 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
946 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
952 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
953 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
956 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
957 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
958 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
959 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
960 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
962 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2567 : call stat_update_var( stats_metadata%icoef_wp2rtp_implicit, coef_wp2rtp_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2569 : call stat_update_var( stats_metadata%iterm_wp2rtp_explicit, term_wp2rtp_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2571 : call stat_update_var( stats_metadata%icoef_wp2thlp_implicit, coef_wp2thlp_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2573 : call stat_update_var( stats_metadata%iterm_wp2thlp_explicit, term_wp2thlp_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2975 : call xm_wpxp_rhs( nz, ngrdcol, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3078 : call stat_update_var( stats_metadata%iupwp_pr4, C_uu_shr * wp2(i,:) * ddzt_um(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3080 : call stat_update_var( stats_metadata%ivpwp_pr4, C_uu_shr * wp2(i,:) * ddzt_vm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3277 : if ( stats_metadata%l_stats_samp .and. stats_metadata%ithlm_matrix_condt_num + stats_metadata%irtm_matrix_condt_num > 0 ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4086 : call xm_wpxp_rhs( nz, ngrdcol, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In
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.
427 : call stat_assign( var_index=stats_metadata%iinvrs_tau_wpxp_zm, var_name="invrs_tau_wpxp_zm", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
443 : call stat_assign( var_index=stats_metadata%iinvrs_tau_no_N2_zm, var_name="invrs_tau_no_N2_zm", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2082 : call stat_assign( var_index=stats_metadata%iice_supersat_frac_zm, var_name="ice_supersat_frac_zm", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2206 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd, var_name="bv_freq_sqd", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2214 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_splat, var_name="bv_freq_sqd_splat", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2222 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_mixed, var_name="bv_freq_sqd_mixed", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2230 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_moist, var_name="bv_freq_sqd_moist", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2238 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_dry, var_name="bv_freq_sqd_dry", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2246 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_smth, var_name="bv_freq_sqd_smth", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2254 : call stat_assign( var_index=stats_metadata%ibrunt_freq_out_cloud, var_name="bv_freq_out_cloud", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2298 : call stat_assign( var_index=stats_metadata%iwp3_on_wp2_cfl_num, var_name="wp3_on_wp2_cfl_num", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2326 : call stat_assign( var_index=stats_metadata%istability_correction, var_name="stability_correction", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2380 : call stat_assign( var_index=stats_metadata%isclrprtp(j), var_name="sclr"//trim(sclr_idx)//"prtp", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2391 : call stat_assign( var_index=stats_metadata%isclrp2(j), var_name="sclr"//trim(sclr_idx)//"p2", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2402 : call stat_assign( var_index=stats_metadata%isclrpthvp(j), var_name="sclr"//trim(sclr_idx)//"pthvp", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2413 : call stat_assign( var_index=stats_metadata%isclrpthlp(j), var_name="sclr"//trim(sclr_idx)//"pthlp", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2424 : call stat_assign( var_index=stats_metadata%isclrprcp(j), var_name="sclr"//trim(sclr_idx)//"prcp", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2435 : call stat_assign( var_index=stats_metadata%iwpsclrp(j), var_name="wpsclr"//trim(sclr_idx)//"p", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2446 : call stat_assign( var_index=stats_metadata%iwpsclrp2(j), var_name="wpsclr"//trim(sclr_idx)//"p2", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2457 : call stat_assign( var_index=stats_metadata%iwp2sclrp(j), var_name="wp2sclr"//trim(sclr_idx)//"p", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2468 : call stat_assign( var_index=stats_metadata%iwpsclrprtp(j), var_name="wpsclr"//trim(sclr_idx)//"prtp", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2491 : call stat_assign( var_index=stats_metadata%iwpedsclrp(j), var_name="wpedsclr"//trim(sclr_idx)//"p", &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_zm_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
231 : real( kind = core_rknd ), dimension(ngrdcol, nz, min(1,sclr_dim), 2 ), intent(in) :: & ! h1g, 2010-06-15
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
590 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
591 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
621 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
622 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
633 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
634 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
988 : pdf_params%rsatl_1(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl1(i,:) ) * RH_crit(i, :, 1, 1)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1003 : pdf_params%rsatl_2(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl2(i,:) ) * RH_crit(i, :, 1, 2)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1130 : rcm(i,k) = pdf_params%mixt_frac(i,k) * pdf_params%rc_1(i,k) + ( one - pdf_params%mixt_frac(i,k) ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1305 : = pdf_params%mixt_frac(i,k) * ( ( sclr1(i,k,j) - sclrm(i,k,j) ) * pdf_params%rc_1(i,k) ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1311 : + ( one - pdf_params%mixt_frac(i,k) ) * corr_sclr_rt_2(i,k,j) * pdf_params%crt_2(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1317 : - ( one - pdf_params%mixt_frac(i,k) ) * corr_sclr_thl_2(i,k,j) * pdf_params%cthl_2(i,k) &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/pdf_closure_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
847 : !$acc wprtp_sfc, upwp_sfc, vpwp_sfc, sclrm_forcing, wpsclrp_sfc, edsclrm_forcing, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
923 : !$acc rc_coef_zm, Km_zm, Kmh_zm, gamma_Skw_fnc, sigma_sqd_w, sigma_sqd_w_tmp, sigma_sqd_w_zt, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1002 : ( nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1003 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1004 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1005 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1006 : thv_ds_zm(i,:), thv_ds_zt(i,:), wpthlp_sfc(i), wprtp_sfc(i), upwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1007 : vpwp_sfc(i), um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1008 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1009 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1012 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1013 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1655 : ! Added an extra check for stats_metadata%irel_humidity > 0; otherwise, if both stats_metadata%irsat = 0 and
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1656 : ! stats_metadata%irel_humidity = 0, rsat is not computed, leading to a floating-point exception
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1667 : call stat_update_var( stats_metadata%irel_humidity, rel_humidity(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1715 : call stat_update_var( stats_metadata%istability_correction, stability_correction(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1796 : call stat_update_var(stats_metadata%iinvrs_tau_wpxp_zm, invrs_tau_wpxp_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1800 : call stat_update_var(stats_metadata%iinvrs_tau_wp3_zm, invrs_tau_wp3_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1804 : call stat_update_var(stats_metadata%iinvrs_tau_no_N2_zm, invrs_tau_no_N2_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1813 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd, brunt_vaisala_freq_sqd(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1815 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_splat, brunt_vaisala_freq_sqd_splat(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1817 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_mixed, brunt_vaisala_freq_sqd_mixed(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1819 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_moist, brunt_vaisala_freq_sqd_moist(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1821 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_dry, brunt_vaisala_freq_sqd_dry(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1839 : clubb_config_flags%l_modify_limiters_for_cnvg_test, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1841 : stats_zm, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1866 : call advance_xm_wpxp( nz, ngrdcol, gr, dt_advance, sigma_sqd_w, wm_zm, wm_zt, wp2, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1931 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2715 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2716 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2717 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2718 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2719 : rho_ds_zm(i,:), rho_ds_zt(i,:), thv_ds_zm(i,:), thv_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2720 : wm_zt(i,:), wm_zm(i,:), rcm(i,:), wprcp(i,:), rc_coef(i,:), rc_coef_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2721 : rcm_zm(i,:), rtm_zm(i,:), thlm_zm(i,:), cloud_frac(i,:), ice_supersat_frac(i,:),& ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2724 : thvm(i,:), ug(i,:), vg(i,:), Lscale(i,:), wpthlp2(i,:), wp2thlp(i,:), wprtp2(i,:), wp2rtp(i,:),& ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2725 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2726 : wprtpthlp(i,:), sigma_sqd_w_zt(i,:), rsat(i,:), wp2_zt(i,:), thlp2_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2727 : wpthlp_zt(i,:), wprtp_zt(i,:), rtp2_zt(i,:), rtpthlp_zt(i,:), up2_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2728 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2731 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2732 : wp3_zm(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), Skw_velocity(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2735 : pdf_params_single_col(i), pdf_params_zm_single_col(i), sclrm(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2736 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2737 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2738 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2739 : stats_metadata, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2740 : stats_zt(i), stats_zm(i), stats_sfc(i) ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2759 : nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2760 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2761 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2762 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2763 : thv_ds_zm(i,:), thv_ds_zt(i,:), wpthlp_sfc(i), wprtp_sfc(i), upwp_sfc(i), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2764 : vpwp_sfc(i), um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2765 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2766 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2769 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2770 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2862 : !$acc rc_coef_zm, Km_zm, Kmh_zm, gamma_Skw_fnc, sigma_sqd_w, sigma_sqd_w_tmp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2863 : !$acc sqrt_em_zt, xp3_coef_fnc, w_1_zm, w_2_zm, varnce_w_1_zm, varnce_w_2_zm, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2868 : !$acc invrs_tau_C4_zm, invrs_tau_C14_zm, invrs_tau_wp2_zm, invrs_tau_wpxp_zm, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2869 : !$acc invrs_tau_wp3_zm, invrs_tau_no_N2_zm, invrs_tau_bkgnd, invrs_tau_shear, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4269 : write(fstderr,*) "l_stability_correct_tau_zm = ", clubb_config_flags%l_stability_correct_tau_zm
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4307 : write(fstderr,*) "Unknown type of double Gaussian PDF selected: ", clubb_config_flags%iiPDF_type
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_clubb_core_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
566 : call calc_xp2_xpyp_ta_terms( nz, ngrdcol, gr, wprtp, wprtp2, wpthlp, wpthlp2, wprtpthlp, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1306 : sclrpthlp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1423 : subroutine solve_xp2_xpyp_with_single_lhs( nz, ngrdcol, gr, C2x, invrs_tau_xp2_zm, rtm, thlm, wprtp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1832 : rhs_ta_wpsclrp2, rhs_ta_wprtpsclrp, rhs_ta_wpthlpsclrp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2701 : real( kind = core_rknd ), dimension(ngrdcol) :: rcond ! Est. of the reciprocal of the condition # on the matrix
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2735 : ixapxbp_matrix_condt_num = max( stats_metadata%irtp2_matrix_condt_num, stats_metadata%ithlp2_matrix_condt_num, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2755 : call stat_update_var_pt( stats_metadata%irtp2_matrix_condt_num, 1, one / rcond(i), & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2758 : call stat_update_var_pt( stats_metadata%ithlp2_matrix_condt_num, 1, one / rcond(i), & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2761 : call stat_update_var_pt( stats_metadata%irtpthlp_matrix_condt_num, 1, one / rcond(i), & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4014 : wp_coef(i,k) = ( one - one_third * beta ) * a1(i,k)**2 * wp3_on_wp2(i,k) / wp2(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4015 : wp_coef_zt(i,k) = ( one - one_third * beta ) * a1_zt(i,k)**2 * wp3_on_wp2_zt(i,k) / wp2_zt(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4196 : sgn_t_vel_sclrprtp(i,k) = sign(one,term_wprtpsclrp_explicit_zm(i,k)*sclrprtp(i,k,sclr))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4230 : sgn_t_vel_sclrpthlp(i,k) = sign(one,term_wpthlpsclrp_explicit_zm(i,k)*sclrpthlp(i,k,sclr))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4323 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5223 : call stat_update_var( stats_metadata%icoef_wprtp2_implicit, coef_wprtp2_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5225 : call stat_update_var( stats_metadata%iterm_wprtp2_explicit, term_wprtp2_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5227 : call stat_update_var( stats_metadata%icoef_wpthlp2_implicit, coef_wpthlp2_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5229 : call stat_update_var( stats_metadata%iterm_wpthlp2_explicit, term_wpthlp2_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5231 : call stat_update_var( stats_metadata%icoef_wprtpthlp_implicit, coef_wprtpthlp_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5233 : call stat_update_var( stats_metadata%iterm_wprtpthlp_explicit, term_wprtpthlp_explicit(i,:), & ! intent(in)
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.
687 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
784 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
792 : time_current, stats_metadata%stats_tout, stats_lh_zt%num_output_fields, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
856 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
864 : time_current, stats_metadata%stats_tout, stats_lh_sfc%num_output_fields, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1079 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1152 : time_current+real(stats_metadata%stats_tout, kind=time_precision), & !intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1226 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1302 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1310 : time_current, stats_metadata%stats_tout, stats_sfc%num_output_fields, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1972 : integer :: grid_level = 1 ! grid level for stats where there is only one sensible level (eg timeseries)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2108 : call stat_update_var( stats_metadata%ivarnce_thl_1, pdf_params%varnce_thl_1(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2110 : call stat_update_var( stats_metadata%ivarnce_thl_2, pdf_params%varnce_thl_2(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2128 : call stat_update_var( stats_metadata%icloud_frac_1, pdf_params%cloud_frac_1(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2130 : call stat_update_var( stats_metadata%icloud_frac_2, pdf_params%cloud_frac_2(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2144 : call stat_update_var( stats_metadata%icovar_chi_eta_1, pdf_params%covar_chi_eta_1(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2146 : call stat_update_var( stats_metadata%icovar_chi_eta_2, pdf_params%covar_chi_eta_2(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2148 : call stat_update_var( stats_metadata%icorr_w_chi_1, pdf_params%corr_w_chi_1(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2150 : call stat_update_var( stats_metadata%icorr_w_chi_2, pdf_params%corr_w_chi_2(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2152 : call stat_update_var( stats_metadata%icorr_w_eta_1, pdf_params%corr_w_eta_1(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2154 : call stat_update_var( stats_metadata%icorr_w_eta_2, pdf_params%corr_w_eta_2(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2156 : call stat_update_var( stats_metadata%icorr_chi_eta_1, pdf_params%corr_chi_eta_1(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2158 : call stat_update_var( stats_metadata%icorr_chi_eta_2, pdf_params%corr_chi_eta_2(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2164 : call stat_update_var( stats_metadata%icorr_w_thl_1, pdf_params%corr_w_thl_1(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2166 : call stat_update_var( stats_metadata%icorr_w_thl_2, pdf_params%corr_w_thl_2(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2168 : call stat_update_var( stats_metadata%icorr_rt_thl_1, pdf_params%corr_rt_thl_1(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2170 : call stat_update_var( stats_metadata%icorr_rt_thl_2, pdf_params%corr_rt_thl_2(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2230 : call stat_update_var( stats_metadata%isclrm_f(isclr), sclrm_forcing(:,isclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2239 : call stat_update_var( stats_metadata%iedsclrm_f(isclr), edsclrm_forcing(:,isclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2322 : call stat_update_var( stats_metadata%iwp3_on_wp2_cfl_num, wp3_on_wp2 * dt / dzm, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2327 : call stat_update_var( stats_metadata%iice_supersat_frac_zm, ice_supersat_frac_zm, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2339 : call stat_update_var( stats_metadata%ivarnce_w_1_zm, pdf_params_zm%varnce_w_1(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2341 : call stat_update_var( stats_metadata%ivarnce_w_2_zm, pdf_params_zm%varnce_w_2(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2343 : call stat_update_var( stats_metadata%imixt_frac_zm, pdf_params_zm%mixt_frac(1,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2364 : call stat_update_var( stats_metadata%iwpsclrprtp(isclr), wpsclrprtp(:,isclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2366 : call stat_update_var( stats_metadata%iwpsclrpthlp(isclr), wpsclrpthlp(:,isclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2391 : call stat_update_var_pt( stats_metadata%icc, grid_level, maxval( cloud_frac(1:nz) ), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2415 : call stat_update_var_pt( stats_metadata%iz_cloud_base, grid_level, -10.0_core_rknd , & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2526 : call stat_update_var_pt( stats_metadata%itot_vartn_normlzd_rtm, grid_level, xtmp, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2532 : write(fstderr, *) "Warning: tot_vartn_normlzd_thlm tried to divide by zero denominator ", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2539 : call stat_update_var_pt( stats_metadata%itot_vartn_normlzd_thlm, grid_level, xtmp, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2545 : write(fstderr, *) "Warning: tot_vartn_normlzd_wprtp tried to divide by zero denominator ", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2552 : call stat_update_var_pt( stats_metadata%itot_vartn_normlzd_wprtp, grid_level, xtmp, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_clubb_utilities.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
776 : call stat_update_var_pt( stats_metadata%ihmp2_zt(j), k, hydrometp2_zt(i,k,j), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
837 : call stat_update_var_pt( stats_metadata%iprecip_frac, k, precip_fracs%precip_frac(i,k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
846 : call stat_update_var_pt( stats_metadata%iprecip_frac_1, k, precip_fracs%precip_frac_1(i,k), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
855 : call stat_update_var_pt( stats_metadata%iprecip_frac_2, k, precip_fracs%precip_frac_2(i,k), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3799 : call stat_update_var_pt( stats_metadata%imu_hm_1(hm_idx), k, mu_x_1(k,ivar), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3809 : call stat_update_var_pt( stats_metadata%imu_hm_2(hm_idx), k, mu_x_2(k,ivar), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3820 : call stat_update_var_pt( stats_metadata%imu_Ncn_1, k, mu_x_1(k,iiPDF_Ncn), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3829 : call stat_update_var_pt( stats_metadata%imu_Ncn_2, k, mu_x_2(k,iiPDF_Ncn), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3844 : call stat_update_var_pt( stats_metadata%isigma_hm_1(hm_idx), k, sigma_x_1(k,ivar), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3855 : call stat_update_var_pt( stats_metadata%isigma_hm_2(hm_idx), k, sigma_x_2(k,ivar), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3866 : call stat_update_var_pt( stats_metadata%isigma_Ncn_1, k, sigma_x_1(k,iiPDF_Ncn), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3875 : call stat_update_var_pt( stats_metadata%isigma_Ncn_2, k, sigma_x_2(k,iiPDF_Ncn), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4202 : call stat_update_var_pt( stats_metadata%icorr_hmx_hmy_1(hm_idx_jvar,hm_idx_ivar), k, & ! in
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4214 : call stat_update_var_pt( stats_metadata%icorr_hmx_hmy_2(hm_idx_jvar,hm_idx_ivar), k, & ! in
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4326 : call stat_update_var_pt( stats_metadata%imu_hm_1_n(hm_idx), k, mu_hm_1_n(k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4345 : call stat_update_var_pt( stats_metadata%imu_hm_2_n(hm_idx), k, mu_hm_2_n(k), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/setup_clubb_pdf_params.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
549 : call stat_assign( var_index=stats_metadata%iice_supersat_frac, var_name="ice_supersat_frac", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
781 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
935 : call stat_assign( var_index=stats_metadata%irho, var_name="rho", var_description="rho, Air density", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2887 : call stat_assign( var_index=stats_metadata%iw_KK_evap_covar_zt, var_name="w_KK_evap_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2895 : call stat_assign( var_index=stats_metadata%irt_KK_evap_covar_zt, var_name="rt_KK_evap_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2903 : call stat_assign( var_index=stats_metadata%ithl_KK_evap_covar_zt, var_name="thl_KK_evap_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2912 : call stat_assign( var_index=stats_metadata%iw_KK_auto_covar_zt, var_name="w_KK_auto_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2920 : call stat_assign( var_index=stats_metadata%irt_KK_auto_covar_zt, var_name="rt_KK_auto_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2928 : call stat_assign( var_index=stats_metadata%ithl_KK_auto_covar_zt, var_name="thl_KK_auto_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2937 : call stat_assign( var_index=stats_metadata%iw_KK_accr_covar_zt, var_name="w_KK_accr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2946 : call stat_assign( var_index=stats_metadata%irt_KK_accr_covar_zt, var_name="rt_KK_accr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2955 : call stat_assign( var_index=stats_metadata%ithl_KK_accr_covar_zt, var_name="thl_KK_accr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2963 : call stat_assign( var_index=stats_metadata%irr_KK_mvr_covar_zt, var_name="rr_KK_mvr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2972 : call stat_assign( var_index=stats_metadata%iNr_KK_mvr_covar_zt, var_name="Nr_KK_mvr_covar_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2981 : call stat_assign( var_index=stats_metadata%iKK_mvr_variance_zt, var_name="KK_mvr_variance_zt", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4929 : call stat_assign( var_index=stats_metadata%icloud_frac_refined, var_name="cloud_frac_refined", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4945 : call stat_assign( var_index=stats_metadata%ihl_on_Cp_residual, var_name="hl_on_Cp_residual", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4966 : call stat_assign( var_index=stats_metadata%isclrm(j), var_name="sclr"//trim(sclr_idx)//"m", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4977 : call stat_assign( var_index=stats_metadata%isclrm_f(j), var_name="sclr"//trim(sclr_idx)//"m_f", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4988 : call stat_assign( var_index=stats_metadata%iedsclrm(j), var_name="edsclr"//trim(sclr_idx)//"m", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4999 : call stat_assign( var_index=stats_metadata%iedsclrm_f(j), var_name="edsclr"//trim(sclr_idx)//"m_f", &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_zt_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/Benchmark_cases/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has forbidden elements: .gt. .
71 : if (time.gt.80880_time_precision) then
CLUBBStandardsCheck.pl WARNING: File has forbidden elements.
../src/Benchmark_cases/neutral_case.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/KK_microphys/*.F90
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/SILHS/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2210 : ! call stat_update_var( stats_metadata%ilh_cloud_frac_unweighted, lh_cloud_frac, stats_lh_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2554 : ! call stat_update_var( stats_metadata%ilh_precip_frac_unweighted, lh_precip_frac, stats_lh_zt )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2597 : call stat_update_var_pt( stats_metadata%ik_lh_start, 1, real( k_lh_start(i), kind=core_rknd ), stats_lh_sfc )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2644 : ! call stat_update_var( stats_metadata%ilh_samp_frac_category(icategory), lh_samp_frac(:,icategory), &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/SILHS/latin_hypercube_driver_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/G_unit_test_types/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
121 : result = smooth_min(4, 1, input, zero, min_max_smth_mag) ! Order of nz and ngrdcol is opposite to order of indexing! This is very unintuitive!
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
174 : ! Case 3: Make sure that on a large number of arbitrarily chosen points with small min_max_smth_mag,
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/G_unit_test_types/smooth_min_max_tests.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1587 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), &! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/G_unit_test_types/pdf_parameter_tests.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
[Pipeline] }
[Pipeline] // dir
[Pipeline] }
[Pipeline] // stage
[Pipeline] stage
[Pipeline] { (Check for wp2 NaN error from advance_wp2_wp3)
[Pipeline] sh
+ grep 'Error calling advance_wp2_wp3' run_scripts/advance_wp2_wp3_bad_wp2
Error calling advance_wp2_wp3
[Pipeline] }
[Pipeline] // stage
[Pipeline] stage
[Pipeline] { (Check for wp2 NaN error from advance_wm_wpxp)
[Pipeline] sh
+ grep 'Error calling advance_xm_wpxp' run_scripts/advance_xm_wpxp_bad_wp2
Error calling advance_xm_wpxp
[Pipeline] }
[Pipeline] // stage
[Pipeline] stage
[Pipeline] { (Declarative: Post Actions)
[Pipeline] script
[Pipeline] {
[Pipeline] cleanWs
[WS-CLEANUP] Deleting project workspace...
[WS-CLEANUP] Deferred wipeout is used...
[WS-CLEANUP] done
[Pipeline] }
[Pipeline] // script
[Pipeline] }
[Pipeline] // stage
[Pipeline] }
[Pipeline] // withEnv
[Pipeline] }
[Pipeline] // node
[Pipeline] End of Pipeline
Finished: SUCCESS