Started by an SCM change Obtained jenkins_tests/clubb_bin_diff_regression_e3sm_flags_gfortran/Jenkinsfile from git https://github.com/larson-group/clubb.git [Pipeline] Start of Pipeline [Pipeline] node Running on Jenkins in /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran [Pipeline] { [Pipeline] stage [Pipeline] { (Declarative: Checkout SCM) [Pipeline] checkout The recommended git tool is: git > git rev-parse --resolve-git-dir /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/.git # timeout=10 Fetching changes from the remote Git repository > git config remote.origin.url https://github.com/larson-group/clubb.git # timeout=10 Fetching upstream changes from https://github.com/larson-group/clubb.git > git --version # timeout=10 > git --version # 'git version 2.30.2' using GIT_ASKPASS to set credentials A token based key used by Jenkins to preform Github actions, created 6/21/2021 > git fetch --tags --force --progress -- https://github.com/larson-group/clubb.git +refs/heads/*:refs/remotes/origin/* # timeout=10 > git rev-parse refs/remotes/origin/master^{commit} # timeout=10 Checking out Revision c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2 (refs/remotes/origin/master) > git config core.sparsecheckout # timeout=10 > git checkout -f c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2 # timeout=10 Commit message: "I added "smooth" max clipping for invrs_tau_shear, which is a variable that is supposed to be positive definite, yet was obtaining negative values at the model lower boundary owing to linear extension at the boundaries as part of the linear interpolation call." > git rev-list --no-walk 61b4a67e170bc2243263ac19fb90b24f5a1e455b # timeout=10 [Pipeline] } [Pipeline] // stage [Pipeline] withEnv [Pipeline] { [Pipeline] stage [Pipeline] { (Clone SysAdmin to tmp) [Pipeline] sh + rm -rf /home/jenkins/clubb_bit_diff_e3sm_flags_gfortran_workspace/sys_admin + git clone https://github.com/larson-group/sys_admin.git /home/jenkins/clubb_bit_diff_e3sm_flags_gfortran_workspace/sys_admin Cloning into '/home/jenkins/clubb_bit_diff_e3sm_flags_gfortran_workspace/sys_admin'... [Pipeline] } [Pipeline] // stage [Pipeline] stage [Pipeline] { (Run Python Test) [Pipeline] sh + python3 /home/jenkins/clubb_bit_diff_e3sm_flags_gfortran_workspace/sys_admin/python_nightly_test_suite/run_test.py -c /home/jenkins/clubb_bit_diff_e3sm_flags_gfortran_workspace/bit_diff_clubb_e3sm_flags_config .......................................................................................................................................................................................................................................................................................................................................................................................................................................................................................ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libclubb_gfdlact.a /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:1220:10: 1220 | rsat | 1 Warning: Unused variable ‘rsat’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:797:8: 797 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘ep’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:825:16: 825 | integer :: i, k ! Loop indices | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:825:19: 825 | integer :: i, k ! Loop indices | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:744:8: 744 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘ep’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:769:16: 769 | integer :: i, k ! Loop indices | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:769:19: 769 | integer :: i, k ! Loop indices | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:449:16: 449 | integer :: i, k | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:449:19: 449 | integer :: i, k | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:423:8: 423 | use model_flags, only: & | 1 Warning: Unused parameter ‘saturation_bolton’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:423:8: 423 | use model_flags, only: & | 1 Warning: Unused parameter ‘saturation_flatau’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:423:8: 423 | use model_flags, only: & | 1 Warning: Unused module variable ‘saturation_formula’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:423:8: 423 | use model_flags, only: & | 1 Warning: Unused parameter ‘saturation_gfdl’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:157:8: 157 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘ep’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/saturation.F90:106:8: 106 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘ep’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/parameters_tunable.F90:545:19: 545 | integer :: k, i ! loop variable | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/parameters_tunable.F90:2558:32: 2558 | subroutine init_parameters_999( & | ^ Warning: ‘init_parameters_999’ defined but not used [-Wunused-function] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/penta_lu_solver.F90:129:22: 129 | integer :: i, k, j ! Loop variables | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/input_reader.F90:498:28: 491 | do i=1, dim_grid | 2 ...... 498 | if ( grid(i) < grid(i-1) ) then | 1 Warning: Array reference at (1) out of bounds (0 < 1) in loop beginning at (2) [-Wdo-subscript] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:2125:8: 2125 | use clubb_precision, only: & | 1 Warning: Unused parameter ‘core_rknd’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1785:38: 1785 | real( kind = core_rknd ) :: factor | 1 Warning: Unused variable ‘factor’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:160:28: 160 | old_solution, & ! Intent(in) | 1 Warning: Unused dummy argument ‘old_solution’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:158:26: 158 | solve_name, penta_solve_method, & ! Intent(in) | 1 Warning: Unused dummy argument ‘solve_name’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1440:16: 1440 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1317:8: 1317 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1313:8: 1313 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_cubic_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1313:8: 1313 | use model_flags, only: & | 1 Warning: Unused module variable ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1270:8: 1270 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1266:8: 1266 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_cubic_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1266:8: 1266 | use model_flags, only: & | 1 Warning: Unused module variable ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1221:8: 1221 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1217:8: 1217 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_cubic_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1217:8: 1217 | use model_flags, only: & | 1 Warning: Unused module variable ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:49:28: 49 | old_solution, & ! Intent(in) | 1 Warning: Unused dummy argument ‘old_solution’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/grid_class.F90:1182:16: 1182 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:47:26: 47 | solve_name, penta_solve_method, & ! Intent(in) | 1 Warning: Unused dummy argument ‘solve_name’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp3_module.F90:110:16: 110 | integer :: i, k, sclr ! Loop index | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp3_module.F90:110:19: 110 | integer :: i, k, sclr ! Loop index | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/clip_explicit.F90:836:43: 836 | subroutine clip_variance( nz, ngrdcol, gr, solve_type, dt, threshold, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/clip_explicit.F90:403:40: 403 | subroutine clip_covar( nz, ngrdcol, gr, solve_type, l_first_clip_ts, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/clip_explicit.F90:150:22: 150 | integer :: sclr, i ! scalar array index. | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/fill_holes.F90:590:41: 590 | rho_ds_zm, rho_ds_zt, exner, & ! Intent(in) | 1 Warning: Unused dummy argument ‘rho_ds_zm’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/fill_holes.F90:94:7: 94 | j, & | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1868:19: 1868 | integer :: i, k | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1183:13: 1183 | k_tdiag = 2, & ! Thermodynamic main diagonal index. | 1 Warning: Unused parameter ‘k_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1184:15: 1184 | km1_tdiag = 3 ! Thermodynamic subdiagonal index. | 1 Warning: Unused parameter ‘km1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1182:15: 1182 | kp1_tdiag = 1, & ! Thermodynamic superdiagonal index. | 1 Warning: Unused parameter ‘kp1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:505:29: 505 | -- this is likely unsafe and considered fatal" | 1 Warning: Missing ‘&’ in continued character constant at (1) [-Wampersand] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1799:46: 1799 | subroutine compute_uv_tndcy( nz, ngrdcol, gr, solve_type, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1052:49: 1052 | subroutine windm_edsclrm_solve( nz, ngrdcol, gr, nrhs, ixm_matrix_condt_num, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1575:13: 1575 | k_tdiag = 2, & ! Thermodynamic main diagonal index. | 1 Warning: Unused parameter ‘k_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1576:15: 1576 | km1_tdiag = 3 ! Thermodynamic subdiagonal index. | 1 Warning: Unused parameter ‘km1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1574:15: 1574 | kp1_tdiag = 1, & ! Thermodynamic superdiagonal index. | 1 Warning: Unused parameter ‘kp1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/setup_clubb_pdf_params.F90:275:25: 275 | ice_supersat_frac_1, & ! Ice supersaturation fraction (1st PDF comp.) [-] | 1 Warning: Unused variable ‘ice_supersat_frac_1’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/setup_clubb_pdf_params.F90:276:25: 276 | ice_supersat_frac_2 ! Ice supersaturation fraction (2nd PDF comp.) [-] | 1 Warning: Unused variable ‘ice_supersat_frac_2’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:4899:57: 4899 | rho_ds_zm, rho_ds_zt, & | 1 Warning: Unused dummy argument ‘rho_ds_zt’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2197:13: 2197 | k_mdiag = 2, & ! Momentum main diagonal index. | 1 Warning: Unused parameter ‘k_mdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2198:15: 2198 | km1_mdiag = 3 ! Momentum subdiagonal index. | 1 Warning: Unused parameter ‘km1_mdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2196:15: 2196 | kp1_mdiag = 1, & ! Momentum superdiagonal index. | 1 Warning: Unused parameter ‘kp1_mdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2020:42: 2020 | subroutine xp2_xpyp_lhs( nz, ngrdcol, gr, dt, & ! In | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtp2_dp1’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtp2_dp2’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtp2_ma’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtp2_ta’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtpthlp_dp1’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtpthlp_dp2’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtpthlp_ma’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtpthlp_ta’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘ithlp2_dp1’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘ithlp2_dp2’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘ithlp2_ma’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘ithlp2_ta’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iup2_dp2’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iup2_ma’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iup2_ta’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘ivp2_dp2’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘ivp2_ma’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘ivp2_ta’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2062:8: 2062 | use stats_variables, only: & | 1 Warning: Unused module variable ‘l_stats_samp’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:4700:51: 4700 | pure subroutine wp3_term_pr1_rhs( nz, ngrdcol, gr, C8, C8b, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:4420:56: 4420 | pure subroutine wp3_terms_bp1_pr2_rhs( nz, ngrdcol, gr, C11_Skw_fnc, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:4196:51: 4196 | pure subroutine wp3_term_pr1_lhs( nz, ngrdcol, gr, C8, C8b, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:3301:51: 3301 | pure subroutine wp2_term_pr1_rhs( nz, ngrdcol, gr, C4, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:3070:51: 3070 | pure subroutine wp2_term_dp1_rhs( nz, ngrdcol, gr, C1_Skw_fnc, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:2985:55: 2985 | pure subroutine wp2_terms_bp_pr2_rhs( nz, ngrdcol, gr, C_uu_buoy, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:2893:51: 2893 | pure subroutine wp2_term_pr1_lhs( nz, ngrdcol, gr, C4, invrs_tau_C4_zm, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:2807:51: 2807 | pure subroutine wp2_term_dp1_lhs( nz, ngrdcol, gr, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1610:38: 1610 | subroutine wp23_lhs( nz, ngrdcol, gr, dt, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1114:10: 1114 | nrhs = 1 ! Number of RHS vectors | 1 Warning: Unused parameter ‘nrhs’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1008:45: 1008 | rho_ds_zm, rho_ds_zt, & | 1 Warning: Unused dummy argument ‘rho_ds_zt’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1210:15: 1210 | threshold ! Minimum value for wp2 [m^2/s^2] | 1 Warning: Unused variable ‘threshold’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:4946:56: 4946 | pure subroutine wpxp_terms_bp_pr3_rhs( nz, ngrdcol, gr, C7_Skw_fnc, thv_ds_zm, xpthvp, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:3733:43: 3733 | subroutine xm_wpxp_solve( nz, ngrdcol, gr, nrhs, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:3796:16: 3796 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1987:22: 1987 | integer :: i, j, k | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1381:16: 1381 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:956:78: 956 | subroutine xm_wpxp_lhs( nz, ngrdcol, gr, l_iter, dt, wpxp, wm_zt, C7_Skw_fnc, & ! In | 1 Warning: Unused dummy argument ‘c7_skw_fnc’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:956:41: 956 | subroutine xm_wpxp_lhs( nz, ngrdcol, gr, l_iter, dt, wpxp, wm_zt, C7_Skw_fnc, & ! In | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtm_ma’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘irtm_ta’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘ithlm_ma’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘ithlm_ta’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwprtp_ac’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwprtp_dp1’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwprtp_ma’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwprtp_pr1’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwprtp_pr2’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwprtp_sicl’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwprtp_ta’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwprtp_tp’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwpthlp_ac’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwpthlp_dp1’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwpthlp_ma’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwpthlp_pr1’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwpthlp_pr2’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwpthlp_sicl’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwpthlp_ta’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘iwpthlp_tp’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1108:45: 1108 | logical :: l_upper_thresh, l_lower_thresh ! flags for clip_semi_imp_lhs | 1 Warning: Unused variable ‘l_lower_thresh’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1049:8: 1049 | use stats_variables, only: & | 1 Warning: Unused module variable ‘l_stats_samp’ which has been explicitly imported at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1108:29: 1108 | logical :: l_upper_thresh, l_lower_thresh ! flags for clip_semi_imp_lhs | 1 Warning: Unused variable ‘l_upper_thresh’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1038:8: 1038 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘one’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:956:66: 956 | subroutine xm_wpxp_lhs( nz, ngrdcol, gr, l_iter, dt, wpxp, wm_zt, C7_Skw_fnc, & ! In | 1 Warning: Unused dummy argument ‘wm_zt’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:956:59: 956 | subroutine xm_wpxp_lhs( nz, ngrdcol, gr, l_iter, dt, wpxp, wm_zt, C7_Skw_fnc, & ! In | 1 Warning: Unused dummy argument ‘wpxp’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:957:56: 957 | wpxp_upper_lim, wpxp_lower_lim, & ! In | 1 Warning: Unused dummy argument ‘wpxp_lower_lim’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:957:40: 957 | wpxp_upper_lim, wpxp_lower_lim, & ! In | 1 Warning: Unused dummy argument ‘wpxp_upper_lim’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1133:17: 1133 | zero_vector ! Vector of 0s | 1 Warning: Unused variable ‘zero_vector’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:481:19: 481 | integer :: i, j, k | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:481:22: 481 | integer :: i, j, k | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4487:47: 4487 | call calc_trapezoid_zm( nz, ngrdcol, gr, wpthvp, wpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4490:47: 4490 | call calc_trapezoid_zm( nz, ngrdcol, gr, thlpthvp, thlpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4493:47: 4493 | call calc_trapezoid_zm( nz, ngrdcol, gr, rtpthvp, rtpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4799:41: 4799 | subroutine clip_rcm ( nz, ngrdcol, gr, rtm, & ! intent(in) | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4329:18: 4329 | integer :: i, k, sclr | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4329:21: 4329 | integer :: i, k, sclr | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:3607:40: 3607 | l_prescribed_avg_deltaz, & ! intent(in) | 1 Warning: Unused dummy argument ‘l_prescribed_avg_deltaz’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:3594:22: 3594 | ( nzmax, T0_in, ts_nudge_in, & ! intent(in) | 1 Warning: Unused dummy argument ‘nzmax’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:140:23: 140 | hydromet, & ! Unused | 1 Warning: Unused dummy argument ‘hydromet’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:193:8: 193 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘num_hf_draw_points’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/clubb_api_module.F90:1069:16: 1069 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libclubb_param.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libclubb_lapack.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libmicrophys_utils.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libclubb_parabolic.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libclubb_bugsrad.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libclubb_coamps.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libclubb_KK_microphys.a /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/SILHS/silhs_importance_sample_module.F90:638:62: 633 | do category=1, num_importance_categories | 2 ...... 638 | rand_vect(sample) < category_cumulative_probs(category+1) ) then | 1 Warning: Array reference at (1) out of bounds (9 > 8) in loop beginning at (2) [-Wdo-subscript] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/SILHS/latin_hypercube_driver_module.F90:1009:44: 1009 | subroutine clip_transform_silhs_output( gr, nz, ngrdcol, num_samples, & ! In | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/SILHS/silhs_api_module.F90:324:13: 324 | rho_ds_zt, & ! Unused | 1 Warning: Unused dummy argument ‘rho_ds_zt’ at (1) [-Wunused-dummy-argument] ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libsilhs.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libclubb_morrison.a ../src/Benchmark_cases/cloud_sed_module.F90:168:44: 168 | if ( zt2zm( gr, rcm, k) > zero .AND. zt2zm( gr, Ncm, k ) > zero ) then | 1 Warning: Impure function ‘redirect_interpolated_azm_k’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1331:13: 1331 | .or. is_nan_2d( real( rim_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1332:13: 1332 | .or. is_nan_2d( real( rsm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1333:13: 1333 | .or. is_nan_2d( real( rrm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1334:13: 1334 | .or. is_nan_2d( real( rgm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1335:13: 1335 | .or. is_nan_2d( real( Ncm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1336:13: 1336 | .or. is_nan_2d( real( Nim_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1337:13: 1337 | .or. is_nan_2d( real( Nsm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1338:13: 1338 | .or. is_nan_2d( real( Nrm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1339:13: 1339 | .or. is_nan_2d( real( Ngm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1340:13: 1340 | .or. is_nan_2d( real( rvm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1341:13: 1341 | .or. is_nan_2d( real( T_in_K_mc, kind=core_rknd ) ) ) then | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/Benchmark_cases/neutral_case.F90:36:8: 36 | use constants_clubb, only: grav ! Variable(s) | 1 Warning: Unused parameter ‘grav’ which has been explicitly imported at (1) [-Wunused-parameter] ../src/Benchmark_cases/neutral_case.F90:21:51: 21 | subroutine neutral_case_sfclyr( time, z, thlm_sfc, & | 1 Warning: Unused dummy argument ‘thlm_sfc’ at (1) [-Wunused-dummy-argument] ../src/Benchmark_cases/neutral_case.F90:21:41: 21 | subroutine neutral_case_sfclyr( time, z, thlm_sfc, & | 1 Warning: Unused dummy argument ‘z’ at (1) [-Wunused-dummy-argument] ../src/KK_microphys_module.F90:43:35: 43 | subroutine KK_local_microphys( gr, dt, nz, l_latin_hypercube, & ! In | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] ../src/clubb_driver.F90:6067:39: 6067 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in) | 1 Warning: Unused dummy argument ‘lmin’ at (1) [-Wunused-dummy-argument] ../src/clubb_driver.F90:6067:33: 6067 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in) | 1 Warning: Unused dummy argument ‘nu_vert_res_dep’ at (1) [-Wunused-dummy-argument] ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../lib/libclubb_other.a ../src/G_unit_test_types/smooth_heaviside_tests.F90:98:7: 98 | i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] ../src/G_unit_test_types/smooth_heaviside_tests.F90:120:80: 120 | total_mismatches = total_mismatches + COUNT(abs(result - result_cmp) >= eps) | ^ Warning: ‘total_mismatches’ is used uninitialized in this function [-Wuninitialized] ../src/G_unit_test_types/smooth_heaviside_tests.F90:32:31: 32 | integer :: total_mismatches | ^ note: ‘total_mismatches’ was declared here ../src/G_unit_test_types/w_up_in_cloud_tests.F90:24:8: 24 | use clubb_precision, only: & | 1 Warning: Unused parameter ‘core_rknd’ which has been explicitly imported at (1) [-Wunused-parameter] ../src/G_unit_tests.F90:176:13: 176 | stats_sfc | 1 Warning: Unused variable ‘stats_sfc’ declared at (1) [-Wunused-variable] ../src/G_unit_tests.F90:175:12: 175 | stats_zm, & | 1 Warning: Unused variable ‘stats_zm’ declared at (1) [-Wunused-variable] ../src/G_unit_tests.F90:174:12: 174 | stats_zt, & | 1 Warning: Unused variable ‘stats_zt’ declared at (1) [-Wunused-variable] CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 292 : z_i = lin_interpolate_two_points( 8.0e-3_core_rknd, rtm(k), rtm(k-1), gr%zt(1,k), gr%zt(1,k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/simple_rad_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 331 : press(i) = lin_interpolate_two_points( gr%zt(1,i), z(k), z(k-1), p_in_Pa(k), p_in_Pa(k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/sounding.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: 'use' statement w/o 'only' found in the following line: 6188 : use netcdf CLUBBStandardsCheck.pl WARNING: Use check FAILED! CLUBBStandardsCheck.pl WARNING: Check that comma is on same line as 'use', as CLUBB requires. ../src/clubb_driver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2469 : stats_zt, stats_zm, stats_sfc, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2475 : precip_fracs, & ! Intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3324 : ! em(k) = ( 0.15_core_rknd * (1.0_core_rknd - gr%zm(1,k)/150.0_core_rknd) ) / rho_zm(k) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/clubb_driver.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 452 : call stat_update_var( ixp3_dp, -(C_xp3_dissipation * invrs_tau_zt(i,:))*xp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xp3_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 352 : * ( K_zm(i,1) + nu(i) ) * rho_ds_zm(i,1) * gr%invrs_dzm(i,1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 356 : * ( K_zm(i,1) + nu(i) ) * rho_ds_zm(i,1) * gr%invrs_dzm(i,1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 407 : = + gr%invrs_dzt(i,k) * ( K_zt(i,k) + nu(i) ) * ( gr%invrs_dzm(i,k) + gr%invrs_dzm(i,k-1) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1003 : = + gr%invrs_dzm(i,k) * ( K_zm(i,k) + nu(i) ) * ( gr%invrs_dzt(i,k+1) + gr%invrs_dzt(i,k) ) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/diffusion.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules. CLUBBStandardsCheck.pl WARNING: Private Test failed! ../src/CLUBB_core/matrix_solver_wrapper.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 342 : call calc_coefs_wpxpyp_semiimpl( nz, wp2(i,:), rtp2(i,:), thlp2(i,:), wprtp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/new_pdf_main.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 43 : ! low_1(2)*upper_1(1)+l_diag(2)*1 = lhs(0,2) => l_diag(2) = lhs(0,2) - low_1(2)*upper_1(1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 44 : ! low_1(2)*upper_2(1)+l_diag(2)*upper_1(2) = lhs(-1,2) => upper_1(2) = ( lhs(-1,2)-low_1(2)*upper_2(1) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 52 : ! l_2(k)*upper_1(k-2)+low_1(k)*1 = lhs(1,k) => low_1(k) = lhs(1,k) - l_2(k)*upper_1(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 53 : ! l_2(k)*upper_2(k-2)+low_1(k)*upper_1(k-1) = lhs( 0,k) => l_diag(k) = lhs(0,k) - l_2(k)*upper_2(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 54 : ! +l_diag(k)*1 + low_1(k)*upper_1(k-1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 56 : ! low_1(k)*upper_2(k-1)+l_diag(k)*upper_1(k) = lhs(-1,k) => upper_1(k) = ( lhs(-1,k) - low_1(k)*upper_2(k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/penta_lu_solver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 86 : real( kind = core_rknd ), dimension(ngrdcol,nz), intent(out) :: sigma_sqd_w ! PDF width parameter [-] CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/sigma_sqd_w_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1274 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1275 : ! for a plot on how output behaves with varying min_max_smth_mag CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1278 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1313 : ustar(i) = smooth_max( ( upwp_sfc(i)**2 + vpwp_sfc(i)**2 )**(one_fourth), ufmin, one * min_max_smth_mag) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1323 : sqrt( (ddzt( nz, ngrdcol, gr, um ))**2 & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1384 : one - zt2zm(nz, ngrdcol, gr, ice_supersat_frac) / 0.007_core_rknd, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1422 : * sqrt(em(i,k)) / ( gr%zm(i,k) - sfc_elevation(i) + z_displace ) ! small CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1431 : / smooth_max( nz, ngrdcol, 1.0e-7_core_rknd, brunt_vaisala_freq_sqd_smth, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1433 : 0.3_core_rknd, 0.3_core_rknd * min_max_smth_mag ), one, one * min_max_smth_mag ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1525 : tau_zm = smooth_min( nz, ngrdcol, one / invrs_tau_zm, tau_max_zm, 1.0e3_core_rknd * min_max_smth_mag ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1526 : tau_zt = smooth_min( nz, ngrdcol, zm2zt( nz, ngrdcol, gr, tau_zm ), tau_max_zt, 1.0e3_core_rknd * min_max_smth_mag ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/mixing_length.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 719 : esat(i,k) = 10._core_rknd**(-7.90298_core_rknd*(373.16_core_rknd/T_in_K_clipped-1._core_rknd)+ & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/saturation.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 919 : write(iunit,*) "l_fix_w_chi_eta_correlations = ", clubb_config_flags%l_fix_w_chi_eta_correlations CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 936 : write(iunit,*) "l_use_tke_in_wp3_pr_turb_term = ", clubb_config_flags%l_use_tke_in_wp3_pr_turb_term CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/model_flags.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 239 : real( kind = core_rknd ), dimension(ngrdcol, nz, min(1,sclr_dim), 2 ), intent(in) :: & ! h1g, 2010-06-15 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 576 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 577 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 607 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 608 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 619 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 620 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 969 : pdf_params%rsatl_1(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl1(i,:) ) * RH_crit(i, :, 1, 1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 984 : pdf_params%rsatl_2(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl2(i,:) ) * RH_crit(i, :, 1, 2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1097 : rcm(i,k) = pdf_params%mixt_frac(i,k) * pdf_params%rc_1(i,k) + ( one - pdf_params%mixt_frac(i,k) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1276 : - ( one - pdf_params%mixt_frac(i,:) ) * corr_sclr_thl_2(i,:,j) * pdf_params%cthl_2(i,:) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/pdf_closure_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 576 : a1_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, a1(:,:) ), zero_threshold ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_wp2_wp3_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 913 : ( nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 914 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 915 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 916 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 917 : thv_ds_zm(i,:), thv_ds_zt(i,:), wpthlp_sfc(i), wprtp_sfc(i), upwp_sfc(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 918 : vpwp_sfc(i), um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 919 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 920 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 923 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 924 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1228 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1229 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1455 : call calc_sfc_varnce( upwp_sfc(i), vpwp_sfc(i), wpthlp_sfc(i), wprtp_sfc(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1456 : um(i,2), vm(i,2), Lscale_up(i,2), wpsclrp_sfc(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1674 : stats_zm, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1697 : call advance_xm_wpxp( nz, ngrdcol, gr, dt_advance, sigma_sqd_w, wm_zm, wm_zt, wp2, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1761 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2130 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2131 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2424 : um(i,:), vm(i,:), upwp(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2425 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2426 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2427 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2428 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2429 : rho_ds_zm(i,:), rho_ds_zt(i,:), thv_ds_zm(i,:), thv_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2430 : wm_zt(i,:), wm_zm(i,:), rcm(i,:), wprcp(i,:), rc_coef(i,:), rc_coef_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2431 : rcm_zm(i,:), rtm_zm(i,:), thlm_zm(i,:), cloud_frac(i,:), ice_supersat_frac(i,:),& ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2434 : thvm(i,:), ug(i,:), vg(i,:), Lscale(i,:), wpthlp2(i,:), wp2thlp(i,:), wprtp2(i,:), wp2rtp(i,:),& ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2435 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2436 : wprtpthlp(i,:), sigma_sqd_w_zt(i,:), rsat(i,:), wp2_zt(i,:), thlp2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2437 : wpthlp_zt(i,:), wprtp_zt(i,:), rtp2_zt(i,:), rtpthlp_zt(i,:), up2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2438 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2441 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2442 : wp3_zm(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), Skw_velocity(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2445 : pdf_params_single_col(i), pdf_params_zm_single_col(i), sclrm(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2446 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2447 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2448 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2456 : nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2457 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2458 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2459 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2460 : thv_ds_zm(i,:), thv_ds_zt(i,:), wpthlp_sfc(i), wprtp_sfc(i), upwp_sfc(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2461 : vpwp_sfc(i), um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2462 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2463 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2466 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2467 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3046 : wp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, wp2(:,:) ), w_tol_sqd ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3048 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3050 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3052 : up2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, up2(:,:) ), w_tol_sqd ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3054 : vp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, vp2(:,:) ), w_tol_sqd ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3058 : sclrp2_zt(:,:,j) = max( zm2zt( nz, ngrdcol, gr, sclrp2(:,:,j) ), sclr_tol(j)**2 ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3188 : sigma_sqd_w_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, sigma_sqd_w(:,:) ), zero_threshold ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3195 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3196 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3197 : up2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, up2(:,:) ), w_tol_sqd ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3198 : vp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, vp2(:,:) ), w_tol_sqd ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3222 : sclrp2_zt(:,:,j) = max( zm2zt( nz, ngrdcol, gr, sclrp2(:,:,j) ), sclr_tol(j)**2 ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3433 : rcp2(:,:) = max( zt2zm( nz, ngrdcol, gr, rcp2_zt(:,:) ), zero_threshold ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_clubb_core_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1229 : um_col, vm_col, upwp_col, vpwp_col, up2_col, vp2_col, up3_col, vp3_col, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1231 : wp2_col, wp3_col, rtp2_col, rtp3_col, thlp2_col, thlp3_col, rtpthlp_col, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2110 : field ) ! intent(inout) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/clubb_api_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2300 : integer :: grid_level = 1 ! grid level for stats where there is only one sensible level (eg timeseries) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2856 : write(fstderr, *) "Warning: tot_vartn_normlzd_thlm tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2869 : write(fstderr, *) "Warning: tot_vartn_normlzd_wprtp tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_clubb_utilities.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 493 : write(fstderr,*) "l_mono_flux_lim_rtm=T with l_mono_flux_lim_spikefix=F can lead to spikes aloft." CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 803 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 804 : Lscale(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 805 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 809 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 815 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 816 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 819 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 820 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 821 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 822 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 823 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 825 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1742 : call wpxp_terms_bp_pr3_rhs( nz, ngrdcol, gr, (one+C7_Skw_fnc), thv_ds_zm, xpthvp, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2646 : call xm_wpxp_rhs( nz, ngrdcol, gr, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3645 : call xm_wpxp_rhs( nz, ngrdcol, gr, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4522 : call xm_correction_wpxp_cl( nz, solve_type, dt, wpxp_chnge(i,:), gr%invrs_dzt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xm_wpxp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 506 : call calc_xp2_xpyp_ta_terms( nz, ngrdcol, gr, wprtp, wprtp2, wpthlp, wpthlp2, wprtpthlp, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 558 : call solve_xp2_xpyp_with_multiple_lhs( nz, ngrdcol, gr, C2rt_1d, C2thl_1d, C2rtthl_1d, C2sclr_1d, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 597 : lhs_dp1(i,k) = lhs_dp1(i,k) + term_dp1_lhs( C14_1d(i,k), invrs_tau_C14_zm(i,k) ) * gamma_over_implicit_ts CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1202 : subroutine solve_xp2_xpyp_with_single_lhs( nz, ngrdcol, gr, C2x, invrs_tau_xp2_zm, rtm, thlm, wprtp, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1459 : sclrprtp(:,:,:) = one_half * ( sclrprtp(:,:,:) + solution(:,:,3+sclr_dim+1:3+2*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1460 : sclrpthlp(:,:,:) = one_half * ( sclrpthlp(:,:,:) + solution(:,:,3+2*sclr_dim+1:3+3*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1502 : subroutine solve_xp2_xpyp_with_multiple_lhs( nz, ngrdcol, gr, C2rt_1d, C2thl_1d, C2rtthl_1d, C2sclr_1d, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1761 : lhs_dp1(i,k) = term_dp1_lhs( C2rtthl_1d(i,k), invrs_tau_xp2_zm(i,k) ) * gamma_over_implicit_ts CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1805 : lhs_dp1(i,k) = term_dp1_lhs( C2sclr_1d(i,k), invrs_tau_xp2_zm(i,k) ) * gamma_over_implicit_ts CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2002 : sclrprtp(:,:,:) = one_half * ( sclrprtp(:,:,:) + sclr_solution(:,:,sclr_dim+1:2*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2003 : sclrpthlp(:,:,:) = one_half * ( sclrpthlp(:,:,:) + sclr_solution(:,:,2*sclr_dim+1:3*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2229 : real( kind = core_rknd ), dimension(ngrdcol) :: rcond ! Est. of the reciprocal of the condition # on the matrix CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2692 : rhs(i,k) = rhs(i,k) + ( one - C_uu_shr ) * term_tp( xam(i,k+1), xam(i,k), xam(i,k+1), xam(i,k), & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3585 : sgn_t_vel_sclrpthlp(:,:) = sign(one,term_wpthlpsclrp_explicit_zm(:,:)*sclrpthlp(:,:,sclr)) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3651 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3679 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wprtp_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3682 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wpthlp_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3685 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wprtp_zt(:,:) * wpthlp_zt(:,:) * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3719 : sgn_t_vel_rtp2(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3757 : sgn_t_vel_thlp2(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3773 : = ( one - one_third * beta ) * a1(:,:)**2 * wprtp(:,:) * wpthlp(:,:) * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3796 : sgn_t_vel_rtpthlp(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3824 : = ( one - one_third * beta ) * a1(:,:)**2 * wpsclrp(:,:,sclr)**2 * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3831 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wpsclrp_zt(:,:,sclr)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3852 : sgn_t_vel_sclrp2(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3871 : = ( one - one_third * beta ) * a1(:,:)**2 * wpsclrp(:,:,sclr) * wprtp(:,:) * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3898 : sgn_t_vel_sclrprtp(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3917 : = ( one - one_third * beta ) * a1(:,:)**2 * wpsclrp(:,:,sclr) * wpthlp(:,:) * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3945 : sgn_t_vel_sclrpthlp(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xp2_xpyp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1326 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_zt_module.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has forbidden elements: .gt. . 71 : if (time.gt.80880_time_precision) then CLUBBStandardsCheck.pl WARNING: File has forbidden elements. ../src/Benchmark_cases/neutral_case.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 121 : result = smooth_min(4, 1, input, zero, min_max_smth_mag) ! Order of nz and ngrdcol is opposite to order of indexing! This is very unintuitive! CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 174 : ! Case 3: Make sure that on a large number of arbitrarily chosen points with small min_max_smth_mag, CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/smooth_min_max_tests.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1580 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), &! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1630 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), & ! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/pdf_parameter_tests.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. .......................................................................................................................................................................................................................................................................................................................................................................................................................................................................................CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 292 : z_i = lin_interpolate_two_points( 8.0e-3_core_rknd, rtm(k), rtm(k-1), gr%zt(1,k), gr%zt(1,k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/simple_rad_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 331 : press(i) = lin_interpolate_two_points( gr%zt(1,i), z(k), z(k-1), p_in_Pa(k), p_in_Pa(k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/sounding.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: 'use' statement w/o 'only' found in the following line: 6188 : use netcdf CLUBBStandardsCheck.pl WARNING: Use check FAILED! CLUBBStandardsCheck.pl WARNING: Check that comma is on same line as 'use', as CLUBB requires. ../src/clubb_driver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2469 : stats_zt, stats_zm, stats_sfc, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2475 : precip_fracs, & ! Intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3324 : ! em(k) = ( 0.15_core_rknd * (1.0_core_rknd - gr%zm(1,k)/150.0_core_rknd) ) / rho_zm(k) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/clubb_driver.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 452 : call stat_update_var( ixp3_dp, -(C_xp3_dissipation * invrs_tau_zt(i,:))*xp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xp3_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 352 : * ( K_zm(i,1) + nu(i) ) * rho_ds_zm(i,1) * gr%invrs_dzm(i,1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 356 : * ( K_zm(i,1) + nu(i) ) * rho_ds_zm(i,1) * gr%invrs_dzm(i,1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 407 : = + gr%invrs_dzt(i,k) * ( K_zt(i,k) + nu(i) ) * ( gr%invrs_dzm(i,k) + gr%invrs_dzm(i,k-1) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1003 : = + gr%invrs_dzm(i,k) * ( K_zm(i,k) + nu(i) ) * ( gr%invrs_dzt(i,k+1) + gr%invrs_dzt(i,k) ) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/diffusion.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules. CLUBBStandardsCheck.pl WARNING: Private Test failed! ../src/CLUBB_core/matrix_solver_wrapper.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 43 : ! low_1(2)*upper_1(1)+l_diag(2)*1 = lhs(0,2) => l_diag(2) = lhs(0,2) - low_1(2)*upper_1(1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 44 : ! low_1(2)*upper_2(1)+l_diag(2)*upper_1(2) = lhs(-1,2) => upper_1(2) = ( lhs(-1,2)-low_1(2)*upper_2(1) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 52 : ! l_2(k)*upper_1(k-2)+low_1(k)*1 = lhs(1,k) => low_1(k) = lhs(1,k) - l_2(k)*upper_1(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 53 : ! l_2(k)*upper_2(k-2)+low_1(k)*upper_1(k-1) = lhs( 0,k) => l_diag(k) = lhs(0,k) - l_2(k)*upper_2(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 54 : ! +l_diag(k)*1 + low_1(k)*upper_1(k-1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 56 : ! low_1(k)*upper_2(k-1)+l_diag(k)*upper_1(k) = lhs(-1,k) => upper_1(k) = ( lhs(-1,k) - low_1(k)*upper_2(k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/penta_lu_solver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 86 : real( kind = core_rknd ), dimension(ngrdcol,nz), intent(out) :: sigma_sqd_w ! PDF width parameter [-] CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/sigma_sqd_w_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 342 : call calc_coefs_wpxpyp_semiimpl( nz, wp2(i,:), rtp2(i,:), thlp2(i,:), wprtp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/new_pdf_main.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 719 : esat(i,k) = 10._core_rknd**(-7.90298_core_rknd*(373.16_core_rknd/T_in_K_clipped-1._core_rknd)+ & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/saturation.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 576 : a1_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, a1(:,:) ), zero_threshold ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_wp2_wp3_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1274 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1275 : ! for a plot on how output behaves with varying min_max_smth_mag CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1278 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1313 : ustar(i) = smooth_max( ( upwp_sfc(i)**2 + vpwp_sfc(i)**2 )**(one_fourth), ufmin, one * min_max_smth_mag) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1323 : sqrt( (ddzt( nz, ngrdcol, gr, um ))**2 & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1384 : one - zt2zm(nz, ngrdcol, gr, ice_supersat_frac) / 0.007_core_rknd, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1422 : * sqrt(em(i,k)) / ( gr%zm(i,k) - sfc_elevation(i) + z_displace ) ! small CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1431 : / smooth_max( nz, ngrdcol, 1.0e-7_core_rknd, brunt_vaisala_freq_sqd_smth, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1433 : 0.3_core_rknd, 0.3_core_rknd * min_max_smth_mag ), one, one * min_max_smth_mag ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1525 : tau_zm = smooth_min( nz, ngrdcol, one / invrs_tau_zm, tau_max_zm, 1.0e3_core_rknd * min_max_smth_mag ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1526 : tau_zt = smooth_min( nz, ngrdcol, zm2zt( nz, ngrdcol, gr, tau_zm ), tau_max_zt, 1.0e3_core_rknd * min_max_smth_mag ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/mixing_length.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 919 : write(iunit,*) "l_fix_w_chi_eta_correlations = ", clubb_config_flags%l_fix_w_chi_eta_correlations CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 936 : write(iunit,*) "l_use_tke_in_wp3_pr_turb_term = ", clubb_config_flags%l_use_tke_in_wp3_pr_turb_term CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/model_flags.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 493 : write(fstderr,*) "l_mono_flux_lim_rtm=T with l_mono_flux_lim_spikefix=F can lead to spikes aloft." CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 803 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 804 : Lscale(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 805 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 809 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 815 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 816 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 819 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 820 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 821 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 822 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 823 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 825 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1742 : call wpxp_terms_bp_pr3_rhs( nz, ngrdcol, gr, (one+C7_Skw_fnc), thv_ds_zm, xpthvp, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2646 : call xm_wpxp_rhs( nz, ngrdcol, gr, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3645 : call xm_wpxp_rhs( nz, ngrdcol, gr, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4522 : call xm_correction_wpxp_cl( nz, solve_type, dt, wpxp_chnge(i,:), gr%invrs_dzt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xm_wpxp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1229 : um_col, vm_col, upwp_col, vpwp_col, up2_col, vp2_col, up3_col, vp3_col, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1231 : wp2_col, wp3_col, rtp2_col, rtp3_col, thlp2_col, thlp3_col, rtpthlp_col, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2110 : field ) ! intent(inout) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/clubb_api_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 506 : call calc_xp2_xpyp_ta_terms( nz, ngrdcol, gr, wprtp, wprtp2, wpthlp, wpthlp2, wprtpthlp, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 558 : call solve_xp2_xpyp_with_multiple_lhs( nz, ngrdcol, gr, C2rt_1d, C2thl_1d, C2rtthl_1d, C2sclr_1d, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 597 : lhs_dp1(i,k) = lhs_dp1(i,k) + term_dp1_lhs( C14_1d(i,k), invrs_tau_C14_zm(i,k) ) * gamma_over_implicit_ts CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1202 : subroutine solve_xp2_xpyp_with_single_lhs( nz, ngrdcol, gr, C2x, invrs_tau_xp2_zm, rtm, thlm, wprtp, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1459 : sclrprtp(:,:,:) = one_half * ( sclrprtp(:,:,:) + solution(:,:,3+sclr_dim+1:3+2*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1460 : sclrpthlp(:,:,:) = one_half * ( sclrpthlp(:,:,:) + solution(:,:,3+2*sclr_dim+1:3+3*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1502 : subroutine solve_xp2_xpyp_with_multiple_lhs( nz, ngrdcol, gr, C2rt_1d, C2thl_1d, C2rtthl_1d, C2sclr_1d, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1761 : lhs_dp1(i,k) = term_dp1_lhs( C2rtthl_1d(i,k), invrs_tau_xp2_zm(i,k) ) * gamma_over_implicit_ts CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1805 : lhs_dp1(i,k) = term_dp1_lhs( C2sclr_1d(i,k), invrs_tau_xp2_zm(i,k) ) * gamma_over_implicit_ts CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2002 : sclrprtp(:,:,:) = one_half * ( sclrprtp(:,:,:) + sclr_solution(:,:,sclr_dim+1:2*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2003 : sclrpthlp(:,:,:) = one_half * ( sclrpthlp(:,:,:) + sclr_solution(:,:,2*sclr_dim+1:3*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2229 : real( kind = core_rknd ), dimension(ngrdcol) :: rcond ! Est. of the reciprocal of the condition # on the matrix CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2692 : rhs(i,k) = rhs(i,k) + ( one - C_uu_shr ) * term_tp( xam(i,k+1), xam(i,k), xam(i,k+1), xam(i,k), & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3585 : sgn_t_vel_sclrpthlp(:,:) = sign(one,term_wpthlpsclrp_explicit_zm(:,:)*sclrpthlp(:,:,sclr)) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3651 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3679 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wprtp_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3682 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wpthlp_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3685 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wprtp_zt(:,:) * wpthlp_zt(:,:) * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3719 : sgn_t_vel_rtp2(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3757 : sgn_t_vel_thlp2(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3773 : = ( one - one_third * beta ) * a1(:,:)**2 * wprtp(:,:) * wpthlp(:,:) * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3796 : sgn_t_vel_rtpthlp(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3824 : = ( one - one_third * beta ) * a1(:,:)**2 * wpsclrp(:,:,sclr)**2 * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3831 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wpsclrp_zt(:,:,sclr)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3852 : sgn_t_vel_sclrp2(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3871 : = ( one - one_third * beta ) * a1(:,:)**2 * wpsclrp(:,:,sclr) * wprtp(:,:) * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3898 : sgn_t_vel_sclrprtp(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3917 : = ( one - one_third * beta ) * a1(:,:)**2 * wpsclrp(:,:,sclr) * wpthlp(:,:) * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3945 : sgn_t_vel_sclrpthlp(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xp2_xpyp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 913 : ( nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 914 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 915 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 916 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 917 : thv_ds_zm(i,:), thv_ds_zt(i,:), wpthlp_sfc(i), wprtp_sfc(i), upwp_sfc(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 918 : vpwp_sfc(i), um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 919 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 920 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 923 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 924 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1228 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1229 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1455 : call calc_sfc_varnce( upwp_sfc(i), vpwp_sfc(i), wpthlp_sfc(i), wprtp_sfc(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1456 : um(i,2), vm(i,2), Lscale_up(i,2), wpsclrp_sfc(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1674 : stats_zm, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1697 : call advance_xm_wpxp( nz, ngrdcol, gr, dt_advance, sigma_sqd_w, wm_zm, wm_zt, wp2, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1761 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2130 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2131 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2424 : um(i,:), vm(i,:), upwp(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2425 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2426 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2427 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2428 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2429 : rho_ds_zm(i,:), rho_ds_zt(i,:), thv_ds_zm(i,:), thv_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2430 : wm_zt(i,:), wm_zm(i,:), rcm(i,:), wprcp(i,:), rc_coef(i,:), rc_coef_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2431 : rcm_zm(i,:), rtm_zm(i,:), thlm_zm(i,:), cloud_frac(i,:), ice_supersat_frac(i,:),& ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2434 : thvm(i,:), ug(i,:), vg(i,:), Lscale(i,:), wpthlp2(i,:), wp2thlp(i,:), wprtp2(i,:), wp2rtp(i,:),& ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2435 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2436 : wprtpthlp(i,:), sigma_sqd_w_zt(i,:), rsat(i,:), wp2_zt(i,:), thlp2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2437 : wpthlp_zt(i,:), wprtp_zt(i,:), rtp2_zt(i,:), rtpthlp_zt(i,:), up2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2438 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2441 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2442 : wp3_zm(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), Skw_velocity(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2445 : pdf_params_single_col(i), pdf_params_zm_single_col(i), sclrm(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2446 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2447 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2448 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2456 : nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2457 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2458 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2459 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2460 : thv_ds_zm(i,:), thv_ds_zt(i,:), wpthlp_sfc(i), wprtp_sfc(i), upwp_sfc(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2461 : vpwp_sfc(i), um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2462 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2463 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2466 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2467 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3046 : wp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, wp2(:,:) ), w_tol_sqd ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3048 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3050 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3052 : up2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, up2(:,:) ), w_tol_sqd ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3054 : vp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, vp2(:,:) ), w_tol_sqd ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3058 : sclrp2_zt(:,:,j) = max( zm2zt( nz, ngrdcol, gr, sclrp2(:,:,j) ), sclr_tol(j)**2 ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3188 : sigma_sqd_w_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, sigma_sqd_w(:,:) ), zero_threshold ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3195 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3196 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3197 : up2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, up2(:,:) ), w_tol_sqd ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3198 : vp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, vp2(:,:) ), w_tol_sqd ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3222 : sclrp2_zt(:,:,j) = max( zm2zt( nz, ngrdcol, gr, sclrp2(:,:,j) ), sclr_tol(j)**2 ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3433 : rcp2(:,:) = max( zt2zm( nz, ngrdcol, gr, rcp2_zt(:,:) ), zero_threshold ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_clubb_core_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 239 : real( kind = core_rknd ), dimension(ngrdcol, nz, min(1,sclr_dim), 2 ), intent(in) :: & ! h1g, 2010-06-15 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 576 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 577 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 607 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 608 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 619 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 620 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 969 : pdf_params%rsatl_1(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl1(i,:) ) * RH_crit(i, :, 1, 1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 984 : pdf_params%rsatl_2(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl2(i,:) ) * RH_crit(i, :, 1, 2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1097 : rcm(i,k) = pdf_params%mixt_frac(i,k) * pdf_params%rc_1(i,k) + ( one - pdf_params%mixt_frac(i,k) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1276 : - ( one - pdf_params%mixt_frac(i,:) ) * corr_sclr_thl_2(i,:,j) * pdf_params%cthl_2(i,:) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/pdf_closure_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2300 : integer :: grid_level = 1 ! grid level for stats where there is only one sensible level (eg timeseries) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2856 : write(fstderr, *) "Warning: tot_vartn_normlzd_thlm tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2869 : write(fstderr, *) "Warning: tot_vartn_normlzd_wprtp tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_clubb_utilities.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1326 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_zt_module.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has forbidden elements: .gt. . 71 : if (time.gt.80880_time_precision) then CLUBBStandardsCheck.pl WARNING: File has forbidden elements. ../src/Benchmark_cases/neutral_case.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 121 : result = smooth_min(4, 1, input, zero, min_max_smth_mag) ! Order of nz and ngrdcol is opposite to order of indexing! This is very unintuitive! CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 174 : ! Case 3: Make sure that on a large number of arbitrarily chosen points with small min_max_smth_mag, CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/smooth_min_max_tests.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1580 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), &! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1630 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), & ! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/pdf_parameter_tests.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. Directory 1 is /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/985d68817941185e26f11a232e6214e1d80b9f13. Directory 2 is /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/61b4a67e170bc2243263ac19fb90b24f5a1e455b. Diffing arm netCDF (*.nc) files Diffing arm_97 netCDF (*.nc) files Diffing atex netCDF (*.nc) files Diffing bomex netCDF (*.nc) files Diffing dycoms2_rf01 netCDF (*.nc) files Diffing dycoms2_rf02_ds netCDF (*.nc) files Diffing gabls3_night netCDF (*.nc) files Diffing lba netCDF (*.nc) files Diffing rico netCDF (*.nc) files Diffing twp_ice netCDF (*.nc) files Diffing wangara netCDF (*.nc) files There were no differences detected! ......................................................................................................................................................................................................................................................................................................................................................................................................................................................................................./home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4487:47: 4487 | call calc_trapezoid_zm( nz, ngrdcol, gr, wpthvp, wpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4490:47: 4490 | call calc_trapezoid_zm( nz, ngrdcol, gr, thlpthvp, thlpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4493:47: 4493 | call calc_trapezoid_zm( nz, ngrdcol, gr, rtpthvp, rtpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4799:41: 4799 | subroutine clip_rcm ( nz, ngrdcol, gr, rtm, & ! intent(in) | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4329:18: 4329 | integer :: i, k, sclr | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4329:21: 4329 | integer :: i, k, sclr | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:3607:40: 3607 | l_prescribed_avg_deltaz, & ! intent(in) | 1 Warning: Unused dummy argument ‘l_prescribed_avg_deltaz’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:3594:22: 3594 | ( nzmax, T0_in, ts_nudge_in, & ! intent(in) | 1 Warning: Unused dummy argument ‘nzmax’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:140:23: 140 | hydromet, & ! Unused | 1 Warning: Unused dummy argument ‘hydromet’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:193:8: 193 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘num_hf_draw_points’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo/compile/../src/CLUBB_core/clubb_api_module.F90:1069:16: 1069 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] ../src/morrison_microphys_module.F90:1331:13: 1331 | .or. is_nan_2d( real( rim_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1332:13: 1332 | .or. is_nan_2d( real( rsm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1333:13: 1333 | .or. is_nan_2d( real( rrm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1334:13: 1334 | .or. is_nan_2d( real( rgm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1335:13: 1335 | .or. is_nan_2d( real( Ncm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1336:13: 1336 | .or. is_nan_2d( real( Nim_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1337:13: 1337 | .or. is_nan_2d( real( Nsm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1338:13: 1338 | .or. is_nan_2d( real( Nrm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1339:13: 1339 | .or. is_nan_2d( real( Ngm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1340:13: 1340 | .or. is_nan_2d( real( rvm_mc_r4, kind=core_rknd ) ) & | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/morrison_microphys_module.F90:1341:13: 1341 | .or. is_nan_2d( real( T_in_K_mc, kind=core_rknd ) ) ) then | 1 Warning: Impure function ‘is_nan_2d’ at (1) might not be evaluated [-Wfunction-elimination] ../src/clubb_driver.F90:6067:39: 6067 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in) | 1 Warning: Unused dummy argument ‘lmin’ at (1) [-Wunused-dummy-argument] ../src/clubb_driver.F90:6067:33: 6067 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in) | 1 Warning: Unused dummy argument ‘nu_vert_res_dep’ at (1) [-Wunused-dummy-argument] ../src/G_unit_tests.F90:176:13: 176 | stats_sfc | 1 Warning: Unused variable ‘stats_sfc’ declared at (1) [-Wunused-variable] ../src/G_unit_tests.F90:175:12: 175 | stats_zm, & | 1 Warning: Unused variable ‘stats_zm’ declared at (1) [-Wunused-variable] ../src/G_unit_tests.F90:174:12: 174 | stats_zt, & | 1 Warning: Unused variable ‘stats_zt’ declared at (1) [-Wunused-variable] CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 292 : z_i = lin_interpolate_two_points( 8.0e-3_core_rknd, rtm(k), rtm(k-1), gr%zt(1,k), gr%zt(1,k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/simple_rad_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 331 : press(i) = lin_interpolate_two_points( gr%zt(1,i), z(k), z(k-1), p_in_Pa(k), p_in_Pa(k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/sounding.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: 'use' statement w/o 'only' found in the following line: 6188 : use netcdf CLUBBStandardsCheck.pl WARNING: Use check FAILED! CLUBBStandardsCheck.pl WARNING: Check that comma is on same line as 'use', as CLUBB requires. ../src/clubb_driver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2469 : stats_zt, stats_zm, stats_sfc, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2475 : precip_fracs, & ! Intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3324 : ! em(k) = ( 0.15_core_rknd * (1.0_core_rknd - gr%zm(1,k)/150.0_core_rknd) ) / rho_zm(k) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/clubb_driver.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 452 : call stat_update_var( ixp3_dp, -(C_xp3_dissipation * invrs_tau_zt(i,:))*xp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xp3_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 352 : * ( K_zm(i,1) + nu(i) ) * rho_ds_zm(i,1) * gr%invrs_dzm(i,1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 356 : * ( K_zm(i,1) + nu(i) ) * rho_ds_zm(i,1) * gr%invrs_dzm(i,1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 407 : = + gr%invrs_dzt(i,k) * ( K_zt(i,k) + nu(i) ) * ( gr%invrs_dzm(i,k) + gr%invrs_dzm(i,k-1) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1003 : = + gr%invrs_dzm(i,k) * ( K_zm(i,k) + nu(i) ) * ( gr%invrs_dzt(i,k+1) + gr%invrs_dzt(i,k) ) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/diffusion.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules. CLUBBStandardsCheck.pl WARNING: Private Test failed! ../src/CLUBB_core/matrix_solver_wrapper.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 43 : ! low_1(2)*upper_1(1)+l_diag(2)*1 = lhs(0,2) => l_diag(2) = lhs(0,2) - low_1(2)*upper_1(1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 44 : ! low_1(2)*upper_2(1)+l_diag(2)*upper_1(2) = lhs(-1,2) => upper_1(2) = ( lhs(-1,2)-low_1(2)*upper_2(1) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 52 : ! l_2(k)*upper_1(k-2)+low_1(k)*1 = lhs(1,k) => low_1(k) = lhs(1,k) - l_2(k)*upper_1(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 53 : ! l_2(k)*upper_2(k-2)+low_1(k)*upper_1(k-1) = lhs( 0,k) => l_diag(k) = lhs(0,k) - l_2(k)*upper_2(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 54 : ! +l_diag(k)*1 + low_1(k)*upper_1(k-1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 56 : ! low_1(k)*upper_2(k-1)+l_diag(k)*upper_1(k) = lhs(-1,k) => upper_1(k) = ( lhs(-1,k) - low_1(k)*upper_2(k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/penta_lu_solver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 86 : real( kind = core_rknd ), dimension(ngrdcol,nz), intent(out) :: sigma_sqd_w ! PDF width parameter [-] CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/sigma_sqd_w_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 342 : call calc_coefs_wpxpyp_semiimpl( nz, wp2(i,:), rtp2(i,:), thlp2(i,:), wprtp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/new_pdf_main.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 919 : write(iunit,*) "l_fix_w_chi_eta_correlations = ", clubb_config_flags%l_fix_w_chi_eta_correlations CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 936 : write(iunit,*) "l_use_tke_in_wp3_pr_turb_term = ", clubb_config_flags%l_use_tke_in_wp3_pr_turb_term CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/model_flags.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 719 : esat(i,k) = 10._core_rknd**(-7.90298_core_rknd*(373.16_core_rknd/T_in_K_clipped-1._core_rknd)+ & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/saturation.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1274 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1275 : ! for a plot on how output behaves with varying min_max_smth_mag CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1278 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1313 : ustar(i) = smooth_max( ( upwp_sfc(i)**2 + vpwp_sfc(i)**2 )**(one_fourth), ufmin, one * min_max_smth_mag) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1323 : sqrt( (ddzt( nz, ngrdcol, gr, um ))**2 & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1388 : one - zt2zm(nz, ngrdcol, gr, ice_supersat_frac) / 0.007_core_rknd, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1426 : * sqrt(em(i,k)) / ( gr%zm(i,k) - sfc_elevation(i) + z_displace ) ! small CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1435 : / smooth_max( nz, ngrdcol, 1.0e-7_core_rknd, brunt_vaisala_freq_sqd_smth, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1437 : 0.3_core_rknd, 0.3_core_rknd * min_max_smth_mag ), one, one * min_max_smth_mag ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1529 : tau_zm = smooth_min( nz, ngrdcol, one / invrs_tau_zm, tau_max_zm, 1.0e3_core_rknd * min_max_smth_mag ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1530 : tau_zt = smooth_min( nz, ngrdcol, zm2zt( nz, ngrdcol, gr, tau_zm ), tau_max_zt, 1.0e3_core_rknd * min_max_smth_mag ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/mixing_length.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 576 : a1_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, a1(:,:) ), zero_threshold ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_wp2_wp3_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 493 : write(fstderr,*) "l_mono_flux_lim_rtm=T with l_mono_flux_lim_spikefix=F can lead to spikes aloft." CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 803 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 804 : Lscale(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 805 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 809 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 815 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 816 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 819 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 820 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 821 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 822 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 823 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 825 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1742 : call wpxp_terms_bp_pr3_rhs( nz, ngrdcol, gr, (one+C7_Skw_fnc), thv_ds_zm, xpthvp, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2646 : call xm_wpxp_rhs( nz, ngrdcol, gr, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3645 : call xm_wpxp_rhs( nz, ngrdcol, gr, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4522 : call xm_correction_wpxp_cl( nz, solve_type, dt, wpxp_chnge(i,:), gr%invrs_dzt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xm_wpxp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2300 : integer :: grid_level = 1 ! grid level for stats where there is only one sensible level (eg timeseries) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2856 : write(fstderr, *) "Warning: tot_vartn_normlzd_thlm tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2869 : write(fstderr, *) "Warning: tot_vartn_normlzd_wprtp tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_clubb_utilities.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 913 : ( nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 914 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 915 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 916 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 917 : thv_ds_zm(i,:), thv_ds_zt(i,:), wpthlp_sfc(i), wprtp_sfc(i), upwp_sfc(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 918 : vpwp_sfc(i), um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 919 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 920 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 923 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 924 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1228 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1229 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1455 : call calc_sfc_varnce( upwp_sfc(i), vpwp_sfc(i), wpthlp_sfc(i), wprtp_sfc(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1456 : um(i,2), vm(i,2), Lscale_up(i,2), wpsclrp_sfc(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1674 : stats_zm, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1697 : call advance_xm_wpxp( nz, ngrdcol, gr, dt_advance, sigma_sqd_w, wm_zm, wm_zt, wp2, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1761 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2130 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2131 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2424 : um(i,:), vm(i,:), upwp(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2425 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2426 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2427 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2428 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2429 : rho_ds_zm(i,:), rho_ds_zt(i,:), thv_ds_zm(i,:), thv_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2430 : wm_zt(i,:), wm_zm(i,:), rcm(i,:), wprcp(i,:), rc_coef(i,:), rc_coef_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2431 : rcm_zm(i,:), rtm_zm(i,:), thlm_zm(i,:), cloud_frac(i,:), ice_supersat_frac(i,:),& ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2434 : thvm(i,:), ug(i,:), vg(i,:), Lscale(i,:), wpthlp2(i,:), wp2thlp(i,:), wprtp2(i,:), wp2rtp(i,:),& ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2435 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2436 : wprtpthlp(i,:), sigma_sqd_w_zt(i,:), rsat(i,:), wp2_zt(i,:), thlp2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2437 : wpthlp_zt(i,:), wprtp_zt(i,:), rtp2_zt(i,:), rtpthlp_zt(i,:), up2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2438 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2441 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2442 : wp3_zm(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), Skw_velocity(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2445 : pdf_params_single_col(i), pdf_params_zm_single_col(i), sclrm(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2446 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2447 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2448 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2456 : nz, thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2457 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2458 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2459 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2460 : thv_ds_zm(i,:), thv_ds_zt(i,:), wpthlp_sfc(i), wprtp_sfc(i), upwp_sfc(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2461 : vpwp_sfc(i), um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), up2(i,:), vp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2462 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2463 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2466 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2467 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3046 : wp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, wp2(:,:) ), w_tol_sqd ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3048 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3050 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3052 : up2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, up2(:,:) ), w_tol_sqd ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3054 : vp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, vp2(:,:) ), w_tol_sqd ) ! Positive definite quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3058 : sclrp2_zt(:,:,j) = max( zm2zt( nz, ngrdcol, gr, sclrp2(:,:,j) ), sclr_tol(j)**2 ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3188 : sigma_sqd_w_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, sigma_sqd_w(:,:) ), zero_threshold ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3195 : rtp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, rtp2(:,:) ), rt_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3196 : thlp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, thlp2(:,:) ), thl_tol**2 ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3197 : up2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, up2(:,:) ), w_tol_sqd ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3198 : vp2_zt(:,:) = max( zm2zt( nz, ngrdcol, gr, vp2(:,:) ), w_tol_sqd ) ! Positive def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3222 : sclrp2_zt(:,:,j) = max( zm2zt( nz, ngrdcol, gr, sclrp2(:,:,j) ), sclr_tol(j)**2 ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3433 : rcp2(:,:) = max( zt2zm( nz, ngrdcol, gr, rcp2_zt(:,:) ), zero_threshold ) ! Pos. def. quantity CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_clubb_core_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1229 : um_col, vm_col, upwp_col, vpwp_col, up2_col, vp2_col, up3_col, vp3_col, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1231 : wp2_col, wp3_col, rtp2_col, rtp3_col, thlp2_col, thlp3_col, rtpthlp_col, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2110 : field ) ! intent(inout) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/clubb_api_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 239 : real( kind = core_rknd ), dimension(ngrdcol, nz, min(1,sclr_dim), 2 ), intent(in) :: & ! h1g, 2010-06-15 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 576 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 577 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 607 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 608 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 619 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 620 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 969 : pdf_params%rsatl_1(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl1(i,:) ) * RH_crit(i, :, 1, 1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 984 : pdf_params%rsatl_2(i,:) = sat_mixrat_ice( nz, p_in_Pa(i,:), tl2(i,:) ) * RH_crit(i, :, 1, 2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1097 : rcm(i,k) = pdf_params%mixt_frac(i,k) * pdf_params%rc_1(i,k) + ( one - pdf_params%mixt_frac(i,k) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1276 : - ( one - pdf_params%mixt_frac(i,:) ) * corr_sclr_thl_2(i,:,j) * pdf_params%cthl_2(i,:) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/pdf_closure_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 506 : call calc_xp2_xpyp_ta_terms( nz, ngrdcol, gr, wprtp, wprtp2, wpthlp, wpthlp2, wprtpthlp, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 558 : call solve_xp2_xpyp_with_multiple_lhs( nz, ngrdcol, gr, C2rt_1d, C2thl_1d, C2rtthl_1d, C2sclr_1d, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 597 : lhs_dp1(i,k) = lhs_dp1(i,k) + term_dp1_lhs( C14_1d(i,k), invrs_tau_C14_zm(i,k) ) * gamma_over_implicit_ts CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1202 : subroutine solve_xp2_xpyp_with_single_lhs( nz, ngrdcol, gr, C2x, invrs_tau_xp2_zm, rtm, thlm, wprtp, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1459 : sclrprtp(:,:,:) = one_half * ( sclrprtp(:,:,:) + solution(:,:,3+sclr_dim+1:3+2*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1460 : sclrpthlp(:,:,:) = one_half * ( sclrpthlp(:,:,:) + solution(:,:,3+2*sclr_dim+1:3+3*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1502 : subroutine solve_xp2_xpyp_with_multiple_lhs( nz, ngrdcol, gr, C2rt_1d, C2thl_1d, C2rtthl_1d, C2sclr_1d, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1761 : lhs_dp1(i,k) = term_dp1_lhs( C2rtthl_1d(i,k), invrs_tau_xp2_zm(i,k) ) * gamma_over_implicit_ts CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1805 : lhs_dp1(i,k) = term_dp1_lhs( C2sclr_1d(i,k), invrs_tau_xp2_zm(i,k) ) * gamma_over_implicit_ts CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2002 : sclrprtp(:,:,:) = one_half * ( sclrprtp(:,:,:) + sclr_solution(:,:,sclr_dim+1:2*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2003 : sclrpthlp(:,:,:) = one_half * ( sclrpthlp(:,:,:) + sclr_solution(:,:,2*sclr_dim+1:3*sclr_dim) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2229 : real( kind = core_rknd ), dimension(ngrdcol) :: rcond ! Est. of the reciprocal of the condition # on the matrix CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2692 : rhs(i,k) = rhs(i,k) + ( one - C_uu_shr ) * term_tp( xam(i,k+1), xam(i,k), xam(i,k+1), xam(i,k), & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3585 : sgn_t_vel_sclrpthlp(:,:) = sign(one,term_wpthlpsclrp_explicit_zm(:,:)*sclrpthlp(:,:,sclr)) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3651 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3679 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wprtp_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3682 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wpthlp_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3685 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wprtp_zt(:,:) * wpthlp_zt(:,:) * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3719 : sgn_t_vel_rtp2(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3757 : sgn_t_vel_thlp2(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3773 : = ( one - one_third * beta ) * a1(:,:)**2 * wprtp(:,:) * wpthlp(:,:) * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3796 : sgn_t_vel_rtpthlp(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3824 : = ( one - one_third * beta ) * a1(:,:)**2 * wpsclrp(:,:,sclr)**2 * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3831 : = ( one - one_third * beta ) * a1_zt(:,:)**2 * wpsclrp_zt(:,:,sclr)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3852 : sgn_t_vel_sclrp2(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3871 : = ( one - one_third * beta ) * a1(:,:)**2 * wpsclrp(:,:,sclr) * wprtp(:,:) * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3898 : sgn_t_vel_sclrprtp(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3917 : = ( one - one_third * beta ) * a1(:,:)**2 * wpsclrp(:,:,sclr) * wpthlp(:,:) * wp3_on_wp2(:,:) / wp2(:,:) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3945 : sgn_t_vel_sclrpthlp(:,:) = ( one - one_third * beta ) * a1_zt(:,:)**2 * wp3_on_wp2_zt(:,:) / wp2_zt(:,:) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xp2_xpyp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1326 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_zt_module.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has forbidden elements: .gt. . 71 : if (time.gt.80880_time_precision) then CLUBBStandardsCheck.pl WARNING: File has forbidden elements. ../src/Benchmark_cases/neutral_case.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 121 : result = smooth_min(4, 1, input, zero, min_max_smth_mag) ! Order of nz and ngrdcol is opposite to order of indexing! This is very unintuitive! CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 174 : ! Case 3: Make sure that on a large number of arbitrarily chosen points with small min_max_smth_mag, CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/smooth_min_max_tests.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1580 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), &! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1630 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), & ! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/pdf_parameter_tests.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. Directory 1 is /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2. Directory 2 is /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/985d68817941185e26f11a232e6214e1d80b9f13. Diffing arm netCDF (*.nc) files *** Differences detected in arm_zt.nc! *** *** Differences detected in arm_zm.nc! *** *** Differences detected in arm_sfc.nc! *** Diffing arm_97 netCDF (*.nc) files *** Differences detected in arm_97_zt.nc! *** *** Differences detected in arm_97_zm.nc! *** *** Differences detected in arm_97_sfc.nc! *** Diffing atex netCDF (*.nc) files *** Differences detected in atex_zt.nc! *** *** Differences detected in atex_zm.nc! *** *** Differences detected in atex_sfc.nc! *** Diffing bomex netCDF (*.nc) files *** Differences detected in bomex_zt.nc! *** *** Differences detected in bomex_zm.nc! *** *** Differences detected in bomex_sfc.nc! *** Diffing dycoms2_rf01 netCDF (*.nc) files *** Differences detected in dycoms2_rf01_zt.nc! *** *** Differences detected in dycoms2_rf01_zm.nc! *** *** Differences detected in dycoms2_rf01_sfc.nc! *** Diffing dycoms2_rf02_ds netCDF (*.nc) files *** Differences detected in dycoms2_rf02_ds_zt.nc! *** *** Differences detected in dycoms2_rf02_ds_zm.nc! *** *** Differences detected in dycoms2_rf02_ds_sfc.nc! *** Diffing gabls3_night netCDF (*.nc) files *** Differences detected in gabls3_night_zt.nc! *** *** Differences detected in gabls3_night_zm.nc! *** *** Differences detected in gabls3_night_sfc.nc! *** Diffing lba netCDF (*.nc) files *** Differences detected in lba_zt.nc! *** *** Differences detected in lba_zm.nc! *** *** Differences detected in lba_sfc.nc! *** Diffing rico netCDF (*.nc) files *** Differences detected in rico_zt.nc! *** *** Differences detected in rico_zm.nc! *** *** Differences detected in rico_sfc.nc! *** Diffing twp_ice netCDF (*.nc) files *** Differences detected in twp_ice_zt.nc! *** *** Differences detected in twp_ice_zm.nc! *** *** Differences detected in twp_ice_sfc.nc! *** Diffing wangara netCDF (*.nc) files *** Differences detected in wangara_zt.nc! *** *** Differences detected in wangara_zm.nc! *** *** Differences detected in wangara_sfc.nc! *** There were some differences detected! There were differences detected in netCDF (*.nc) files. =============================== Configuring Test =============================== Working directory set to: . Trying to clone repo... Cloned repo location: /home/jenkins/workspace/clubb_bin_diff_regression_e3sm_flags_gfortran/repo Output Save Mode: none Using branch: master Making list from 'UnresolvedCommits': Run Output Path: repo/output Run commands: ['repo/compile/compile.bash', '\nrm -rf repo/output', 'mkdir repo/output', '\nmv repo/input/tunable_parameters_e3sm/configurable_model_flags.in repo/input/tunable_parameters', '\nrepo/run_scripts/run_scm_all.bash --min-cases'] Diffing command: repo/run_scripts/run_bindiff_all.bash =============================== Running Test =============================== Parsing message from commit: 216528613a53b626f93c97867ec2b69bb7ba9da1 Parsing message from commit: 985d68817941185e26f11a232e6214e1d80b9f13 Parsing message from commit: c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2 Found: BIT_CHANGING Checking Commit: 216528613a53b626f93c97867ec2b69bb7ba9da1 Skipping: not final commit and not labelled BIT_CHANGING Checking Commit: 985d68817941185e26f11a232e6214e1d80b9f13 Skipping: not final commit and not labelled BIT_CHANGING Checking Commit: c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2 Checking out 985d68817941185e26f11a232e6214e1d80b9f13 Running: 'repo/compile/compile.bash' Running: ' rm -rf repo/output' Running: 'mkdir repo/output' Running: ' mv repo/input/tunable_parameters_e3sm/configurable_model_flags.in repo/input/tunable_parameters' Running: ' repo/run_scripts/run_scm_all.bash --min-cases' Checking out 61b4a67e170bc2243263ac19fb90b24f5a1e455b Running: 'repo/compile/compile.bash' Running: ' rm -rf repo/output' Running: 'mkdir repo/output' Running: ' mv repo/input/tunable_parameters_e3sm/configurable_model_flags.in repo/input/tunable_parameters' Running: ' repo/run_scripts/run_scm_all.bash --min-cases' Diffing: 'repo/run_scripts/run_bindiff_all.bash 985d68817941185e26f11a232e6214e1d80b9f13 61b4a67e170bc2243263ac19fb90b24f5a1e455b' Checking out c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2 Running: 'repo/compile/compile.bash' Running: ' rm -rf repo/output' Running: 'mkdir repo/output' Running: ' mv repo/input/tunable_parameters_e3sm/configurable_model_flags.in repo/input/tunable_parameters' Running: ' repo/run_scripts/run_scm_all.bash --min-cases' Output from 985d68817941185e26f11a232e6214e1d80b9f13 already saved Diffing: 'repo/run_scripts/run_bindiff_all.bash c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2 985d68817941185e26f11a232e6214e1d80b9f13' Commit 'c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2' is BIT_CHANGING and properly labelled as such. =============================== Test Results =============================== Commit Range Checked = 61b4a67e170bc2243263ac19fb90b24f5a1e455b...c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2 No new Unresolved commits found. No fake BIT_CHANGING commits found. No remaining Unresolved Commits. =============================== Updating Config File =============================== Saving into UnresolvedCommits: Saving into BaselineCommit: c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2 =============================== Cleanup =============================== Removed repo. Removing all generated output REMOVING: 61b4a67e170bc2243263ac19fb90b24f5a1e455b REMOVING: 985d68817941185e26f11a232e6214e1d80b9f13 REMOVING: c50ab36d29f7c3cdbadbfa6cfa5cf935451e26a2 ================== Unresolved Commit Status ================== No remaining Unresolved Commits. Exiting with code: 0 [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