Console Output
+ source /etc/profile.d/larson-group.sh
++ export GIT_EDITOR=vi
++ GIT_EDITOR=vi
++ export SVN_EDITOR=vi
++ SVN_EDITOR=vi
++ export OMP_STACKSIZE=1048579
++ OMP_STACKSIZE=1048579
++ export LMOD_ROOT=/opt/lmod/
++ LMOD_ROOT=/opt/lmod/
++ source /opt/lmod//lmod/lmod/init/bash
+++ '[' -z '' ']'
+++ case "$-" in
+++ __lmod_vx=x
+++ '[' -n x ']'
+++ set +x
Shell debugging temporarily silenced: export LMOD_SH_DBG_ON=1 for this output (/usr/local/spack/opt/spack/linux-pop22-cascadelake/gcc-12.2.0/lmod-8.7.37-bi3kyxcdrfgw3y7vv2k7c5rjxg75qzju/lmod/lmod/init/bash)
Shell debugging restarted
+++ unset __lmod_vx
+++ find /usr/local/spack/share/spack/lmod/linux-pop22-x86_64/Core -print -quit
++ export MODULEPATH=/usr/local/spack/share/spack/lmod/linux-pop22-x86_64/Core
++ MODULEPATH=/usr/local/spack/share/spack/lmod/linux-pop22-x86_64/Core
+ module load intel netcdf-fortran
+ '[' -z '' ']'
+ case "$-" in
+ __lmod_sh_dbg=x
+ '[' -n x ']'
+ set +x
Shell debugging temporarily silenced: export LMOD_SH_DBG_ON=1 for Lmod's output
Shell debugging restarted
+ unset __lmod_sh_dbg
+ return 0
+ compile/compile.bash -c config/linux_x86_64_ifort.bash
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
...ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
..ERROR opening source file: ../src/Radiation/BUGSrad/variables_radiation_module.F90
: No such file or directory
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_param
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_gfdlact
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libclubb_param.a
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libclubb_gfdlact.a
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_lapack
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libclubb_lapack.a
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_bugsrad
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.microphys_utils
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_parabolic
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_coamps
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libclubb_bugsrad.a
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libmicrophys_utils.a
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libclubb_parabolic.a
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libclubb_coamps.a
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_morrison
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_KK_microphys
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libclubb_morrison.a
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libclubb_KK_microphys.a
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.silhs
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libsilhs.a
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_other
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../lib/libclubb_other.a
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_standalone
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_tuner
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.jacobian
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.G_unit_tests
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.int2txt
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../bin/clubb_tuner
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../bin/clubb_standalone
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../bin/G_unit_tests
cd /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../obj; make -f Make.clubb_thread_test
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../bin/jacobian
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../bin/int2txt
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
make[1]: Entering directory '/home/jenkins/workspace/clubb_cmake_output_matching_branch/obj'
touch /home/jenkins/workspace/clubb_cmake_output_matching_branch/compile/../bin/clubb_thread_test
make[1]: Leaving directory '/home/jenkins/workspace/clubb_cmake_output_matching_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/corr_varnce_module.F90 failed:
Missing threadprivate for:
corr_array_n_below_def
corr_array_n_cloud_def
File ../src/CLUBB_core/error_code.F90 failed:
Missing threadprivate for:
clubb_debug_level
File ../src/CLUBB_core/sponge_layer_damping.F90 failed:
Missing threadprivate for:
thlm_sponge_damp_settings
wp2_sponge_damp_settings
up2_vp2_sponge_damp_settings
thlm_sponge_damp_profile
uv_sponge_damp_profile
rtm_sponge_damp_profile
wp2_sponge_damp_profile
uv_sponge_damp_settings
wp3_sponge_damp_settings
rtm_sponge_damp_settings
wp3_sponge_damp_profile
up2_vp2_sponge_damp_profile
File ../src/CLUBB_core/fill_holes.F90 failed:
Missing threadprivate for:
ret_code
[91mcheck_for_missing_threadprivate.py did not pass.[0m
[91mfailedFiles = ['../src/CLUBB_core/corr_varnce_module.F90', '../src/CLUBB_core/error_code.F90', '../src/CLUBB_core/sponge_layer_damping.F90', '../src/CLUBB_core/fill_holes.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:
3095 : 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.
197 : 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.
198 : ! method to obtain smoother initial condition profile, which is found to be
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
199 : ! beneficial to achive a better numerical solution convergence. If this flag
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
200 : ! is turned off, the initial conditions will be generated with linear interpolation.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
201 : ! This is done on a case-by-case basis, since using the monotone cubic method
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
202 : ! requires a special sounding.in file with many additional sounding levels.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
203 : l_modify_bc_for_cnvg_test, & ! Flag to activate modifications on boundary condition for convergence test
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
714 : !$omp wm_zm_init, em_init, exner_init, thvm_init, p_in_Pa_init, p_in_Pa_zm_init, rho_init, rho_zm_init, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
722 : !$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.
729 : !$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.
738 : !$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.
740 : !$omp wpsclrp_sfc, wpedsclrp_sfc, sclrm, wpsclrp, sclrp2, sclrp3, sclrprtp, sclrpthlp, sclrpthvp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1002 : l_prescribed_avg_deltaz, & ! used in calc_derrived_params_api. If .true., avg_deltaz = deltaz
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1733 : open(unit=iunit_grid_adaptation, file=fname_grid_adaptation, status='replace', action='write')
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2049 : allocate( um_ref(ngrdcol, gr%nzt) ) ! Reference u wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2050 : allocate( vm_ref(ngrdcol, gr%nzt) ) ! Reference v wind for nudging; Michael Falk, 17 Oct 2007
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2500 : 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.
2531 : ! 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.
2539 : 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.
2582 : !$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.
2594 : !$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.
2595 : !$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.
2598 : !$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.
2600 : !$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.
2606 : !$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.
2607 : !$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.
2608 : !$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.
2609 : !$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.
2610 : !$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.
2611 : !$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.
2612 : !$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.
2613 : !$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.
2614 : !$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.
2615 : !$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.
2719 : 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.
2725 : um_pert(i,k) = zero ! Variables used to track perturbed version of winds.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2727 : wm_zt(i,k) = wm_zt_init(k) ! Imposed large scale w - Thermodynamic levels
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2909 : open( unit=iunit_grid_adaptation+10, file=trim( output_dir ) // trim( runtype ) // '_grid.txt', &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2921 : 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.
3107 : !----------------------------------- Optional Input Variables -----------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3264 : um(i,:), vm(i,:), rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3579 : !$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.
3581 : !$acc lh_rt_clipped, lh_thl_clipped, lh_rc_clipped, lh_rv_clipped, lh_Nc_clipped, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3585 : !$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.
3586 : !$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.
3602 : 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.
3608 : thlm(i,:), p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), rtm(i,:), &! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3609 : rcm(i,:), cloud_frac(i,:), wm_zt(i,:), wm_zm(i,:), wp2_zt(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3610 : hydromet(i,:,:), Nc_in_cloud(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3627 : Nccnm(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3628 : hydromet_mc(i,:,:), Ncm_mc(i,:), rcm_mc(i,:), rvm_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3629 : thlm_mc(i,:), hydromet_vel_zt(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3630 : hydromet_vel_covar_zt_impc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3631 : hydromet_vel_covar_zt_expc(i,:,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3632 : wprtp_mc(i,:), wpthlp_mc(i,:), rtp2_mc(i,:), & ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3633 : thlp2_mc(i,:), rtpthlp_mc(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3657 : stats, i, & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3658 : hydromet(i,:,:), hydromet_vel_zt(i,:,:), hydrometp2(i,:,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3659 : K_hm(i,:,:), Ncm(i,:), Nc_in_cloud(i,:), rvm_mc(i,:), & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3660 : thlm_mc(i,:), err_info, & ! Inout
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3661 : wphydrometp(i,:,:), wpNcp(i,:) ) ! Out
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3670 : !$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.
3723 : !$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.
3814 : call stats_update( "brunt_term_time_avg", richardson_num_term_weight*richardson_num_term_time_avg, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3840 : .and. stats%l_last_sample ) then ! only adapt grid when the average of the last
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3969 : write(unit=fstdout, fmt='(a,f10.4)') 'CLUBB-TIMER time_microphys_scheme = ', time_microphys_scheme
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3970 : write(unit=fstdout, fmt='(a,f10.4)') 'CLUBB-TIMER time_microphys_advance = ', time_microphys_advance
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4090 : !$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.
4102 : !$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.
4103 : !$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.
4106 : !$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.
4108 : !$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.
4114 : !$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.
4115 : !$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.
4116 : !$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.
4117 : !$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.
4118 : !$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.
4119 : !$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.
4120 : !$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.
4121 : !$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.
4122 : !$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.
4123 : !$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.
4145 : 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.
4146 : 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.
4147 : 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.
4148 : 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.
4149 : 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.
4150 : 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.
4825 : clubb_config_flags%l_add_dycore_grid, clubb_config_flags%grid_adapt_in_time_method )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4833 : clubb_config_flags%l_add_dycore_grid, clubb_config_flags%grid_adapt_in_time_method )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4847 : '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.
71 : write(fstderr, *) "This section ensures that everything allocated in init_clubb_case will be deallocated"
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
72 : 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.
903 : 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.
1071 : 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.
1084 : 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.
1086 : wp2_flip, wp3_flip, rtp2_flip, rtp3_flip, thlp2_flip, thlp3_flip, rtpthlp_flip, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1092 : wp2rtp_flip, wp2thlp_flip, uprcp_flip, vprcp_flip, rc_coef_zm_flip, wp4_flip, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1093 : wpup2_flip, wpvp2_flip, wp2up2_flip, wp2vp2_flip, ice_supersat_frac_flip, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1582 : 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.
1609 : pdf_implicit_coefs_terms_flip%coef_wp2up_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1613 : pdf_implicit_coefs_terms_flip%term_wp2up_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1617 : pdf_implicit_coefs_terms_flip%coef_wp2vp_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1621 : pdf_implicit_coefs_terms_flip%term_wp2vp_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1655 : pdf_implicit_coefs_terms_flip%coef_wpup2_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1659 : pdf_implicit_coefs_terms_flip%term_wpup2_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1663 : pdf_implicit_coefs_terms_flip%coef_wpvp2_implicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1667 : pdf_implicit_coefs_terms_flip%term_wpvp2_explicit, nzt, ngrdcol, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2471 : 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 has finished.
FAIL: 7 check(s) failed.
perl ../utilities/CLUBBStandardsCheck.pl ../src/CLUBB_core/*.F90 || true
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1876 : 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.
493 : stats ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
501 : stats ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
953 : call windm_edsclrm_rhs( nzm, nzt, ngrdcol, gr, windm_edsclrm_scalar, dt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
954 : lhs_diff, edsclrm(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
955 : edsclrm_forcing(:,:,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
956 : rho_ds_zm, invrs_rho_ds_zt, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
957 : l_imp_sfc_momentum_flux, wpedsclrp(:,gr%k_lb_zm,edsclr), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
958 : stats, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
959 : 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.
928 : stats, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1742 : 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.
1743 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(4,i,k) * wp2(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1744 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(3,i,k) * wp3(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1745 : - gamma_over_implicit_ts * wp3_term_ta_lhs_result(2,i,k) * wp2(i,k+1) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1746 : - 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.
779 : 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.
780 : invrs_tau_C6_zm, l_scalar_calc, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
781 : lhs_pr1_wprtp, lhs_pr1_wpthlp, lhs_pr1_wpsclrp ) ! Intent(out)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
854 : stats, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
855 : rtm, wprtp, thlm, wpthlp, sclrm, wpsclrp, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
856 : err_info ) ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
896 : stats, & ! InOut
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4881 : 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.
4883 : + (-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.
1320 : sclrprtp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1353 : sclrpthlp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3042 : 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.
2430 : ! calc_derrived_params_api - Adjusts values of background eddy diffusivity based on vertical grid spacing
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2497 : ! 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.
700 : !$acc parallel loop gang vector collapse(2) default(present) reduction(.or.:l_any_adjustment_needed)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
851 : ! 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.
55 : subroutine setup_pdf_parameters_api( gr, nzm, nzt, ngrdcol, pdf_dim, hydromet_dim, dt, & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3823 : ! Correlation (in-precip) of chi (old s) and the precipitating hydrometeor in PDF component 1.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3827 : ! Correlation (in-precip) of chi (old s) and the precipitating hydrometeor in PDF component 2.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3841 : ! Correlation (in-precip) of eta (old t) and the precipitating hydrometeor in PDF component 1.
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3845 : ! Correlation (in-precip) of eta (old t) and the precipitating hydrometeor in PDF component 2.
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/CLUBB_core/setup_clubb_pdf_params.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
723 : 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.
724 : 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.
725 : rtpthlp(i,gr%k_lb_zm), sclrp2(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
726 : sclrprtp(i,gr%k_lb_zm,:), sclrpthlp(i,gr%k_lb_zm,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
727 : 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.
235 : 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.
237 : logical :: l_different_output_grid = .false. ! True if we need to remap the variables before output
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
238 : logical :: l_output_rad_files = .false. ! True if we want to output radiation grid variables
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
526 : if ( allocated( stats%grid%rho_lin_spline_vals ) ) deallocate( stats%grid%rho_lin_spline_vals )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
527 : if ( allocated( stats%grid%rho_lin_spline_levels ) ) deallocate( stats%grid%rho_lin_spline_levels )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
803 : ret_code = nf90_def_var( stats%ncid, "time", NF90_DOUBLE, (/ stats%time_dimid /), stats%time_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
808 : ret_code = nf90_def_var( stats%ncid, "col", NF90_DOUBLE, (/ stats%col_dimid /), stats%col_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
828 : 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.
835 : 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.
839 : 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.
849 : (/ stats%param_strlen_dimid, stats%param_dimid /), stats%param_name_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
852 : ret_code = nf90_def_var( stats%ncid, "param", NF90_DOUBLE, (/ stats%param_dimid /), stats%param_varid )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
912 : 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.
913 : 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.
920 : 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.
940 : 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.
1815 : stats%grid%gr_source, stats%grid%gr_output, stats%vars(i)%nz, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1816 : real( stats%vars(i)%buffer, kind=core_rknd ), stats%vars(i)%out_nz, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1817 : size( stats%grid%rho_lin_spline_vals, 2 ), stats%grid%rho_lin_spline_vals, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1973 : if ( allocated( stats%grid%rho_lin_spline_vals ) ) deallocate( stats%grid%rho_lin_spline_vals )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1974 : if ( allocated( stats%grid%rho_lin_spline_levels ) ) deallocate( stats%grid%rho_lin_spline_levels )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2416 : 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.
2461 : 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.
2528 : write(date(32:33),'(i2.2)') nint( ( ( real( mod( nint( st_time ),3600 ),kind=time_precision ) / &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2605 : write( fstderr,* ) "Invalid stats registry entry (expected: name | grid | units | long_name)"
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2706 : 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.
2707 : 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.
2714 : 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.
2715 : 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.
2722 : 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.
2723 : 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.
2730 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_1", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2734 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_2", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2740 : 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.
2741 : 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.
2748 : 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.
2749 : 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.
2756 : 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.
2757 : 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.
2764 : 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.
2765 : 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.
2772 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_1_n", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2776 : trim( hydromet_list(j2)( 1:min( 2,len_trim( hydromet_list(j2) ) ) ) )//"_2_n", &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2813 : 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: 20 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.
911 : !$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.
1114 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1118 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1122 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1123 : exner_zm(i,km1), exner_zm(i,k00), exner_zm(i,kp1), exner_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1126 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1127 : thlm_zm(i,km1), thlm_zm(i,k00), thlm_zm(i,kp1), thlm_zm(i,kp2) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1130 : gr%zm(i,km1), gr%zm(i,k00), gr%zm(i,kp1), gr%zm(i,kp2), &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1131 : 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: Line has exceeded 100 characters.
113 : ! The uniform distribution corresponds to all the same variables as X_nl,
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
410 : !$acc update host(X_u_all_levs,l_in_precip,lh_sample_point_weights,X_mixt_comp_all_levs,k_lh_start)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
lineCheck failed: ../src/SILHS/latin_hypercube_driver_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Missing 'implicit none' statements. 'Implicit None' check FAILED!
CLUBBStandardsCheck.pl Add a line containing 'implicit none' to each program, module, subroutine, and function.
implicitCheck failed: ../src/SILHS/mt95.F90
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl has finished.
FAIL: 2 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.
550 : 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.