Skipping 259 KB..
Full LogTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTestTest
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1605 : pdf_implicit_coefs_terms_flip%term_wp2up_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1609 : pdf_implicit_coefs_terms_flip%coef_wp2vp_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1613 : pdf_implicit_coefs_terms_flip%term_wp2vp_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1647 : pdf_implicit_coefs_terms_flip%coef_wpup2_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1651 : pdf_implicit_coefs_terms_flip%term_wpup2_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1655 : pdf_implicit_coefs_terms_flip%coef_wpvp2_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1659 : pdf_implicit_coefs_terms_flip%term_wpvp2_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2463 : tolerance = max( 1.e-8_core_rknd, epsilon(tolerance) ) ! max statement for single precision runs
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/generalized_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
377 : um(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
379 : vm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
381 : ugm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
383 : vgm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
385 : thlm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
387 : rtm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
389 : press(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
392 : wm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
409 : edsclr_snd(km1,edsclr), edsclr_snd(k00,edsclr), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
410 : edsclr_snd(kp1,edsclr), edsclr_snd(kp2,edsclr) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
434 : um(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), u(k_above), u(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
435 : vm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), v(k_above), v(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
436 : ugm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), ug(k_above), ug(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
437 : vgm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), vg(k_above), vg(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
438 : thlm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), theta(k_above), theta(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
439 : rtm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), rt(k_above), rt(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
440 : press(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), p_in_Pa(k_above), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
442 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
446 : sclrm(i,k,sclr) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
452 : edsclrm(i,k,edsclr) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
481 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
507 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/sounding.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 8 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/CLUBB_core/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1868 : stats, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_clubb_core_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
492 : stats ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
500 : stats ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
952 : call windm_edsclrm_rhs( nzm, nzt, ngrdcol, gr, windm_edsclrm_scalar, dt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
953 : lhs_diff, edsclrm(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
954 : edsclrm_forcing(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
955 : rho_ds_zm, invrs_rho_ds_zt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
956 : l_imp_sfc_momentum_flux, wpedsclrp(:,gr%k_lb_zm,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
957 : stats, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
958 : rhs(:,:,edsclr) ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_windm_edsclrm_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
925 : stats, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1712 : stats_tmp_zt(i,k) = - gamma_over_implicit_ts * wp3_term_ta_lhs_result(5,i,k) * wp3(i,k-1) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1713 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(4,i,k) * wp2(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1714 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(3,i,k) * wp3(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1715 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(2,i,k) * wp2(i,k+1) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1716 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(1,i,k) * wp3(i,k+1)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_wp2_wp3_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
777 : call wpxp_term_pr1_lhs( nzm, ngrdcol, gr, C6rt_Skw_fnc, C6thl_Skw_fnc, C7_Skw_fnc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
778 : invrs_tau_C6_zm, l_scalar_calc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
779 : lhs_pr1_wprtp, lhs_pr1_wpthlp, lhs_pr1_wpsclrp ) ! Intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
852 : stats, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
853 : rtm, wprtp, thlm, wpthlp, sclrm, wpsclrp, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
854 : err_info ) ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
894 : stats, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4833 : tmp_zm_stats(i,k) = (-gamma_over_implicit_ts*lhs_ta_wpxp(2+gr%grid_dir_indx,i,k)) * wpxp(i,km1) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4835 : + (-gamma_over_implicit_ts*lhs_ta_wpxp(2-gr%grid_dir_indx,i,k)) * wpxp(i,kp1)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_xm_wpxp_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1310 : sclrprtp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1343 : sclrpthlp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3011 : stats_tmp(i,k) = (-gamma_over_implicit_ts * lhs_ta(2+gr%grid_dir_indx,i,k)) * xapxbp(i,km1) &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_xp2_xpyp_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2410 : ! calc_derrived_params_api - Adjusts values of background eddy diffusivity based on vertical grid spacing
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2477 : ! calc_derrived_params_api - Adjusts values of background eddy diffusivity based on vertical grid spacing
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/clubb_api_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
privateCheck failed: ../src/CLUBB_core/err_info_type_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
265 : write(err_info%err_header_global,'(A38, I3, A15, I3, A, A28, A33, F6.2, A1, F6.2, A, A39, A40)') &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
276 : write(err_info%err_header(i),'(A38, I3, A15, I3, A, A22, I2, A11, F6.2, A13, F6.2, A, A39, A40)') &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/err_info_type_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
234 : write(*,'(A6,I5,1X,I5,A4,E30.20,A3,E30.20)') "field(", i, k, ") = ", field(i,k), " < ", threshold
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
240 : write(fstderr, *) "column", i, " field average = ", sum(field(i,:) * rho_ds(i,:) * dz(i,:)) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
584 : ! rho_ds_dz(i,k-num_hf_draw_points:k+num_hf_draw_points))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
823 : * min( threshold, field(i,k_start:k_end:grid_dir_indx) ) ) * invrs_denom
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
828 : + mass_fraction * ( min( threshold, field(i,k_start:k_end:grid_dir_indx) ) - threshold )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
833 : * max( threshold, field(i,k_start:k_end:grid_dir_indx) ) ) * invrs_denom
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
840 : + mass_fraction * ( max( threshold, field(i,k_start:k_end:grid_dir_indx) ) - threshold )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/fill_holes.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
295 : write(fstderr, *) "The fixed minimum grid density momentum heights need to cover at least the domain of the physics grid."
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/grid_adaptation_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
315 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
541 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
845 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/model_flags.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
698 : !$acc parallel loop gang vector collapse(2) default(present) reduction(.or.:l_any_adjustment_needed)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
849 : ! MONOFLUX TEST COMMENT DO NOT REMOVE if( any(wpxp_net_adjust /= 0.0) ) write(fstderr,*) "MONOFLUX: wpxp adjusted "
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/mono_flux_limiter.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
839 : / sqrt( 4.0_core_rknd * ( 1.0_core_rknd - 0.4_core_rknd )**3 &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
840 : + clubb_params(ngrdcol,iSkw_max_mag)**2 ) ) ) ! Known magic number
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
902 : mult_factor_zt(i) = 1.0_core_rknd + clubb_params(i,imult_coef) * log( avg_deltaz(i) / grid_spacing_thresh )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
917 : nu_vert_res_dep%nu10(i) = clubb_params(i,inu10) * mult_factor_zt(i) !We're unsure of the grid
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/parameters_tunable.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
295 : !$acc pdf_params%alpha_thl, pdf_params%alpha_rt, pdf_params%crt_1, pdf_params%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
298 : !$acc pdf_params%stdev_eta_2, pdf_params%covar_chi_eta_1, pdf_params%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
300 : !$acc pdf_params%corr_w_eta_2, pdf_params%corr_chi_eta_1, pdf_params%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/pdf_parameter_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
419 : ! It's interesting to see how close E_inv is to the lhs diagonal, it's usually (visually) very close, but
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
420 : ! using it instead of E_inv requires so many more iterations (use it would be jacobi preconditioner)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/penta_bicgstab_solver.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
722 : call sfc_varnce_check( sclr_dim, wp2(i,gr%k_lb_zm), up2(i,gr%k_lb_zm), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
723 : vp2(i,gr%k_lb_zm), thlp2(i,gr%k_lb_zm), rtp2(i,gr%k_lb_zm), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
724 : rtpthlp(i,gr%k_lb_zm), sclrp2(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
725 : sclrprtp(i,gr%k_lb_zm,:), sclrpthlp(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
726 : err_info ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/sfc_varnce_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
129 : wp2_zt, thlp2_zt, wpthlp_zt, wprtp_zt, rtp2_zt, rtpthlp_zt, up2_zt, vp2_zt, upwp_zt, vpwp_zt, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
130 : wpup2, wpvp2, a3_coef_zt, wp3_on_wp2_zt, w_up_in_cloud, w_down_in_cloud, cloudy_updraft_frac, &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/stats_clubb_utilities.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Missing 'implicit none' statements. 'Implicit None' check FAILED!
CLUBBStandardsCheck.pl Add a line containing 'implicit none' to each program, module, subroutine, and function.
implicitCheck failed: ../src/CLUBB_core/stats_netcdf.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
134 : real(kind=stat_rknd), allocatable, dimension(:,:) :: buffer ! (col, height); height=1 for rank-1 vars
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
179 : logical :: l_last_sample = .false. ! True if we want to output at the end of this sample
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
180 : logical :: l_different_output_grid = .false. ! True if we need to remap the variables before output
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
181 : logical :: l_output_rad_files = .false. ! True if we want to output radiation grid variables
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
435 : if ( allocated( stats%grid%rho_lin_spline_vals ) ) deallocate( stats%grid%rho_lin_spline_vals )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
436 : if ( allocated( stats%grid%rho_lin_spline_levels ) ) deallocate( stats%grid%rho_lin_spline_levels )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
581 : ret_code = nf90_def_var( stats%ncid, "time", NF90_DOUBLE, (/ stats%time_dimid /), stats%time_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
586 : ret_code = nf90_def_var( stats%ncid, "col", NF90_DOUBLE, (/ stats%col_dimid /), stats%col_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
606 : ret_code = nf90_def_var( stats%ncid, "lh_zt", NF90_DOUBLE, (/ stats%lh_2d%lh_zt_dimid /), stats%lh_2d%lh_zt_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
613 : ret_code = nf90_def_var( stats%ncid, "rad_zt", NF90_DOUBLE, (/ stats%rad_zt_dimid /), stats%rad_zt_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
617 : ret_code = nf90_def_var( stats%ncid, "rad_zm", NF90_DOUBLE, (/ stats%rad_zm_dimid /), stats%rad_zm_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
624 : ret_code = nf90_def_var( stats%ncid, "param", NF90_DOUBLE, (/ stats%param_dimid /), stats%param_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
632 : (/ stats%param_strlen_dimid, stats%param_dimid /), stats%param_name_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
722 : ret_code = nf90_put_att( stats%ncid, stats%vars(i)%varid, "long_name", trim( stats%vars(i)%long_name ) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
723 : ret_code = nf90_put_att( stats%ncid, stats%vars(i)%varid, "units", trim( stats%vars(i)%units ) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
736 : ret_code = nf90_put_var( stats%ncid, stats%col_varid, [( real( i, kind=core_rknd ), i=1, stats%ncol )] )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
756 : ret_code = nf90_put_var( stats%ncid, stats%param_varid, [( real( i, kind=core_rknd ), i=1, nparams )] )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1584 : stats%grid%gr_source, stats%grid%gr_target, stats%vars(i)%size, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1585 : real( stats%vars(i)%buffer, kind=core_rknd ), stats%vars(i)%out_size, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1586 : size( stats%grid%rho_lin_spline_vals, 2 ), stats%grid%rho_lin_spline_vals, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1741 : if ( allocated( stats%grid%rho_lin_spline_vals ) ) deallocate( stats%grid%rho_lin_spline_vals )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1742 : if ( allocated( stats%grid%rho_lin_spline_levels ) ) deallocate( stats%grid%rho_lin_spline_levels )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2156 : if ( stats%lookup%cache_len > 0 ) tmp(1:stats%lookup%cache_len) = stats%lookup%cache(1:stats%lookup%cache_len)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2190 : tmp(1:stats%lookup%reject_cache_len) = stats%lookup%reject_cache(1:stats%lookup%reject_cache_len)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2256 : write(date(32:33),'(i2.2)') nint( ( ( real( mod( nint( st_time ),3600 ),kind=time_precision ) / &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2414 : call add_expanded_def(base_def,"corr_chi_"//trim(hydromet_list(j)( 1:2 ))//"_1",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2415 : call add_expanded_def(base_def,"corr_chi_"//trim(hydromet_list(j)( 1:2 ))//"_2",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2422 : call add_expanded_def(base_def,"corr_eta_"//trim(hydromet_list(j)( 1:2 ))//"_1",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2423 : call add_expanded_def(base_def,"corr_eta_"//trim(hydromet_list(j)( 1:2 ))//"_2",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2430 : call add_expanded_def(base_def,"corr_Ncn_"//trim(hydromet_list(j)( 1:2 ))//"_1",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2431 : call add_expanded_def(base_def,"corr_Ncn_"//trim(hydromet_list(j)( 1:2 ))//"_2",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2438 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_1", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2442 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_2", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2448 : call add_expanded_def(base_def,"corr_w_"//trim(hydromet_list(j)( 1:2 ))//"_1_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2449 : call add_expanded_def(base_def,"corr_w_"//trim(hydromet_list(j)( 1:2 ))//"_2_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2456 : call add_expanded_def(base_def,"corr_chi_"//trim(hydromet_list(j)( 1:2 ))//"_1_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2457 : call add_expanded_def(base_def,"corr_chi_"//trim(hydromet_list(j)( 1:2 ))//"_2_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2464 : call add_expanded_def(base_def,"corr_eta_"//trim(hydromet_list(j)( 1:2 ))//"_1_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2465 : call add_expanded_def(base_def,"corr_eta_"//trim(hydromet_list(j)( 1:2 ))//"_2_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2472 : call add_expanded_def(base_def,"corr_Ncn_"//trim(hydromet_list(j)( 1:2 ))//"_1_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2473 : call add_expanded_def(base_def,"corr_Ncn_"//trim(hydromet_list(j)( 1:2 ))//"_2_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2480 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_1_n", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2484 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_2_n", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2521 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"p", &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/stats_netcdf.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 19 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/Benchmark_cases/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
127 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
128 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/bomex.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
91 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
92 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/dycoms2_rf01.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
121 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
122 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/dycoms2_rf02.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
152 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
153 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/gabls2.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
96 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
97 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
176 : wpthlp_sfc(i) = convert_sens_ht_to_km_s( ( 270._core_rknd * ft**1.5_core_rknd ), rho_sfc(i) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
177 : wprtp_sfc(i) = convert_latent_ht_to_m_s( ( 554._core_rknd * ft**1.3_core_rknd ), rho_sfc(i) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/lba.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
272 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
273 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/mpace_a.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
157 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
158 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/mpace_b.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
privateCheck failed: ../src/Benchmark_cases/prescribe_forcings.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
297 : !$acc enter data create( um_bot, vm_bot, rtm_bot, thlm_bot, rho_bot, exner_bot, z_bot, ustar, ubar )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
471 : !$acc update device( wm_zt, wm_zm, thlm_forcing, rtm_forcing, um_ref, vm_ref, sclrm_forcing, edsclrm_forcing )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
909 : !$acc exit data delete( um_bot, vm_bot, rtm_bot, thlm_bot, rho_bot, exner_bot, z_bot, ustar, ubar )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1112 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1116 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1120 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1121 : exner_zm(i,km1), exner_zm(i,k00), exner_zm(i,kp1), exner_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1124 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1125 : thlm_zm(i,km1), thlm_zm(i,k00), thlm_zm(i,kp1), thlm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1128 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1129 : rtm_zm(i,km1), rtm_zm(i,k00), rtm_zm(i,kp1), rtm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/prescribe_forcings.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
159 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
160 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/rico.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
104 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
105 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/wangara.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 11 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/KK_microphys/*.F90 || true
CLUBBStandardsCheck.pl has begun.
Bad Filename: ../src/KK_microphys/*.F90
CLUBBStandardsCheck.pl has finished.
FAIL: 1 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/SILHS/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Missing 'implicit none' statements. 'Implicit None' check FAILED!
CLUBBStandardsCheck.pl Add a line containing 'implicit none' to each program, module, subroutine, and function.
implicitCheck failed: ../src/SILHS/mt95.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 1 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/G_unit_test_types/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
privateCheck failed: ../src/G_unit_test_types/fill_holes_tests.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
162 : field_initial(i,k) = 10_core_rknd * ( sin( 8.0 * pi * ( k + i ) / nz ) + one ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
180 : if ( l_print_name ) print *, "filling holes of: easy_fill_test_"//trim(fill_type_names(fill_type))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
195 : write(*,'(A6,I5,1X,I5,A4,E30.20,A3,E30.20)') "field(", i, k, ") = ", field(i,k), " < ", threshold
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
241 : if ( l_print_name ) print *, "filling holes of: reverse_easy_fill_test_"//trim(fill_type_names(fill_type))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
344 : field_initial(i,k) = 10_core_rknd * ( sin( 8.0 * pi * ( k + i ) / nz ) + one ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
363 : if ( l_print_name ) print *, "filling holes of: below_thresh_test_"//trim(fill_type_names(fill_type))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
385 : print *, "-- error", two * abs( initial_mass - new_mass ) / ( initial_mass + new_mass )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
419 : if ( l_print_name ) print *, "filling holes of: reverse_below_thresh_test_"//trim(fill_type_names(fill_type))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
430 : print *, "ERROR in below_thresh_test REVERSE MODE: method was not conservative in grid reverse mode"
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/G_unit_test_types/fill_holes_tests.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
542 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/G_unit_test_types/pdf_parameter_tests.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
privateCheck failed: ../src/G_unit_test_types/rev_direction_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
233 : !seed used = -1102123834 1480475276 -248259584 525496705 1614213535 -1267052688 6290033 -78466652
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
234 : !seed_output = (/ -1102123834, 1480475276, -248259584, 525496705, 1614213535, -1267052688, 6290033, -78466652 /)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
750 : call xpyp_term_ta_pdf_lhs_godunov( gr_ascending%nzm, gr_ascending%nzt, 1, gr_ascending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
754 : call xpyp_term_ta_pdf_lhs_godunov( gr_descending%nzm, gr_descending%nzt, 1, gr_descending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
795 : call xpyp_term_ta_pdf_rhs_godunov( gr_ascending%nzm, gr_ascending%nzt, 1, gr_ascending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
801 : call xpyp_term_ta_pdf_rhs_godunov( gr_descending%nzm, gr_descending%nzt, 1, gr_descending, & ! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/G_unit_test_types/rev_direction_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
500 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/G_unit_test_types/spurious_source_test.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 6 check(s) failed.
......................................................................................................................................................................... Make.clubb_lapack is ready.
..................................................................... Make.clubb_param is ready.
......................... Make.clubb_bugsrad is ready.
... Make.microphys_utils is ready.
..... Make.clubb_parabolic is ready.
.............. Make.clubb_KK_microphys is ready.
................................................. Make.clubb_coamps is ready.
... Make.clubb_morrison is ready.
... Make.clubb_gfdlact is ready.
............. Make.silhs is ready.
........................................................................... Make.clubb_other is ready.
... Make.clubb_standalone is ready.
... Make.clubb_thread_test is ready.
............ Make.clubb_tuner is ready.
... Make.jacobian is ready.
.................. Make.G_unit_tests is ready.
... Make.int2txt is ready.
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_param
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_gfdlact
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../src/CLUBB_core/advance_clubb_core_module.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../src/CLUBB_core/clubb_api_module.F90
ar rv /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../lib/libclubb_param.a advance_xp2_xpyp_module.o turbulent_adv_pdf.o clubb_api_module.o index_mapping.o calendar.o sigma_sqd_w_module.o new_pdf.o diffusion.o new_pdf_main.o new_hybrid_pdf.o matrix_operations.o grid_class.o constants_clubb.o parameters_tunable.o calc_pressure.o new_hybrid_pdf_main.o endian.o hydromet_pdf_parameter_module.o advance_windm_edsclrm_module.o interpolation.o pdf_closure_module.o corr_varnce_module.o sponge_layer_damping.o calc_roots.o Skx_module.o advance_helper_module.o array_index.o clubb_precision.o advance_clubb_core_module.o Nc_Ncn_eqns.o pdf_utilities.o stats_netcdf.o adg1_adg2_3d_luhar_pdf.o pdf_parameter_module.o error_code.o advance_xm_wpxp_module.o matrix_solver_wrapper.o grid_adaptation_module.o LY93_pdf.o precipitation_fraction.o numerical_check.o pos_definite_module.o T_in_K_module.o new_tsdadg_pdf.o diagnose_correlations_module.o err_info_type_module.o mixing_length.o lapack_interfaces.o setup_clubb_pdf_params.o mean_adv.o lapack_wrap.o saturation.o parameter_indices.o sfc_varnce_module.o code_timer_module.o mono_flux_limiter.o penta_bicgstab_solver.o tridiag_lu_solver.o fill_holes.o advance_xp3_module.o clip_explicit.o advance_wp2_wp3_module.o remapping_module.o model_flags.o stats_clubb_utilities.o penta_lu_solver.o file_functions.o
r - advance_xp2_xpyp_module.o
r - turbulent_adv_pdf.o
r - clubb_api_module.o
r - index_mapping.o
r - calendar.o
r - sigma_sqd_w_module.o
r - new_pdf.o
r - diffusion.o
r - new_pdf_main.o
r - new_hybrid_pdf.o
r - matrix_operations.o
r - grid_class.o
r - constants_clubb.o
r - parameters_tunable.o
r - calc_pressure.o
r - new_hybrid_pdf_main.o
r - endian.o
r - hydromet_pdf_parameter_module.o
r - advance_windm_edsclrm_module.o
r - interpolation.o
r - pdf_closure_module.o
r - corr_varnce_module.o
r - sponge_layer_damping.o
r - calc_roots.o
r - Skx_module.o
r - advance_helper_module.o
r - array_index.o
r - clubb_precision.o
r - advance_clubb_core_module.o
r - Nc_Ncn_eqns.o
r - pdf_utilities.o
r - stats_netcdf.o
r - adg1_adg2_3d_luhar_pdf.o
r - pdf_parameter_module.o
r - error_code.o
r - advance_xm_wpxp_module.o
r - matrix_solver_wrapper.o
r - grid_adaptation_module.o
r - LY93_pdf.o
r - precipitation_fraction.o
r - numerical_check.o
r - pos_definite_module.o
r - T_in_K_module.o
r - new_tsdadg_pdf.o
r - diagnose_correlations_module.o
r - err_info_type_module.o
r - mixing_length.o
r - lapack_interfaces.o
r - setup_clubb_pdf_params.o
r - mean_adv.o
r - lapack_wrap.o
r - saturation.o
r - parameter_indices.o
r - sfc_varnce_module.o
r - code_timer_module.o
r - mono_flux_limiter.o
r - penta_bicgstab_solver.o
r - tridiag_lu_solver.o
r - fill_holes.o
r - advance_xp3_module.o
r - clip_explicit.o
r - advance_wp2_wp3_module.o
r - remapping_module.o
r - model_flags.o
r - stats_clubb_utilities.o
r - penta_lu_solver.o
r - file_functions.o
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_lapack
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_bugsrad
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.microphys_utils
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_parabolic
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_coamps
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_morrison
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_KK_microphys
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -c ../src/Microphys/Morrison_microphys/module_mp_graupel.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.silhs
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
ar rv /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../lib/libclubb_morrison.a module_mp_graupel.o
r - module_mp_graupel.o
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_other
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Microphys/microphys_init_cleanup.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/prescribe_forcings.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Radiation/radiation_module.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/generalized_grid_test.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Microphys/morrison_microphys_module.F90
../src/Microphys/morrison_microphys_module.F90:21:26:
21 | stats, icol, &
| 1
Warning: Unused dummy argument 'icol' at (1) [-Wunused-dummy-argument]
../src/Radiation/radiation_module.F90:509:55:
509 | lh_sample_point_weights, hydromet, stats, icol, &
| 1
Warning: Unused dummy argument 'stats' at (1) [-Wunused-dummy-argument]
../src/Microphys/morrison_microphys_module.F90:20:33:
20 | saturation_formula, &
| 1
Warning: Unused dummy argument 'saturation_formula' at (1) [-Wunused-dummy-argument]
../src/Microphys/morrison_microphys_module.F90:21:20:
21 | stats, icol, &
| 1
Warning: Unused dummy argument 'stats' at (1) [-Wunused-dummy-argument]
../src/Benchmark_cases/prescribe_forcings.F90:935:8:
935 | use clubb_precision, only: &
| 1
Warning: Unused parameter 'time_precision' which has been explicitly imported at (1) [-Wunused-parameter]
../src/Benchmark_cases/prescribe_forcings.F90:58:8:
58 | use constants_clubb, only: &
| 1
Warning: Unused parameter 'kappa' which has been explicitly imported at (1) [-Wunused-parameter]
../src/Benchmark_cases/prescribe_forcings.F90:58:8:
58 | use constants_clubb, only: &
| 1
Warning: Unused parameter 'p0' which has been explicitly imported at (1) [-Wunused-parameter]
../src/generalized_grid_test.F90:2416:8:
2416 | use constants_clubb, only: &
| 1
Warning: Unused parameter 'eps' which has been explicitly imported at (1) [-Wunused-parameter]
../src/generalized_grid_test.F90:698:29:
698 | i, sclr, edsclr, hm_idx
| 1
Warning: Unused variable 'hm_idx' declared at (1) [-Wunused-variable]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Microphys/microphys_driver.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/clubb_driver.F90
../src/clubb_driver.F90:354:13:
354 | rad_dummy ! Dummy variable for radiation levels
| 1
Warning: Unused PRIVATE module variable 'rad_dummy' declared at (1) [-Wunused-value]
../src/clubb_driver.F90:402:25:
402 | rho_ds_zm_dycore_init
| 1
Warning: Unused PRIVATE module variable 'rho_ds_zm_dycore_init' declared at (1) [-Wunused-value]
../src/clubb_driver.F90:4513:41:
4513 | grid_adapt_in_time_method, &
| 1
Warning: Unused dummy argument 'grid_adapt_in_time_method' at (1) [-Wunused-dummy-argument]
../src/clubb_driver.F90:4512:33:
4512 | l_add_dycore_grid, &
| 1
Warning: Unused dummy argument 'l_add_dycore_grid' at (1) [-Wunused-dummy-argument]
../src/clubb_driver.F90:3121:18:
3121 | l_stats_last
| 1
Warning: Unused variable 'l_stats_last' declared at (1) [-Wunused-variable]
../src/clubb_driver.F90:3141:14:
3141 | ret_code, &
| 1
Warning: Unused variable 'ret_code' declared at (1) [-Wunused-variable]
../src/clubb_driver.F90:2636:49:
2636 | subroutine set_case_initial_conditions(err_info)
| 1
Warning: Unused dummy argument 'err_info' at (1) [-Wunused-dummy-argument]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/error.F90
../src/error.F90:696:33:
696 | integer :: omp_get_thread_num
| 1
Warning: Unused variable 'omp_get_thread_num' declared at (1) [-Wunused-variable]
ar rv /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../lib/libclubb_other.a gabls3.o silhs_category_variance_module.o sounding.o microphys_init_cleanup.o input_grads.o parameters_microphys.o stat_file_module.o sfc_flux.o prescribe_forcings.o soil_vegetation.o atex_long.o radiation_module.o gabls2.o spec_hum_to_mixing_ratio.o hydrostatic_module.o cobra.o generalized_grid_test.o arm_0003.o input_names.o pdf_hydromet_microphys_wrapper.o dycoms2_rf02.o cos_solar_zen_module.o wangara.o ice_dfsn_module.o jun25.o coamps_microphys_driver_module.o input_interpret.o clex9_nov02.o quicksort.o corr_varnce_input_reader.o arm_97.o enhanced_simann.o rad_lwsw_module.o input_reader.o microphys_driver.o gfdl_activation.o extrapolation.o lh_microphys_driver_module.o atex.o arm_3year.o KK_microphys_module.o gabls3_night.o stat_file_utils.o diag_ustar_module.o mixed_moment_PDF_integrals.o fire.o mpace_b.o clex9_oct14.o morrison_microphys_module.o cloud_feedback.o nov11.o input_netcdf.o bugsrad_driver.o parameters_radiation.o estimate_scm_microphys_module.o cloud_sed_module.o dycoms2_rf01.o astex_a209.o error.o clubb_driver.o neutral_case.o simple_rad_module.o arm.o mpace_a.o bomex.o extended_atmosphere_module.o ekman.o advance_microphys_module.o time_dependent_input.o input_fields.o lba.o twp_ice.o rico.o
r - gabls3.o
r - silhs_category_variance_module.o
r - sounding.o
r - microphys_init_cleanup.o
r - input_grads.o
r - parameters_microphys.o
r - stat_file_module.o
r - sfc_flux.o
r - prescribe_forcings.o
r - soil_vegetation.o
r - atex_long.o
r - radiation_module.o
r - gabls2.o
r - spec_hum_to_mixing_ratio.o
r - hydrostatic_module.o
r - cobra.o
r - generalized_grid_test.o
r - arm_0003.o
r - input_names.o
r - pdf_hydromet_microphys_wrapper.o
r - dycoms2_rf02.o
r - cos_solar_zen_module.o
r - wangara.o
r - ice_dfsn_module.o
r - jun25.o
r - coamps_microphys_driver_module.o
r - input_interpret.o
r - clex9_nov02.o
r - quicksort.o
r - corr_varnce_input_reader.o
r - arm_97.o
r - enhanced_simann.o
r - rad_lwsw_module.o
r - input_reader.o
r - microphys_driver.o
r - gfdl_activation.o
r - extrapolation.o
r - lh_microphys_driver_module.o
r - atex.o
r - arm_3year.o
r - KK_microphys_module.o
r - gabls3_night.o
r - stat_file_utils.o
r - diag_ustar_module.o
r - mixed_moment_PDF_integrals.o
r - fire.o
r - mpace_b.o
r - clex9_oct14.o
r - morrison_microphys_module.o
r - cloud_feedback.o
r - nov11.o
r - input_netcdf.o
r - bugsrad_driver.o
r - parameters_radiation.o
r - estimate_scm_microphys_module.o
r - cloud_sed_module.o
r - dycoms2_rf01.o
r - astex_a209.o
r - error.o
r - clubb_driver.o
r - neutral_case.o
r - simple_rad_module.o
r - arm.o
r - mpace_a.o
r - bomex.o
r - extended_atmosphere_module.o
r - ekman.o
r - advance_microphys_module.o
r - time_dependent_input.o
r - input_fields.o
r - lba.o
r - twp_ice.o
r - rico.o
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_standalone
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_tuner
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.jacobian
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.G_unit_tests
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.int2txt
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/clubb_standalone.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/spurious_source_test.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -c ../src/clubb_tuner.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/jacobian.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Nothing to be done for 'all'.
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
cd /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../obj; make -f Make.clubb_thread_test
make[1]: Entering directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/clubb_thread_test.F90
../src/jacobian.F90:408:25:
408 | subroutine getvariables( varray, fname_zx )
| ^
Warning: 'getvariables' defined but not used [-Wunused-function]
gfortran clubb_standalone.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../bin/clubb_standalone -L/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/lib -lnetcdff
gfortran clubb_thread_test.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../bin/clubb_thread_test -L/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/lib -lnetcdff
../src/jacobian.F90:216:29:
216 | stat=alloc_stat )
| ^
Warning: 'nzt' may be used uninitialized [-Wmaybe-uninitialized]
../src/jacobian.F90:122:7:
122 | nzt, & ! Thermo grid levels
| ^
note: 'nzt' was declared here
../src/jacobian.F90:123:7:
123 | nzm, & ! Momentum grid levels
| ^
Warning: 'nzm' may be used uninitialized [-Wmaybe-uninitialized]
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/rev_direction_grid_test.F90
gfortran jacobian.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../bin/jacobian -L/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/lib -lnetcdff
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran ran1_s.o ran1_v.o nr.o nrtype.o clubb_tuner.o amebsa.o nrutil.o amoeba.o ran_state.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../bin/clubb_tuner -L/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/lib -lnetcdff
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/include/ -march=native -msse3 -mfpmath=sse -fopenmp -fno-range-check -mieee-fp -fall-intrinsics -std=gnu -fallow-argument-mismatch -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_tests.F90
gfortran tuner_tests.o hole_filling_tests.o spurious_source_test.o fill_holes_tests.o Nc_Ncn_test.o KK_integrals_tests.o pdf_parameter_tests.o rev_direction_grid_test.o smooth_heaviside_tests.o read_corr_mtx_test.o mu_sigma_hm_tests.o silhs_category_test.o smooth_min_max_tests.o G_unit_tests.o w_up_in_cloud_tests.o corr_cholesky_mtx_tests.o -o /home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../bin/G_unit_tests -L/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/spack/opt/spack/linux-pop22-skylake_avx512/gcc-13.1.0/netcdf-fortran-4.5.3-zcsi7k5jxdw7dz5ufpdkyk6ovim7ebwe/lib -lnetcdff
make[1]: Leaving directory '/home/jenkins/workspace/clubb_error_handling_gfortran_test_branch/obj'
python ../utilities/check_for_missing_threadprivate.py ../src/CLUBB_core/ ../src/SILHS/ || true
check_for_missing_threadprivate.py has begun.
File ../src/CLUBB_core/sponge_layer_damping.F90 failed:
Missing threadprivate for:
wp2_sponge_damp_profile
wp3_sponge_damp_profile
up2_vp2_sponge_damp_settings
thlm_sponge_damp_profile
rtm_sponge_damp_settings
wp3_sponge_damp_settings
thlm_sponge_damp_settings
rtm_sponge_damp_profile
up2_vp2_sponge_damp_profile
uv_sponge_damp_settings
uv_sponge_damp_profile
wp2_sponge_damp_settings
File ../src/CLUBB_core/fill_holes.F90 failed:
Missing threadprivate for:
ret_code
File ../src/CLUBB_core/error_code.F90 failed:
Missing threadprivate for:
clubb_debug_level
File ../src/CLUBB_core/corr_varnce_module.F90 failed:
Missing threadprivate for:
corr_array_n_cloud_def
corr_array_n_below_def
[91mcheck_for_missing_threadprivate.py did not pass.[0m
[91mfailedFiles = ['../src/CLUBB_core/sponge_layer_damping.F90', '../src/CLUBB_core/fill_holes.F90', '../src/CLUBB_core/error_code.F90', '../src/CLUBB_core/corr_varnce_module.F90'][0m
perl ../utilities/CLUBBStandardsCheck.pl ../src/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: 'use' statement w/o 'only' found in the following line:
3102 : use gptl
CLUBBStandardsCheck.pl WARNING: Use check FAILED!
CLUBBStandardsCheck.pl WARNING: Check that comma is on same line as 'use', as CLUBB requires.
useCheck failed: ../src/clubb_driver.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
199 : l_modify_ic_with_cubic_int, & ! Flag for interpolating the sounding profile with Steffen's monotone cubic
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
200 : ! method to obtain smoother initial condition profile, which is found to be
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
201 : ! beneficial to achive a better numerical solution convergence. If this flag
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
202 : ! is turned off, the initial conditions will be generated with linear interpolation.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
203 : ! This is done on a case-by-case basis, since using the monotone cubic method
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
204 : ! requires a special sounding.in file with many additional sounding levels.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
205 : l_modify_bc_for_cnvg_test, & ! Flag to activate modifications on boundary condition for convergence test
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
737 : !$omp sens_ht, latent_ht, lmin, vert_decorr_coef, deep_soil_T_in_K, sfc_soil_T_in_K, veg_T_in_K, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
744 : !$omp exner, rtm, thlm, rcm, wp3, wp3_zm, delta_zm, p_in_Pa, cloud_frac, wpthvp, wp2thvp, wp2up, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
753 : !$omp rtp2_mc, thlp2_mc, rtpthlp_mc, Ncm_mc, Ncm, Nccnm, em, tau_zm, tau_zt, Kh_zt, Kh_zm, rfrzm, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
754 : !$omp rrm, Nrm, Nc_in_cloud, wpNcp, radht, Frad, Frad_SW_up, Frad_LW_up, Frad_SW_down, Frad_LW_down, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
755 : !$omp wpsclrp_sfc, wpedsclrp_sfc, sclrm, wpsclrp, sclrp2, sclrp3, sclrprtp, sclrpthlp, sclrpthvp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1015 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1744 : open(unit=iunit_grid_adaptation, file=fname_grid_adaptation, status='replace', action='write')
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2059 : allocate( um_ref(ngrdcol, gr%nzt) ) ! Reference u wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2060 : allocate( vm_ref(ngrdcol, gr%nzt) ) ! Reference v wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2497 : if ( clubb_config_flags%iiPDF_type == iiPDF_new .or. clubb_config_flags%iiPDF_type == iiPDF_new_hybrid ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2528 : ! Similar call to above, checking parameter values, but because we've placed this in "init_clubb_case"
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2536 : write(fstderr, *) "Fatal error calling check_clubb_settings_api and/or check_parameters_api in clubb_driver"
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2579 : !$acc rcm_in_layer, cloud_cover, wprcp, w_up_in_cloud, w_down_in_cloud, cloudy_updraft_frac, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2591 : !$acc pdf_params%corr_w_thl_2, pdf_params%corr_rt_thl_1, pdf_params%corr_rt_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2592 : !$acc pdf_params%alpha_thl, pdf_params%alpha_rt, pdf_params%crt_1, pdf_params%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2595 : !$acc pdf_params%stdev_eta_2, pdf_params%covar_chi_eta_1, pdf_params%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2597 : !$acc pdf_params%corr_w_eta_2, pdf_params%corr_chi_eta_1, pdf_params%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2603 : !$acc pdf_params_zm%thl_2, pdf_params_zm%varnce_thl_1, pdf_params_zm%varnce_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2604 : !$acc pdf_params_zm%corr_w_rt_1, pdf_params_zm%corr_w_rt_2, pdf_params_zm%corr_w_thl_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2605 : !$acc pdf_params_zm%corr_w_thl_2, pdf_params_zm%corr_rt_thl_1, pdf_params_zm%corr_rt_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2606 : !$acc pdf_params_zm%alpha_thl, pdf_params_zm%alpha_rt, pdf_params_zm%crt_1, pdf_params_zm%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2607 : !$acc pdf_params_zm%cthl_1, pdf_params_zm%cthl_2, pdf_params_zm%chi_1, pdf_params_zm%chi_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2608 : !$acc pdf_params_zm%stdev_chi_1, pdf_params_zm%stdev_chi_2, pdf_params_zm%stdev_eta_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2609 : !$acc pdf_params_zm%stdev_eta_2, pdf_params_zm%covar_chi_eta_1, pdf_params_zm%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2610 : !$acc pdf_params_zm%corr_w_chi_1, pdf_params_zm%corr_w_chi_2, pdf_params_zm%corr_w_eta_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2611 : !$acc pdf_params_zm%corr_w_eta_2, pdf_params_zm%corr_chi_eta_1, pdf_params_zm%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2612 : !$acc pdf_params_zm%rsatl_1, pdf_params_zm%rsatl_2, pdf_params_zm%rc_1, pdf_params_zm%rc_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2721 : invrs_rho_ds_zt(i,k) = invrs_rho_ds_zt_init(k) ! inv. dry, static density: t-levs
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2727 : um_pert(i,k) = zero ! Variables used to track perturbed version of winds.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2729 : wm_zt(i,k) = wm_zt_init(k) ! Imposed large scale w - Thermodynamic levels
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2923 : if ( clubb_config_flags%iiPDF_type == iiPDF_new .or. clubb_config_flags%iiPDF_type == iiPDF_new_hybrid ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3114 : !----------------------------------- Optional Input Variables -----------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3268 : um(i,:), vm(i,:), rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3601 : !$acc X_nl_all_levs, X_mixt_comp_all_levs, lh_sample_point_weights, mu_x_1_n, mu_x_2_n, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3603 : !$acc lh_rt_clipped, lh_thl_clipped, lh_rc_clipped, lh_rv_clipped, lh_Nc_clipped, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3607 : !$acc pdf_params%cloud_frac_1, pdf_params%cloud_frac_2, pdf_params%cthl_1, pdf_params%cthl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3608 : !$acc pdf_params%crt_1, pdf_params%crt_2, pdf_params%stdev_chi_1, pdf_params%stdev_chi_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3624 : wp2_zt = zm2zt_api( gr%nzm, gr%nzt, ngrdcol, gr, wp2, w_tol_sqd ) ! Positive definite quantity
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3630 : thlm(i,:), p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), rtm(i,:), &! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3631 : rcm(i,:), cloud_frac(i,:), wm_zt(i,:), wm_zm(i,:), wp2_zt(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3632 : hydromet(i,:,:), Nc_in_cloud(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3649 : Nccnm(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3650 : hydromet_mc(i,:,:), Ncm_mc(i,:), rcm_mc(i,:), rvm_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3651 : thlm_mc(i,:), hydromet_vel_zt(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3652 : hydromet_vel_covar_zt_impc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3653 : hydromet_vel_covar_zt_expc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3654 : wprtp_mc(i,:), wpthlp_mc(i,:), rtp2_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3655 : thlp2_mc(i,:), rtpthlp_mc(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3679 : stats, i, & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3680 : hydromet(i,:,:), hydromet_vel_zt(i,:,:), hydrometp2(i,:,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3681 : K_hm(i,:,:), Ncm(i,:), Nc_in_cloud(i,:), rvm_mc(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3682 : thlm_mc(i,:), err_info, & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3683 : wphydrometp(i,:,:), wpNcp(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3692 : !$acc update device( rcm_mc, rvm_mc, thlm_mc, wprtp_mc, wpthlp_mc, rtp2_mc, thlp2_mc, rtpthlp_mc )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3745 : !$acc update host( rvm_mc, rcm_mc, thlm_mc, wprtp_mc, wpthlp_mc, rtp2_mc, thlp2_mc, rtpthlp_mc )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3770 : !$acc update host( rho, rho_zm, p_in_Pa, exner, cloud_frac, ice_supersat_frac, X_nl_all_levs, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3796 : !$acc update host( rho, rho_zm, p_in_Pa, exner, cloud_frac, ice_supersat_frac, thlm, rtm, rcm )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3897 : call stats_update( "brunt_term_time_avg", richardson_num_term_weight*richardson_num_term_time_avg, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3923 : .and. stats%l_last_sample ) then ! only adapt grid when the average of the last
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4051 : write(unit=fstdout, fmt='(a,f10.4)') 'CLUBB-TIMER time_microphys_scheme = ', time_microphys_scheme
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4052 : write(unit=fstdout, fmt='(a,f10.4)') 'CLUBB-TIMER time_microphys_advance = ', time_microphys_advance
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4171 : !$acc rcm_in_layer, cloud_cover, wprcp, w_up_in_cloud, w_down_in_cloud, cloudy_updraft_frac, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4183 : !$acc pdf_params%corr_w_thl_2, pdf_params%corr_rt_thl_1, pdf_params%corr_rt_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4184 : !$acc pdf_params%alpha_thl, pdf_params%alpha_rt, pdf_params%crt_1, pdf_params%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4187 : !$acc pdf_params%stdev_eta_2, pdf_params%covar_chi_eta_1, pdf_params%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4189 : !$acc pdf_params%corr_w_eta_2, pdf_params%corr_chi_eta_1, pdf_params%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4195 : !$acc pdf_params_zm%thl_2, pdf_params_zm%varnce_thl_1, pdf_params_zm%varnce_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4196 : !$acc pdf_params_zm%corr_w_rt_1, pdf_params_zm%corr_w_rt_2, pdf_params_zm%corr_w_thl_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4197 : !$acc pdf_params_zm%corr_w_thl_2, pdf_params_zm%corr_rt_thl_1, pdf_params_zm%corr_rt_thl_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4198 : !$acc pdf_params_zm%alpha_thl, pdf_params_zm%alpha_rt, pdf_params_zm%crt_1, pdf_params_zm%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4199 : !$acc pdf_params_zm%cthl_1, pdf_params_zm%cthl_2, pdf_params_zm%chi_1, pdf_params_zm%chi_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4200 : !$acc pdf_params_zm%stdev_chi_1, pdf_params_zm%stdev_chi_2, pdf_params_zm%stdev_eta_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4201 : !$acc pdf_params_zm%stdev_eta_2, pdf_params_zm%covar_chi_eta_1, pdf_params_zm%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4202 : !$acc pdf_params_zm%corr_w_chi_1, pdf_params_zm%corr_w_chi_2, pdf_params_zm%corr_w_eta_1, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4203 : !$acc pdf_params_zm%corr_w_eta_2, pdf_params_zm%corr_chi_eta_1, pdf_params_zm%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4204 : !$acc pdf_params_zm%rsatl_1, pdf_params_zm%rsatl_2, pdf_params_zm%rc_1, pdf_params_zm%rc_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4226 : if ( thlm_sponge_damp_settings%l_sponge_damping ) call finalize_tau_sponge_damp_api( thlm_sponge_damp_profile )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4227 : if ( rtm_sponge_damp_settings%l_sponge_damping ) call finalize_tau_sponge_damp_api( rtm_sponge_damp_profile )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4228 : if ( uv_sponge_damp_settings%l_sponge_damping ) call finalize_tau_sponge_damp_api( uv_sponge_damp_profile )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4229 : if ( wp2_sponge_damp_settings%l_sponge_damping ) call finalize_tau_sponge_damp_api( wp2_sponge_damp_profile )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4230 : if ( wp3_sponge_damp_settings%l_sponge_damping ) call finalize_tau_sponge_damp_api( wp3_sponge_damp_profile )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4231 : if ( up2_vp2_sponge_damp_settings%l_sponge_damping ) call finalize_tau_sponge_damp_api( up2_vp2_sponge_damp_profile )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4918 : clubb_config_flags%l_add_dycore_grid, clubb_config_flags%grid_adapt_in_time_method )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4926 : clubb_config_flags%l_add_dycore_grid, clubb_config_flags%grid_adapt_in_time_method )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4940 : 'be used for cases with forcings from an input file and for the atex ', &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/clubb_driver.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
70 : write(fstderr, *) "This section ensures that everything allocated in init_clubb_case will be deallocated"
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
71 : write(fstderr, *) "in clean_up_clubb. This may cause a runtime error if there is a mismatch between"
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/clubb_driver_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
654 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/clubb_tuner.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Expected read_random_seed for end function.
CLUBBStandardsCheck.pl WARNING: Endings of either program, module, subroutine, or function blocks to not match the beginning
endCheck failed: ../src/error.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
privateCheck failed: ../src/generalized_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
901 : if ( clubb_config_flags%iiPDF_type == iiPDF_new .or. clubb_config_flags%iiPDF_type == iiPDF_new_hybrid ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1065 : rtm_ref_flip, thlm_ref_flip, um_ref_flip, vm_ref_flip, ug_flip, vg_flip, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1078 : um_flip, vm_flip, upwp_flip, vpwp_flip, up2_flip, vp2_flip, up3_flip, vp3_flip, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1080 : wp2_flip, wp3_flip, rtp2_flip, rtp3_flip, thlp2_flip, thlp3_flip, rtpthlp_flip, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1086 : wp2rtp_flip, wp2thlp_flip, uprcp_flip, vprcp_flip, rc_coef_zm_flip, wp4_flip, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1087 : wpup2_flip, wpvp2_flip, wp2up2_flip, wp2vp2_flip, ice_supersat_frac_flip, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1574 : if ( clubb_config_flags%iiPDF_type == iiPDF_new .or. clubb_config_flags%iiPDF_type == iiPDF_new_hybrid ) then
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1601 : pdf_implicit_coefs_terms_flip%coef_wp2up_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1605 : pdf_implicit_coefs_terms_flip%term_wp2up_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1609 : pdf_implicit_coefs_terms_flip%coef_wp2vp_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1613 : pdf_implicit_coefs_terms_flip%term_wp2vp_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1647 : pdf_implicit_coefs_terms_flip%coef_wpup2_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1651 : pdf_implicit_coefs_terms_flip%term_wpup2_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1655 : pdf_implicit_coefs_terms_flip%coef_wpvp2_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1659 : pdf_implicit_coefs_terms_flip%term_wpvp2_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2463 : tolerance = max( 1.e-8_core_rknd, epsilon(tolerance) ) ! max statement for single precision runs
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/generalized_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
377 : um(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
379 : vm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
381 : ugm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
383 : vgm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
385 : thlm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
387 : rtm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
389 : press(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
392 : wm(i,k) = mono_cubic_interp( gr%zt(i,k), km1, k00, kp1, kp2, z(km1), z(k00), z(kp1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
409 : edsclr_snd(km1,edsclr), edsclr_snd(k00,edsclr), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
410 : edsclr_snd(kp1,edsclr), edsclr_snd(kp2,edsclr) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
434 : um(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), u(k_above), u(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
435 : vm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), v(k_above), v(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
436 : ugm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), ug(k_above), ug(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
437 : vgm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), vg(k_above), vg(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
438 : thlm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), theta(k_above), theta(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
439 : rtm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), rt(k_above), rt(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
440 : press(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), p_in_Pa(k_above), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
442 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
446 : sclrm(i,k,sclr) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
452 : edsclrm(i,k,edsclr) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
481 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
507 : wm(i,k) = lin_interpolate_two_points( gr%zt(i,k), z(k_above), z(k_above-1), subs(k_above), subs(k_above-1) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/sounding.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 8 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/CLUBB_core/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1868 : stats, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_clubb_core_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
492 : stats ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
500 : stats ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
952 : call windm_edsclrm_rhs( nzm, nzt, ngrdcol, gr, windm_edsclrm_scalar, dt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
953 : lhs_diff, edsclrm(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
954 : edsclrm_forcing(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
955 : rho_ds_zm, invrs_rho_ds_zt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
956 : l_imp_sfc_momentum_flux, wpedsclrp(:,gr%k_lb_zm,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
957 : stats, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
958 : rhs(:,:,edsclr) ) ! intent(out)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_windm_edsclrm_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
925 : stats, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1712 : stats_tmp_zt(i,k) = - gamma_over_implicit_ts * wp3_term_ta_lhs_result(5,i,k) * wp3(i,k-1) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1713 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(4,i,k) * wp2(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1714 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(3,i,k) * wp3(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1715 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(2,i,k) * wp2(i,k+1) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1716 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(1,i,k) * wp3(i,k+1)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_wp2_wp3_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
777 : call wpxp_term_pr1_lhs( nzm, ngrdcol, gr, C6rt_Skw_fnc, C6thl_Skw_fnc, C7_Skw_fnc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
778 : invrs_tau_C6_zm, l_scalar_calc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
779 : lhs_pr1_wprtp, lhs_pr1_wpthlp, lhs_pr1_wpsclrp ) ! Intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
852 : stats, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
853 : rtm, wprtp, thlm, wpthlp, sclrm, wpsclrp, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
854 : err_info ) ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
894 : stats, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4833 : tmp_zm_stats(i,k) = (-gamma_over_implicit_ts*lhs_ta_wpxp(2+gr%grid_dir_indx,i,k)) * wpxp(i,km1) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4835 : + (-gamma_over_implicit_ts*lhs_ta_wpxp(2-gr%grid_dir_indx,i,k)) * wpxp(i,kp1)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_xm_wpxp_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1310 : sclrprtp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1343 : sclrpthlp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3011 : stats_tmp(i,k) = (-gamma_over_implicit_ts * lhs_ta(2+gr%grid_dir_indx,i,k)) * xapxbp(i,km1) &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/advance_xp2_xpyp_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2410 : ! calc_derrived_params_api - Adjusts values of background eddy diffusivity based on vertical grid spacing
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2477 : ! calc_derrived_params_api - Adjusts values of background eddy diffusivity based on vertical grid spacing
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/clubb_api_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
privateCheck failed: ../src/CLUBB_core/err_info_type_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
265 : write(err_info%err_header_global,'(A38, I3, A15, I3, A, A28, A33, F6.2, A1, F6.2, A, A39, A40)') &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
276 : write(err_info%err_header(i),'(A38, I3, A15, I3, A, A22, I2, A11, F6.2, A13, F6.2, A, A39, A40)') &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/err_info_type_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
234 : write(*,'(A6,I5,1X,I5,A4,E30.20,A3,E30.20)') "field(", i, k, ") = ", field(i,k), " < ", threshold
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
240 : write(fstderr, *) "column", i, " field average = ", sum(field(i,:) * rho_ds(i,:) * dz(i,:)) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
584 : ! rho_ds_dz(i,k-num_hf_draw_points:k+num_hf_draw_points))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
823 : * min( threshold, field(i,k_start:k_end:grid_dir_indx) ) ) * invrs_denom
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
828 : + mass_fraction * ( min( threshold, field(i,k_start:k_end:grid_dir_indx) ) - threshold )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
833 : * max( threshold, field(i,k_start:k_end:grid_dir_indx) ) ) * invrs_denom
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
840 : + mass_fraction * ( max( threshold, field(i,k_start:k_end:grid_dir_indx) ) - threshold )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/fill_holes.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
295 : write(fstderr, *) "The fixed minimum grid density momentum heights need to cover at least the domain of the physics grid."
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/grid_adaptation_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
315 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
541 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
845 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/model_flags.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
698 : !$acc parallel loop gang vector collapse(2) default(present) reduction(.or.:l_any_adjustment_needed)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
849 : ! MONOFLUX TEST COMMENT DO NOT REMOVE if( any(wpxp_net_adjust /= 0.0) ) write(fstderr,*) "MONOFLUX: wpxp adjusted "
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/mono_flux_limiter.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
839 : / sqrt( 4.0_core_rknd * ( 1.0_core_rknd - 0.4_core_rknd )**3 &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
840 : + clubb_params(ngrdcol,iSkw_max_mag)**2 ) ) ) ! Known magic number
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
902 : mult_factor_zt(i) = 1.0_core_rknd + clubb_params(i,imult_coef) * log( avg_deltaz(i) / grid_spacing_thresh )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
917 : nu_vert_res_dep%nu10(i) = clubb_params(i,inu10) * mult_factor_zt(i) !We're unsure of the grid
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/parameters_tunable.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
295 : !$acc pdf_params%alpha_thl, pdf_params%alpha_rt, pdf_params%crt_1, pdf_params%crt_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
298 : !$acc pdf_params%stdev_eta_2, pdf_params%covar_chi_eta_1, pdf_params%covar_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
300 : !$acc pdf_params%corr_w_eta_2, pdf_params%corr_chi_eta_1, pdf_params%corr_chi_eta_2, &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/pdf_parameter_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
419 : ! It's interesting to see how close E_inv is to the lhs diagonal, it's usually (visually) very close, but
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
420 : ! using it instead of E_inv requires so many more iterations (use it would be jacobi preconditioner)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/penta_bicgstab_solver.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
722 : call sfc_varnce_check( sclr_dim, wp2(i,gr%k_lb_zm), up2(i,gr%k_lb_zm), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
723 : vp2(i,gr%k_lb_zm), thlp2(i,gr%k_lb_zm), rtp2(i,gr%k_lb_zm), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
724 : rtpthlp(i,gr%k_lb_zm), sclrp2(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
725 : sclrprtp(i,gr%k_lb_zm,:), sclrpthlp(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
726 : err_info ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/sfc_varnce_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
129 : wp2_zt, thlp2_zt, wpthlp_zt, wprtp_zt, rtp2_zt, rtpthlp_zt, up2_zt, vp2_zt, upwp_zt, vpwp_zt, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
130 : wpup2, wpvp2, a3_coef_zt, wp3_on_wp2_zt, w_up_in_cloud, w_down_in_cloud, cloudy_updraft_frac, &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/stats_clubb_utilities.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Missing 'implicit none' statements. 'Implicit None' check FAILED!
CLUBBStandardsCheck.pl Add a line containing 'implicit none' to each program, module, subroutine, and function.
implicitCheck failed: ../src/CLUBB_core/stats_netcdf.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
134 : real(kind=stat_rknd), allocatable, dimension(:,:) :: buffer ! (col, height); height=1 for rank-1 vars
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
179 : logical :: l_last_sample = .false. ! True if we want to output at the end of this sample
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
180 : logical :: l_different_output_grid = .false. ! True if we need to remap the variables before output
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
181 : logical :: l_output_rad_files = .false. ! True if we want to output radiation grid variables
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
435 : if ( allocated( stats%grid%rho_lin_spline_vals ) ) deallocate( stats%grid%rho_lin_spline_vals )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
436 : if ( allocated( stats%grid%rho_lin_spline_levels ) ) deallocate( stats%grid%rho_lin_spline_levels )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
581 : ret_code = nf90_def_var( stats%ncid, "time", NF90_DOUBLE, (/ stats%time_dimid /), stats%time_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
586 : ret_code = nf90_def_var( stats%ncid, "col", NF90_DOUBLE, (/ stats%col_dimid /), stats%col_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
606 : ret_code = nf90_def_var( stats%ncid, "lh_zt", NF90_DOUBLE, (/ stats%lh_2d%lh_zt_dimid /), stats%lh_2d%lh_zt_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
613 : ret_code = nf90_def_var( stats%ncid, "rad_zt", NF90_DOUBLE, (/ stats%rad_zt_dimid /), stats%rad_zt_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
617 : ret_code = nf90_def_var( stats%ncid, "rad_zm", NF90_DOUBLE, (/ stats%rad_zm_dimid /), stats%rad_zm_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
624 : ret_code = nf90_def_var( stats%ncid, "param", NF90_DOUBLE, (/ stats%param_dimid /), stats%param_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
632 : (/ stats%param_strlen_dimid, stats%param_dimid /), stats%param_name_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
722 : ret_code = nf90_put_att( stats%ncid, stats%vars(i)%varid, "long_name", trim( stats%vars(i)%long_name ) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
723 : ret_code = nf90_put_att( stats%ncid, stats%vars(i)%varid, "units", trim( stats%vars(i)%units ) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
736 : ret_code = nf90_put_var( stats%ncid, stats%col_varid, [( real( i, kind=core_rknd ), i=1, stats%ncol )] )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
756 : ret_code = nf90_put_var( stats%ncid, stats%param_varid, [( real( i, kind=core_rknd ), i=1, nparams )] )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1584 : stats%grid%gr_source, stats%grid%gr_target, stats%vars(i)%size, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1585 : real( stats%vars(i)%buffer, kind=core_rknd ), stats%vars(i)%out_size, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1586 : size( stats%grid%rho_lin_spline_vals, 2 ), stats%grid%rho_lin_spline_vals, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1741 : if ( allocated( stats%grid%rho_lin_spline_vals ) ) deallocate( stats%grid%rho_lin_spline_vals )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1742 : if ( allocated( stats%grid%rho_lin_spline_levels ) ) deallocate( stats%grid%rho_lin_spline_levels )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2156 : if ( stats%lookup%cache_len > 0 ) tmp(1:stats%lookup%cache_len) = stats%lookup%cache(1:stats%lookup%cache_len)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2190 : tmp(1:stats%lookup%reject_cache_len) = stats%lookup%reject_cache(1:stats%lookup%reject_cache_len)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2256 : write(date(32:33),'(i2.2)') nint( ( ( real( mod( nint( st_time ),3600 ),kind=time_precision ) / &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2414 : call add_expanded_def(base_def,"corr_chi_"//trim(hydromet_list(j)( 1:2 ))//"_1",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2415 : call add_expanded_def(base_def,"corr_chi_"//trim(hydromet_list(j)( 1:2 ))//"_2",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2422 : call add_expanded_def(base_def,"corr_eta_"//trim(hydromet_list(j)( 1:2 ))//"_1",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2423 : call add_expanded_def(base_def,"corr_eta_"//trim(hydromet_list(j)( 1:2 ))//"_2",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2430 : call add_expanded_def(base_def,"corr_Ncn_"//trim(hydromet_list(j)( 1:2 ))//"_1",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2431 : call add_expanded_def(base_def,"corr_Ncn_"//trim(hydromet_list(j)( 1:2 ))//"_2",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2438 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_1", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2442 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_2", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2448 : call add_expanded_def(base_def,"corr_w_"//trim(hydromet_list(j)( 1:2 ))//"_1_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2449 : call add_expanded_def(base_def,"corr_w_"//trim(hydromet_list(j)( 1:2 ))//"_2_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2456 : call add_expanded_def(base_def,"corr_chi_"//trim(hydromet_list(j)( 1:2 ))//"_1_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2457 : call add_expanded_def(base_def,"corr_chi_"//trim(hydromet_list(j)( 1:2 ))//"_2_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2464 : call add_expanded_def(base_def,"corr_eta_"//trim(hydromet_list(j)( 1:2 ))//"_1_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2465 : call add_expanded_def(base_def,"corr_eta_"//trim(hydromet_list(j)( 1:2 ))//"_2_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2472 : call add_expanded_def(base_def,"corr_Ncn_"//trim(hydromet_list(j)( 1:2 ))//"_1_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2473 : call add_expanded_def(base_def,"corr_Ncn_"//trim(hydromet_list(j)( 1:2 ))//"_2_n",out_defs,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2480 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_1_n", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2484 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_2_n", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2521 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"p", &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/stats_netcdf.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 19 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/Benchmark_cases/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
127 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
128 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/bomex.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
91 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
92 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/dycoms2_rf01.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
121 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
122 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/dycoms2_rf02.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
152 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
153 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/gabls2.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
96 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
97 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
176 : wpthlp_sfc(i) = convert_sens_ht_to_km_s( ( 270._core_rknd * ft**1.5_core_rknd ), rho_sfc(i) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
177 : wprtp_sfc(i) = convert_latent_ht_to_m_s( ( 554._core_rknd * ft**1.3_core_rknd ), rho_sfc(i) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/lba.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
272 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
273 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/mpace_a.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
157 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
158 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/mpace_b.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
privateCheck failed: ../src/Benchmark_cases/prescribe_forcings.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
297 : !$acc enter data create( um_bot, vm_bot, rtm_bot, thlm_bot, rho_bot, exner_bot, z_bot, ustar, ubar )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
471 : !$acc update device( wm_zt, wm_zm, thlm_forcing, rtm_forcing, um_ref, vm_ref, sclrm_forcing, edsclrm_forcing )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
909 : !$acc exit data delete( um_bot, vm_bot, rtm_bot, thlm_bot, rho_bot, exner_bot, z_bot, ustar, ubar )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1112 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1116 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1120 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1121 : exner_zm(i,km1), exner_zm(i,k00), exner_zm(i,kp1), exner_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1124 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1125 : thlm_zm(i,km1), thlm_zm(i,k00), thlm_zm(i,kp1), thlm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1128 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1129 : rtm_zm(i,km1), rtm_zm(i,k00), rtm_zm(i,kp1), rtm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/prescribe_forcings.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
159 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
160 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/rico.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
104 : if ( sclr_idx%iiedsclr_thl > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_thl) = thlm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
105 : if ( sclr_idx%iiedsclr_rt > 0 ) edsclrm_forcing(i,k,sclr_idx%iiedsclr_rt) = rtm_forcing(i,k)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/Benchmark_cases/wangara.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 11 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/KK_microphys/*.F90 || true
CLUBBStandardsCheck.pl has begun.
Bad Filename: ../src/KK_microphys/*.F90
CLUBBStandardsCheck.pl has finished.
FAIL: 1 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/SILHS/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Missing 'implicit none' statements. 'Implicit None' check FAILED!
CLUBBStandardsCheck.pl Add a line containing 'implicit none' to each program, module, subroutine, and function.
implicitCheck failed: ../src/SILHS/mt95.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 1 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/G_unit_test_types/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
privateCheck failed: ../src/G_unit_test_types/fill_holes_tests.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
162 : field_initial(i,k) = 10_core_rknd * ( sin( 8.0 * pi * ( k + i ) / nz ) + one ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
180 : if ( l_print_name ) print *, "filling holes of: easy_fill_test_"//trim(fill_type_names(fill_type))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
195 : write(*,'(A6,I5,1X,I5,A4,E30.20,A3,E30.20)') "field(", i, k, ") = ", field(i,k), " < ", threshold
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
241 : if ( l_print_name ) print *, "filling holes of: reverse_easy_fill_test_"//trim(fill_type_names(fill_type))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
344 : field_initial(i,k) = 10_core_rknd * ( sin( 8.0 * pi * ( k + i ) / nz ) + one ) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
363 : if ( l_print_name ) print *, "filling holes of: below_thresh_test_"//trim(fill_type_names(fill_type))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
385 : print *, "-- error", two * abs( initial_mass - new_mass ) / ( initial_mass + new_mass )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
419 : if ( l_print_name ) print *, "filling holes of: reverse_below_thresh_test_"//trim(fill_type_names(fill_type))
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
430 : print *, "ERROR in below_thresh_test REVERSE MODE: method was not conservative in grid reverse mode"
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/G_unit_test_types/fill_holes_tests.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
542 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/G_unit_test_types/pdf_parameter_tests.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules.
CLUBBStandardsCheck.pl WARNING: Private Test failed!
privateCheck failed: ../src/G_unit_test_types/rev_direction_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
233 : !seed used = -1102123834 1480475276 -248259584 525496705 1614213535 -1267052688 6290033 -78466652
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
234 : !seed_output = (/ -1102123834, 1480475276, -248259584, 525496705, 1614213535, -1267052688, 6290033, -78466652 /)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
750 : call xpyp_term_ta_pdf_lhs_godunov( gr_ascending%nzm, gr_ascending%nzt, 1, gr_ascending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
754 : call xpyp_term_ta_pdf_lhs_godunov( gr_descending%nzm, gr_descending%nzt, 1, gr_descending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
795 : call xpyp_term_ta_pdf_rhs_godunov( gr_ascending%nzm, gr_ascending%nzt, 1, gr_ascending, & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
801 : call xpyp_term_ta_pdf_rhs_godunov( gr_descending%nzm, gr_descending%nzt, 1, gr_descending, & ! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/G_unit_test_types/rev_direction_grid_test.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
500 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/G_unit_test_types/spurious_source_test.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 6 check(s) failed.
[Pipeline] }
[Pipeline] // dir
[Pipeline] }
[Pipeline] // stage
[Pipeline] stage
[Pipeline] { (Check for wp2 NaN error from advance_wp2_wp3)
[Pipeline] script
[Pipeline] {
[Pipeline] sh
Error message 'Error calling advance_wp2_wp3' found in log
CLUBB error handling test for advance_wp2_wp3 was SUCCESSFUL
[Pipeline] }
[Pipeline] // script
[Pipeline] }
[Pipeline] // stage
[Pipeline] stage
[Pipeline] { (Check for wp2 NaN error from advance_wm_wpxp)
[Pipeline] script
[Pipeline] {
[Pipeline] sh
Error message 'Error calling advance_xm_wpxp' found in log
CLUBB error handling test for advance_xm_wpxp was SUCCESSFUL
[Pipeline] }
[Pipeline] // script
[Pipeline] }
[Pipeline] // stage
[Pipeline] stage
[Pipeline] { (Declarative: Post Actions)
[Pipeline] script
[Pipeline] {
[Pipeline] }
[Pipeline] // script
[Pipeline] }
[Pipeline] // stage
[Pipeline] }
[Pipeline] // withEnv
[Pipeline] }
[Pipeline] // node
[Pipeline] End of Pipeline
Finished: SUCCESS
