Skipping 60 KB..
Full LogTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTest
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/latin_hypercube_driver_module.F90:1009:44:
1009 | subroutine clip_transform_silhs_output( gr, nz, ngrdcol, num_samples, & ! In
| 1
Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument]
ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_bugsrad.a
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/silhs_api_module.F90:324:13:
324 | rho_ds_zt, & ! Unused
| 1
Warning: Unused dummy argument ‘rho_ds_zt’ at (1) [-Wunused-dummy-argument]
ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libsilhs.a
ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_morrison.a
../src/Benchmark_cases/cloud_sed_module.F90:168:44:
168 | if ( zt2zm( gr, rcm, k) > zero .AND. zt2zm( gr, Ncm, k ) > zero ) then
| 1
Warning: Impure function ‘redirect_interpolated_azm_k’ at (1) might not be evaluated [-Wfunction-elimination]
../src/morrison_microphys_module.F90:1331:13:
1331 | .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:1332:13:
1332 | .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:1333:13:
1333 | .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:1334:13:
1334 | .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:1335:13:
1335 | .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:1336:13:
1336 | .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:1337:13:
1337 | .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:1338:13:
1338 | .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:1339:13:
1339 | .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:1340:13:
1340 | .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:1341:13:
1341 | .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]
../src/Benchmark_cases/neutral_case.F90:36:8:
36 | use constants_clubb, only: grav ! Variable(s)
| 1
Warning: Unused parameter ‘grav’ which has been explicitly imported at (1) [-Wunused-parameter]
../src/Benchmark_cases/neutral_case.F90:21:51:
21 | subroutine neutral_case_sfclyr( time, z, thlm_sfc, &
| 1
Warning: Unused dummy argument ‘thlm_sfc’ at (1) [-Wunused-dummy-argument]
../src/Benchmark_cases/neutral_case.F90:21:41:
21 | subroutine neutral_case_sfclyr( time, z, thlm_sfc, &
| 1
Warning: Unused dummy argument ‘z’ at (1) [-Wunused-dummy-argument]
../src/KK_microphys_module.F90:43:35:
43 | subroutine KK_local_microphys( gr, dt, nz, l_latin_hypercube, & ! In
| 1
Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument]
../src/clubb_driver.F90:6360:39:
6360 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in)
| 1
Warning: Unused dummy argument ‘lmin’ at (1) [-Wunused-dummy-argument]
../src/clubb_driver.F90:6360:33:
6360 | 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:5564:8:
5564 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter]
ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_other.a
../src/G_unit_test_types/w_up_in_cloud_tests.F90:24:8:
24 | use clubb_precision, only: &
| 1
Warning: Unused parameter ‘core_rknd’ which has been explicitly imported at (1) [-Wunused-parameter]
../src/G_unit_test_types/smooth_heaviside_tests.F90:98:7:
98 | i
| 1
Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable]
../src/G_unit_test_types/smooth_heaviside_tests.F90:120:80:
120 | total_mismatches = total_mismatches + COUNT(abs(result - result_cmp) >= eps)
| ^
Warning: ‘total_mismatches’ is used uninitialized in this function [-Wuninitialized]
../src/G_unit_test_types/smooth_heaviside_tests.F90:32:31:
32 | integer :: total_mismatches
| ^
note: ‘total_mismatches’ was declared here
../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]
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
292 : 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: 'use' statement w/o 'only' found in the following line:
6481 : 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.
1289 : 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.
1290 : 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.
2545 : stats_zt, stats_zm, stats_sfc, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2551 : precip_fracs, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2691 : thlm(1,:), p_in_Pa, exner(1,:), rho, rho_zm, rtm(1,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2795 : exner(1,:), cloud_frac, ice_supersat_frac, thlm(1,:), rtm(1,:), rcm(1,:), hydromet, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3413 : ! 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.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
452 : 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: 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.
462 : = + 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.
1106 : = + 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.
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: 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.
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.
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.
365 : 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.
613 : 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.
977 : ! if l_avg_Lscale is true, compute_mixing_length is called two additional
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1430 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1431 : ! for a plot on how output behaves with varying min_max_smth_mag
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1434 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1517 : 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.
1616 : 1.e8_core_rknd * abs(brunt_vaisala_freq_sqd_mixed(i,k))**3)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1644 : 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.
1785 : * sqrt(em(i,k)) / ( gr%zm(i,k) - sfc_elevation(i) + z_displace ) ! small
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1998 : 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.
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.
528 : 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.
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.
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.
899 : !$acc wprtp_sfc, upwp_sfc, vpwp_sfc, sclrm_forcing, wpsclrp_sfc, edsclrm_forcing, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
975 : !$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.
1054 : ( nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1055 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1056 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1057 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1058 : 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.
1059 : 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.
1060 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1061 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1064 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1065 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1862 : call stat_update_var(ibrunt_vaisala_freq_sqd_splat, brunt_vaisala_freq_sqd_splat(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1864 : call stat_update_var(ibrunt_vaisala_freq_sqd_mixed, brunt_vaisala_freq_sqd_mixed(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1866 : call stat_update_var(ibrunt_vaisala_freq_sqd_moist, brunt_vaisala_freq_sqd_moist(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1868 : call stat_update_var(ibrunt_vaisala_freq_sqd_dry, brunt_vaisala_freq_sqd_dry(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1886 : clubb_config_flags%l_modify_limiters_for_cnvg_test, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1887 : stats_zm, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1912 : 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.
1976 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2753 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2754 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2755 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2756 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2757 : 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.
2758 : 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.
2759 : 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.
2762 : 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.
2763 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2764 : 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.
2765 : 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.
2766 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2769 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2770 : 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.
2773 : 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.
2774 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2775 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2776 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2796 : nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2797 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2798 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2799 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2800 : 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.
2801 : 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.
2802 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2803 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2806 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2807 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2899 : !$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.
2900 : !$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.
2905 : !$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.
2906 : !$acc invrs_tau_wp3_zm, invrs_tau_no_N2_zm, invrs_tau_bkgnd, invrs_tau_shear, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4311 : write(fstderr,*) "l_stability_correct_tau_zm = ", clubb_config_flags%l_stability_correct_tau_zm
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4349 : 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.
1207 : um_col, vm_col, upwp_col, vpwp_col, up2_col, vp2_col, up3_col, vp3_col, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1209 : wp2_col, wp3_col, rtp2_col, rtp3_col, thlp2_col, thlp3_col, rtpthlp_col, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1951 : 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.
509 : 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.
944 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
945 : Lscale(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
946 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
950 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
956 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
957 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
960 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
961 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
962 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
963 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
964 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
966 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3021 : 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.
4111 : 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.
2176 : 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.
2736 : write(fstderr, *) "Warning: tot_vartn_normlzd_thlm tried to divide by zero denominator ", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2749 : write(fstderr, *) "Warning: tot_vartn_normlzd_wprtp tried to divide by zero denominator ", &
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.
235 : 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.
591 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
592 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
622 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
623 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
634 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
635 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
989 : 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.
1004 : 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.
1131 : 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.
1306 : = 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.
1312 : + ( 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.
1318 : - ( 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.
567 : call calc_xp2_xpyp_ta_terms( nz, ngrdcol, gr, wprtp, wprtp2, wpthlp, wpthlp2, wprtpthlp, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1391 : 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.
1783 : rhs_ta_wpsclrp2, rhs_ta_wprtpsclrp, rhs_ta_wpthlpsclrp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2648 : 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.
4001 : 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.
4002 : 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.
4183 : 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.
4217 : 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.
4310 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! 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.
1326 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_zt_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
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.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
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.
configurable_multi_column_nl not found, setting num_standalone_columns = 1
Warning: ../input/case_setups/bomex_corr_array_cloud.in was not found! The default correlation arrays will be used.
Program exited normally
configurable_multi_column_nl not found, setting num_standalone_columns = 1
Warning: ../input/case_setups/dycoms2_rf01_corr_array_cloud.in was not found! The default correlation arrays will be used.
Program exited normally
......................................................................................................................................................................................................................................................................................................................................................................................................................................................................................../home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mixing_length.F90:877:8:
877 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘three’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:5044:47:
5044 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:5047:47:
5047 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:5050:47:
5050 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4938:34:
4938 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4943:34:
4943 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4948:34:
4948 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4973:30:
4973 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4977:30:
4977 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4981:30:
4981 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4985:30:
4985 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4876:21:
4876 | integer :: i, k, sclr
| 1
Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4217:10:
4217 | use model_flags, only: &
| 1
Warning: Unused parameter ‘lapack’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4157:22:
4157 | ( nzmax, T0_in, ts_nudge_in, & ! intent(in)
| 1
Warning: Unused dummy argument ‘nzmax’ at (1) [-Wunused-dummy-argument]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘irtp2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘irtpthlp_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘ithlp2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘iup2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:207:8:
207 | use parameter_indices, only: &
| 1
Warning: Unused parameter ‘iup2_sfc_coef’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘ivp2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘iwp2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:190:8:
190 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘num_hf_draw_points’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clubb_api_module.F90:1047:16:
1047 | integer :: i
| 1
Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable]
../src/morrison_microphys_module.F90:1331:13:
1331 | .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:1332:13:
1332 | .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:1333:13:
1333 | .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:1334:13:
1334 | .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:1335:13:
1335 | .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:1336:13:
1336 | .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:1337:13:
1337 | .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:1338:13:
1338 | .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:1339:13:
1339 | .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:1340:13:
1340 | .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:1341:13:
1341 | .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]
../src/clubb_driver.F90:6360:39:
6360 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in)
| 1
Warning: Unused dummy argument ‘lmin’ at (1) [-Wunused-dummy-argument]
../src/clubb_driver.F90:6360:33:
6360 | 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:5564:8:
5564 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter]
../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]
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
292 : 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: 'use' statement w/o 'only' found in the following line:
6481 : 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.
1289 : 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.
1290 : 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.
2545 : stats_zt, stats_zm, stats_sfc, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2551 : precip_fracs, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2691 : thlm(1,:), p_in_Pa, exner(1,:), rho, rho_zm, rtm(1,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2795 : exner(1,:), cloud_frac, ice_supersat_frac, thlm(1,:), rtm(1,:), rcm(1,:), hydromet, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3413 : ! 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.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
452 : 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.
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.
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.
462 : = + 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.
1106 : = + 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.
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.
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.
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.
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.
365 : 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.
613 : 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.
977 : ! if l_avg_Lscale is true, compute_mixing_length is called two additional
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1430 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1431 : ! for a plot on how output behaves with varying min_max_smth_mag
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1434 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1517 : 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.
1616 : 1.e8_core_rknd * abs(brunt_vaisala_freq_sqd_mixed(i,k))**3)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1644 : 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.
1784 : * sqrt(em(i,k)) / ( gr%zm(i,k) - sfc_elevation(i) + z_displace ) ! small
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1869 : invrs_tau_wpxp_zm(i,k) = invrs_tau_zm(i,k) + C_invrs_tau_N2_wpxp * brunt_freq_out_cloud(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1995 : 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.
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.
528 : 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.
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.
1207 : um_col, vm_col, upwp_col, vpwp_col, up2_col, vp2_col, up3_col, vp3_col, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1209 : wp2_col, wp3_col, rtp2_col, rtp3_col, thlp2_col, thlp3_col, rtpthlp_col, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1951 : 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.
899 : !$acc wprtp_sfc, upwp_sfc, vpwp_sfc, sclrm_forcing, wpsclrp_sfc, edsclrm_forcing, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
975 : !$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.
1054 : ( nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1055 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1056 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1057 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1058 : 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.
1059 : 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.
1060 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1061 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1064 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1065 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1862 : call stat_update_var(ibrunt_vaisala_freq_sqd_splat, brunt_vaisala_freq_sqd_splat(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1864 : call stat_update_var(ibrunt_vaisala_freq_sqd_mixed, brunt_vaisala_freq_sqd_mixed(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1866 : call stat_update_var(ibrunt_vaisala_freq_sqd_moist, brunt_vaisala_freq_sqd_moist(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1868 : call stat_update_var(ibrunt_vaisala_freq_sqd_dry, brunt_vaisala_freq_sqd_dry(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1886 : clubb_config_flags%l_modify_limiters_for_cnvg_test, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1887 : stats_zm, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1912 : 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.
1976 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2753 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2754 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2755 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2756 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2757 : 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.
2758 : 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.
2759 : 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.
2762 : 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.
2763 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2764 : 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.
2765 : 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.
2766 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2769 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2770 : 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.
2773 : 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.
2774 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2775 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2776 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2796 : nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2797 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2798 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2799 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2800 : 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.
2801 : 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.
2802 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2803 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2806 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2807 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2899 : !$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.
2900 : !$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.
2905 : !$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.
2906 : !$acc invrs_tau_wp3_zm, invrs_tau_no_N2_zm, invrs_tau_bkgnd, invrs_tau_shear, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4311 : write(fstderr,*) "l_stability_correct_tau_zm = ", clubb_config_flags%l_stability_correct_tau_zm
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4349 : 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.
235 : 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.
591 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
592 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
622 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
623 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
634 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
635 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
989 : 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.
1004 : 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.
1131 : 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.
1306 : = 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.
1312 : + ( 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.
1318 : - ( 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.
2176 : 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.
2736 : write(fstderr, *) "Warning: tot_vartn_normlzd_thlm tried to divide by zero denominator ", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2749 : write(fstderr, *) "Warning: tot_vartn_normlzd_wprtp tried to divide by zero denominator ", &
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.
509 : 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.
944 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
945 : Lscale(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
946 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
950 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
956 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
957 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
960 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
961 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
962 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
963 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
964 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
966 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3021 : 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.
4111 : 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.
567 : call calc_xp2_xpyp_ta_terms( nz, ngrdcol, gr, wprtp, wprtp2, wpthlp, wpthlp2, wprtpthlp, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1391 : 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.
1783 : rhs_ta_wpsclrp2, rhs_ta_wprtpsclrp, rhs_ta_wpthlpsclrp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2648 : 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.
4001 : 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.
4002 : 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.
4183 : 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.
4217 : 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.
4310 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! 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.
1326 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_zt_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
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.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
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.
configurable_multi_column_nl not found, setting num_standalone_columns = 1
Warning: ../input/case_setups/bomex_corr_array_cloud.in was not found! The default correlation arrays will be used.
Program exited normally
configurable_multi_column_nl not found, setting num_standalone_columns = 1
Warning: ../input/case_setups/dycoms2_rf01_corr_array_cloud.in was not found! The default correlation arrays will be used.
Program exited normally
Directory 1 is 12364631b5749635e3cb3e50974ddab3a7fe5d4e
Directory 2 is c4b477cbb4e60bfaa2de7ca9afa404ab96d026fa
Using reporting threshold: 0.0
The following cases will be compared: ['bomex', 'dycoms2_rf01']
###DIFFING bomex netCDF (*.nc) files###
>No differences detected by the linux diff in bomex_zm.nc<
>No differences detected by the linux diff in bomex_zt.nc<
>No differences detected by the linux diff in bomex_sfc.nc<
>>>The linux diff could not detect any differences in the file pairs for case bomex.<<<
**********************************************************************************************************
###DIFFING dycoms2_rf01 netCDF (*.nc) files###
>No differences detected by the linux diff in dycoms2_rf01_zm.nc<
>No differences detected by the linux diff in dycoms2_rf01_zt.nc<
>No differences detected by the linux diff in dycoms2_rf01_sfc.nc<
>>>The linux diff could not detect any differences in the file pairs for case dycoms2_rf01.<<<
**********************************************************************************************************
SUMMARY:
Linux diff did not detect any differences in the compared files.
......................................................................................................................................................................................................................................................................................................................................................................................................................................................................................../home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mixing_length.F90:877:8:
877 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘three’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:5044:47:
5044 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:5047:47:
5047 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:5050:47:
5050 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4938:34:
4938 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4943:34:
4943 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4948:34:
4948 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4973:30:
4973 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4977:30:
4977 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4981:30:
4981 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4985:30:
4985 | 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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4876:21:
4876 | integer :: i, k, sclr
| 1
Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4217:10:
4217 | use model_flags, only: &
| 1
Warning: Unused parameter ‘lapack’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4157:22:
4157 | ( nzmax, T0_in, ts_nudge_in, & ! intent(in)
| 1
Warning: Unused dummy argument ‘nzmax’ at (1) [-Wunused-dummy-argument]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/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_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘irtp2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘irtpthlp_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘ithlp2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘iup2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:207:8:
207 | use parameter_indices, only: &
| 1
Warning: Unused parameter ‘iup2_sfc_coef’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘ivp2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:330:8:
330 | use stats_variables, only: &
| 1
Warning: Unused module variable ‘iwp2_sf’ which has been explicitly imported at (1) [-Wunused-variable]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:190:8:
190 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘num_hf_draw_points’ which has been explicitly imported at (1) [-Wunused-parameter]
/home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clubb_api_module.F90:1047:16:
1047 | integer :: i
| 1
Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable]
../src/morrison_microphys_module.F90:1331:13:
1331 | .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:1332:13:
1332 | .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:1333:13:
1333 | .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:1334:13:
1334 | .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:1335:13:
1335 | .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:1336:13:
1336 | .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:1337:13:
1337 | .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:1338:13:
1338 | .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:1339:13:
1339 | .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:1340:13:
1340 | .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:1341:13:
1341 | .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]
../src/clubb_driver.F90:6360:39:
6360 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in)
| 1
Warning: Unused dummy argument ‘lmin’ at (1) [-Wunused-dummy-argument]
../src/clubb_driver.F90:6360:33:
6360 | 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:5564:8:
5564 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter]
../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]
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
292 : 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: 'use' statement w/o 'only' found in the following line:
6481 : 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.
1289 : 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.
1290 : 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.
2545 : stats_zt, stats_zm, stats_sfc, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2551 : precip_fracs, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2691 : thlm(1,:), p_in_Pa, exner(1,:), rho, rho_zm, rtm(1,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2795 : exner(1,:), cloud_frac, ice_supersat_frac, thlm(1,:), rtm(1,:), rcm(1,:), hydromet, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3413 : ! 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.
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
452 : 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: 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: 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.
462 : = + 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.
1106 : = + 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.
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.
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.
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.
365 : 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.
613 : 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.
977 : ! if l_avg_Lscale is true, compute_mixing_length is called two additional
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1430 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1431 : ! for a plot on how output behaves with varying min_max_smth_mag
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1434 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1517 : 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.
1616 : 1.e8_core_rknd * abs(brunt_vaisala_freq_sqd_mixed(i,k))**3)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1644 : 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.
1785 : * sqrt(em(i,k)) / ( gr%zm(i,k) - sfc_elevation(i) + z_displace ) ! small
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1998 : 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.
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.
528 : 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.
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.
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.
899 : !$acc wprtp_sfc, upwp_sfc, vpwp_sfc, sclrm_forcing, wpsclrp_sfc, edsclrm_forcing, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
975 : !$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.
1054 : ( nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1055 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1056 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1057 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1058 : 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.
1059 : 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.
1060 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1061 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1064 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1065 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1862 : call stat_update_var(ibrunt_vaisala_freq_sqd_splat, brunt_vaisala_freq_sqd_splat(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1864 : call stat_update_var(ibrunt_vaisala_freq_sqd_mixed, brunt_vaisala_freq_sqd_mixed(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1866 : call stat_update_var(ibrunt_vaisala_freq_sqd_moist, brunt_vaisala_freq_sqd_moist(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1868 : call stat_update_var(ibrunt_vaisala_freq_sqd_dry, brunt_vaisala_freq_sqd_dry(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1886 : clubb_config_flags%l_modify_limiters_for_cnvg_test, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1887 : stats_zm, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1912 : 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.
1976 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2753 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2754 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2755 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2756 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2757 : 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.
2758 : 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.
2759 : 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.
2762 : 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.
2763 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2764 : 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.
2765 : 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.
2766 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2769 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2770 : 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.
2773 : 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.
2774 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2775 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2776 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2796 : nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2797 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2798 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2799 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2800 : 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.
2801 : 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.
2802 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2803 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2806 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2807 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2899 : !$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.
2900 : !$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.
2905 : !$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.
2906 : !$acc invrs_tau_wp3_zm, invrs_tau_no_N2_zm, invrs_tau_bkgnd, invrs_tau_shear, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4311 : write(fstderr,*) "l_stability_correct_tau_zm = ", clubb_config_flags%l_stability_correct_tau_zm
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4349 : 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.
2176 : 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.
2736 : write(fstderr, *) "Warning: tot_vartn_normlzd_thlm tried to divide by zero denominator ", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2749 : write(fstderr, *) "Warning: tot_vartn_normlzd_wprtp tried to divide by zero denominator ", &
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.
235 : 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.
591 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
592 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
622 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
623 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
634 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
635 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
989 : 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.
1004 : 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.
1131 : 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.
1306 : = 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.
1312 : + ( 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.
1318 : - ( 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.
509 : 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.
944 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
945 : Lscale(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
946 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
950 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
956 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
957 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
960 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
961 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
962 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
963 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
964 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
966 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3021 : 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.
4111 : 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.
1207 : um_col, vm_col, upwp_col, vpwp_col, up2_col, vp2_col, up3_col, vp3_col, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1209 : wp2_col, wp3_col, rtp2_col, rtp3_col, thlp2_col, thlp3_col, rtpthlp_col, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1951 : 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.
567 : call calc_xp2_xpyp_ta_terms( nz, ngrdcol, gr, wprtp, wprtp2, wpthlp, wpthlp2, wprtpthlp, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1391 : 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.
1783 : rhs_ta_wpsclrp2, rhs_ta_wprtpsclrp, rhs_ta_wpthlpsclrp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2648 : 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.
4001 : 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.
4002 : 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.
4183 : 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.
4217 : 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.
4310 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! 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.
1326 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/stats_zt_module.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
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.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
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.
configurable_multi_column_nl not found, setting num_standalone_columns = 1
Warning: ../input/case_setups/bomex_corr_array_cloud.in was not found! The default correlation arrays will be used.
Program exited normally
configurable_multi_column_nl not found, setting num_standalone_columns = 1
Warning: ../input/case_setups/dycoms2_rf01_corr_array_cloud.in was not found! The default correlation arrays will be used.
Program exited normally
Directory 1 is 05a4556763f089ac3afdb1aeb032e827040cc874
Directory 2 is 12364631b5749635e3cb3e50974ddab3a7fe5d4e
Using reporting threshold: 0.0
The following cases will be compared: ['bomex', 'dycoms2_rf01']
###DIFFING bomex netCDF (*.nc) files###
>No differences detected by the linux diff in bomex_zm.nc<
>No differences detected by the linux diff in bomex_zt.nc<
>No differences detected by the linux diff in bomex_sfc.nc<
>>>The linux diff could not detect any differences in the file pairs for case bomex.<<<
**********************************************************************************************************
###DIFFING dycoms2_rf01 netCDF (*.nc) files###
>No differences detected by the linux diff in dycoms2_rf01_zm.nc<
>No differences detected by the linux diff in dycoms2_rf01_zt.nc<
>No differences detected by the linux diff in dycoms2_rf01_sfc.nc<
>>>The linux diff could not detect any differences in the file pairs for case dycoms2_rf01.<<<
**********************************************************************************************************
SUMMARY:
Linux diff did not detect any differences in the compared files.
=============================== Configuring Test ===============================
Working directory set to: .
Trying to clone repo...
Cloned repo location: /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo
Output Save Mode: none
Using branch: master
Making list from 'UnresolvedCommits':
Run Output Path: repo/output
Run commands: ['repo/compile/compile.bash', '\nrm -rf repo/output', 'mkdir repo/output', '\ncp repo/input/tunable_parameters_compatible_r8029/configurable_model_flags.in repo/input/tunable_parameters', '\ncp repo/input/tunable_parameters_compatible_r8029/silhs_parameters.in repo/input/tunable_parameters', '\ncp repo/input/tunable_parameters_compatible_r8029/tunable_parameters.in repo/input/tunable_parameters', '\nrepo/run_scripts/run_scm.bash bomex', '\nrepo/run_scripts/run_scm.bash dycoms2_rf01']
Diffing command: python3 repo/run_scripts/run_bindiff_all.py
=============================== Running Test ===============================
Parsing message from commit: 12364631b5749635e3cb3e50974ddab3a7fe5d4e
Parsing message from commit: 05a4556763f089ac3afdb1aeb032e827040cc874
Found: BIT_CHANGING
Checking Commit: 12364631b5749635e3cb3e50974ddab3a7fe5d4e
Skipping: not final commit and not labelled BIT_CHANGING
Checking Commit: 05a4556763f089ac3afdb1aeb032e827040cc874
Checking out 12364631b5749635e3cb3e50974ddab3a7fe5d4e
Running: 'repo/compile/compile.bash'
Running: '
rm -rf repo/output'
Running: 'mkdir repo/output'
Running: '
cp repo/input/tunable_parameters_compatible_r8029/configurable_model_flags.in repo/input/tunable_parameters'
Running: '
cp repo/input/tunable_parameters_compatible_r8029/silhs_parameters.in repo/input/tunable_parameters'
Running: '
cp repo/input/tunable_parameters_compatible_r8029/tunable_parameters.in repo/input/tunable_parameters'
Running: '
repo/run_scripts/run_scm.bash bomex'
Running: '
repo/run_scripts/run_scm.bash dycoms2_rf01'
Checking out c4b477cbb4e60bfaa2de7ca9afa404ab96d026fa
Running: 'repo/compile/compile.bash'
Running: '
rm -rf repo/output'
Running: 'mkdir repo/output'
Running: '
cp repo/input/tunable_parameters_compatible_r8029/configurable_model_flags.in repo/input/tunable_parameters'
Running: '
cp repo/input/tunable_parameters_compatible_r8029/silhs_parameters.in repo/input/tunable_parameters'
Running: '
cp repo/input/tunable_parameters_compatible_r8029/tunable_parameters.in repo/input/tunable_parameters'
Running: '
repo/run_scripts/run_scm.bash bomex'
Running: '
repo/run_scripts/run_scm.bash dycoms2_rf01'
Diffing: 'python3 repo/run_scripts/run_bindiff_all.py 12364631b5749635e3cb3e50974ddab3a7fe5d4e c4b477cbb4e60bfaa2de7ca9afa404ab96d026fa'
Checking out 05a4556763f089ac3afdb1aeb032e827040cc874
Running: 'repo/compile/compile.bash'
Running: '
rm -rf repo/output'
Running: 'mkdir repo/output'
Running: '
cp repo/input/tunable_parameters_compatible_r8029/configurable_model_flags.in repo/input/tunable_parameters'
Running: '
cp repo/input/tunable_parameters_compatible_r8029/silhs_parameters.in repo/input/tunable_parameters'
Running: '
cp repo/input/tunable_parameters_compatible_r8029/tunable_parameters.in repo/input/tunable_parameters'
Running: '
repo/run_scripts/run_scm.bash bomex'
Running: '
repo/run_scripts/run_scm.bash dycoms2_rf01'
Output from 12364631b5749635e3cb3e50974ddab3a7fe5d4e already saved
Diffing: 'python3 repo/run_scripts/run_bindiff_all.py 05a4556763f089ac3afdb1aeb032e827040cc874 12364631b5749635e3cb3e50974ddab3a7fe5d4e'
[33m WARNING: commit '05a4556763f089ac3afdb1aeb032e827040cc874' was supposed to be BIT_CHANGING, but is not.[0m
=============================== Test Results ===============================
Commit Range Checked = c4b477cbb4e60bfaa2de7ca9afa404ab96d026fa...05a4556763f089ac3afdb1aeb032e827040cc874
No new Unresolved commits found.
Fake BIT_CHANGING Commits:
05a4556763f089ac3afdb1aeb032e827040cc874
No remaining Unresolved Commits.
=============================== Updating Config File ===============================
Saving into UnresolvedCommits:
Saving into BaselineCommit: 05a4556763f089ac3afdb1aeb032e827040cc874
=============================== Cleanup ===============================
Removed repo.
Removing all generated output
REMOVING: c4b477cbb4e60bfaa2de7ca9afa404ab96d026fa
REMOVING: 12364631b5749635e3cb3e50974ddab3a7fe5d4e
REMOVING: 05a4556763f089ac3afdb1aeb032e827040cc874
================== Unresolved Commit Status ==================
No remaining Unresolved Commits.
Exiting with code: 0
[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
![[Jenkins]](/jenkins/static/57c8a776/images/svgs/logo.svg){kind=logo}
