![[Jenkins]](/jenkins/static/57c8a776/images/svgs/logo.svg){kind=logo}
Started by an SCM change Obtained jenkins_tests/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/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_backwards_compatibility_gfortran_test [Pipeline] { [Pipeline] stage [Pipeline] { (Declarative: Checkout SCM) [Pipeline] checkout The recommended git tool is: git Cloning the remote Git repository Cloning repository https://github.com/larson-group/clubb.git > git init /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test # timeout=10 Fetching upstream changes from https://github.com/larson-group/clubb.git > git --version # timeout=10 > git --version # 'git version 2.34.1' 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 config remote.origin.url https://github.com/larson-group/clubb.git # timeout=10 > git config --add remote.origin.fetch +refs/heads/*:refs/remotes/origin/* # timeout=10 Avoid second fetch > git rev-parse refs/remotes/origin/master^{commit} # timeout=10 Checking out Revision 9136bf065fe59e64db24c8a3f2aeee7178450273 (refs/remotes/origin/master) > git config core.sparsecheckout # timeout=10 > git checkout -f 9136bf065fe59e64db24c8a3f2aeee7178450273 # timeout=10 Commit message: "I'm changing the way ddzt handles the derivative over momentum level 1. Previously, it was based on the differential between the ghost point and the first level above the surface. Now, the value of the derivative at momentum level 2 is simply being dropped down to momentum level 1." > git rev-list --no-walk 3d364fec45434074a7d9d1815861b4ff8d6df674 # timeout=10 [Pipeline] } [Pipeline] // stage [Pipeline] withEnv [Pipeline] { [Pipeline] stage [Pipeline] { (Clone SysAdmin to tmp) [Pipeline] sh + rm -rf /home/jenkins/clubb_bin_diff_regression_backwards_compatibility_gfortran_test_workspace/sys_admin + git clone https://github.com/larson-group/sys_admin.git /home/jenkins/clubb_bin_diff_regression_backwards_compatibility_gfortran_test_workspace/sys_admin Cloning into '/home/jenkins/clubb_bin_diff_regression_backwards_compatibility_gfortran_test_workspace/sys_admin'... [Pipeline] } [Pipeline] // stage [Pipeline] stage [Pipeline] { (Run Python Test) [Pipeline] sh + python3 /home/jenkins/clubb_bin_diff_regression_backwards_compatibility_gfortran_test_workspace/sys_admin/python_nightly_test_suite/run_test.py -c /home/jenkins/clubb_bin_diff_regression_backwards_compatibility_gfortran_test_workspace/bit_diff_clubb_bc_r8092_config ......................................................................................................................................................................................................................................................................................................................................................................................................................................................................................../home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/penta_lu_solver.F90:131:22: 131 | integer :: i, k, j ! Loop variables | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_gfdlact.a /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/lapack_wrap.F90:239:16: 239 | subd, diag, supd | 1 Warning: Unused variable ‘diag’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/lapack_wrap.F90:239:10: 239 | subd, diag, supd | 1 Warning: Unused variable ‘subd’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/lapack_wrap.F90:239:22: 239 | subd, diag, supd | 1 Warning: Unused variable ‘supd’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/saturation.F90:1378:10: 1378 | rsat | 1 Warning: Unused variable ‘rsat’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/saturation.F90:854:8: 854 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/saturation.F90:882:16: 882 | integer :: i, k ! Loop indices | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/saturation.F90:882:19: 882 | integer :: i, k ! Loop indices | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/saturation.F90:1078:32: 1078 | subroutine sat_vapor_press_ice( nz, ngrdcol, T_in_K, saturation_formula, & | ^ Warning: ‘sat_vapor_press_ice’ defined but not used [-Wunused-function] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:2243:8: 2243 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1893:38: 1893 | real( kind = core_rknd ) :: factor | 1 Warning: Unused variable ‘factor’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1360:8: 1360 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1356:8: 1356 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1356:8: 1356 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1312:8: 1312 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1308:8: 1308 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1308:8: 1308 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1208:8: 1208 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1204:8: 1204 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1204:8: 1204 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1162:8: 1162 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1158:8: 1158 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1158:8: 1158 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:546:16: 546 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:438:16: 438 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:224:16: 224 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:167:24: 167 | old_soln, & ! Intent(in) | 1 Warning: Unused dummy argument ‘old_soln’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:165:26: 165 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:106:16: 106 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:50:24: 50 | old_soln, & ! Intent(in) | 1 Warning: Unused dummy argument ‘old_soln’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/matrix_solver_wrapper.F90:48:26: 48 | 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_backwards_compatibility_gfortran_test/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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp3_module.F90:119:16: 119 | integer :: i, k, sclr ! Loop index | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp3_module.F90:119:19: 119 | integer :: i, k, sclr ! Loop index | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:1696:16: 1696 | integer :: i, k | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:1696:19: 1696 | integer :: i, k | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:565:56: 565 | thlm, um, vm, em, Lscale, exner, rtm, & | 1 Warning: Unused dummy argument ‘em’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:364:8: 364 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘one_half’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:364:8: 364 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘zero_threshold’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/parameters_tunable.F90:2135:32: 2135 | subroutine init_parameters_999( & | ^ Warning: ‘init_parameters_999’ defined but not used [-Wunused-function] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1288:13: 1288 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1289:15: 1289 | km1_tdiag = 3 ! Thermodynamic subdiagonal index. | 1 Warning: Unused parameter ‘km1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1287:15: 1287 | kp1_tdiag = 1, & ! Thermodynamic superdiagonal index. | 1 Warning: Unused parameter ‘kp1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/output_netcdf.F90:221:8: 221 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/output_netcdf.F90:218:8: 218 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clip_explicit.F90:872:43: 872 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clip_explicit.F90:426:40: 426 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clip_explicit.F90:157:22: 157 | integer :: sclr, i ! scalar array index. | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/fill_holes.F90:660:41: 660 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:589:29: 589 | -- this is likely unsafe and considered fatal" | 1 Warning: Missing ‘&’ in continued character constant at (1) [-Wampersand] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1327:49: 1327 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1851:13: 1851 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1852:15: 1852 | km1_tdiag = 3 ! Thermodynamic subdiagonal index. | 1 Warning: Unused parameter ‘km1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1850:15: 1850 | kp1_tdiag = 1, & ! Thermodynamic superdiagonal index. | 1 Warning: Unused parameter ‘kp1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/stats_clubb_utilities.F90:1587:45: 1587 | subroutine stats_end_timestep( clubb_params, stats_metadata, & ! intent(in) | 1 Warning: Unused dummy argument ‘clubb_params’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/stats_clubb_utilities.F90:1594:51: 1594 | l_standard_term_ta & | 1 Warning: Unused dummy argument ‘l_standard_term_ta’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/stats_clubb_utilities.F90:1593:44: 1593 | l_tke_aniso, & | 1 Warning: Unused dummy argument ‘l_tke_aniso’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/stats_clubb_utilities.F90:1592:45: 1592 | , l_uv_nudge, & | 1 Warning: Unused dummy argument ‘l_uv_nudge’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/setup_clubb_pdf_params.F90:262:25: 262 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/setup_clubb_pdf_params.F90:263:25: 263 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mixing_length.F90:889:8: 889 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘three’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mixing_length.F90:21:50: 21 | stats_metadata, & | 1 Warning: Unused dummy argument ‘stats_metadata’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:5373:46: 5373 | subroutine wp3_term_pr1_rhs( nz, ngrdcol, gr, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:2346:15: 2346 | C_uu_buoy ! CLUBB tunable parameter C_uu_buoy | 1 Warning: Unused variable ‘c_uu_buoy’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:2157:38: 2157 | subroutine wp23_rhs( nz, ngrdcol, gr, dt, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1818:38: 1818 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1381:14: 1381 | C_uu_shr ! CLUBB tunable parameter C_uu_shr | 1 Warning: Unused variable ‘c_uu_shr’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1264:10: 1264 | nrhs = 1 ! Number of RHS vectors | 1 Warning: Unused parameter ‘nrhs’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1177:45: 1177 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1364:15: 1364 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:385:10: 385 | c_K1, & ! CLUBB tunable parameter c_K1 | 1 Warning: Unused variable ‘c_k1’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:386:10: 386 | c_K8 ! CLUBB tunable parameter c_K8 | 1 Warning: Unused variable ‘c_k8’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:5851:57: 5851 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:4004:22: 4004 | sclr, i, b, k, l ! Loop index | 1 Warning: Unused variable ‘l’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3461:34: 3461 | integer :: i, k, k_low, k_high | 1 Warning: Unused variable ‘k_high’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3461:26: 3461 | integer :: i, k, k_low, k_high | 1 Warning: Unused variable ‘k_low’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3442:35: 3442 | real( kind = core_rknd ) :: tmp | 1 Warning: Unused variable ‘tmp’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3445:20: 3445 | turbulent_prod, & ! Turbulent production term [{x_a units}*{x_b units}/s] | 1 Warning: Unused variable ‘turbulent_prod’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2987:60: 2987 | C4_1d, invrs_tau_C4_zm, C14_1d, invrs_tau_C14_zm, & ! In | 1 Warning: Unused dummy argument ‘c14_1d’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2987:35: 2987 | C4_1d, invrs_tau_C4_zm, C14_1d, invrs_tau_C14_zm, & ! In | 1 Warning: Unused dummy argument ‘c4_1d’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3024:8: 3024 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘one_third’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3109:35: 3109 | real( kind = core_rknd ) :: tmp | 1 Warning: Unused variable ‘tmp’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3024:8: 3024 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘two_thirds’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2702:13: 2702 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2703:15: 2703 | km1_mdiag = 3 ! Momentum subdiagonal index. | 1 Warning: Unused parameter ‘km1_mdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2701:15: 2701 | kp1_mdiag = 1, & ! Momentum superdiagonal index. | 1 Warning: Unused parameter ‘kp1_mdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2608:42: 2608 | integer :: i, k, low_bound, high_bound | 1 Warning: Unused variable ‘high_bound’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2608:30: 2608 | integer :: i, k, low_bound, high_bound | 1 Warning: Unused variable ‘low_bound’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:1602:28: 1602 | integer :: sclr, k, i, j | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:409:18: 409 | rtm_zm, test | 1 Warning: Unused variable ‘test’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:4321:8: 4321 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘eps’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:4180:43: 4180 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1525:22: 1525 | integer :: i, k, b | 1 Warning: Unused variable ‘b’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1112:74: 1112 | subroutine xm_wpxp_lhs( nz, ngrdcol, 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1252:45: 1252 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1252:29: 1252 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1190:8: 1190 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1118:40: 1118 | stats_metadata, & ! In | 1 Warning: Unused dummy argument ‘stats_metadata’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1112:62: 1112 | subroutine xm_wpxp_lhs( nz, ngrdcol, 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1112:55: 1112 | subroutine xm_wpxp_lhs( nz, ngrdcol, 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1113:56: 1113 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1113:40: 1113 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4928:47: 4928 | call calc_trapezoid_zm( nz, ngrdcol, gr, wpthvp, wpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4931:47: 4931 | call calc_trapezoid_zm( nz, ngrdcol, gr, thlpthvp, thlpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4934:47: 4934 | call calc_trapezoid_zm( nz, ngrdcol, gr, rtpthvp, rtpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4822:34: 4822 | wprtp2, wprtp2_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4827:34: 4827 | wpthlp2, wpthlp2_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4832:34: 4832 | wprtpthlp, wprtpthlp_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4857:30: 4857 | cloud_frac, cloud_frac_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4861:30: 4861 | ice_supersat_frac, ice_supersat_frac_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4865:30: 4865 | rcm, rcm_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4869:30: 4869 | wp2thvp, wp2thvp_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4760:21: 4760 | integer :: i, k, sclr | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4088:10: 4088 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘iskw_max_mag’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4118:10: 4118 | use model_flags, only: & | 1 Warning: Unused parameter ‘lapack’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4072:40: 4072 | subroutine check_clubb_settings( nzmax, params, & ! intent(in) | 1 Warning: Unused dummy argument ‘nzmax’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:2918:8: 2918 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘iskw_denom_coef’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:2918:8: 2918 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘iskw_max_mag’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:144:23: 144 | hydromet, l_mix_rat_hm, & ! intent(in) | 1 Warning: Unused dummy argument ‘hydromet’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:198:8: 198 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘num_hf_draw_points’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clubb_api_module.F90:1025:16: 1025 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_param.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_lapack.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libmicrophys_utils.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_parabolic.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_KK_microphys.a /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/output_2D_samples_module.F90:239:8: 239 | use parameter_indices, only: nparams | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/output_2D_samples_module.F90:164:8: 164 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/output_2D_samples_module.F90:168:8: 168 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/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] ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_coamps.a /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/latin_hypercube_driver_module.F90:1007:44: 1007 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/latin_hypercube_driver_module.F90:80:8: 80 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_bugsrad.a /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/silhs_api_module.F90:347:8: 347 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/silhs_api_module.F90:326:13: 326 | rho_ds_zt, & ! Unused | 1 Warning: Unused dummy argument ‘rho_ds_zt’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/silhs_api_module.F90:170:8: 170 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libsilhs.a ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_morrison.a ../src/Benchmark_cases/cloud_sed_module.F90:171:44: 171 | 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:1235:13: 1235 | .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:1236:13: 1236 | .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:1237:13: 1237 | .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:1238:13: 1238 | .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:1239:13: 1239 | .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:1240:13: 1240 | .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:1241:13: 1241 | .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:1242:13: 1242 | .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:1243:13: 1243 | .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:1244:13: 1244 | .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:1245:13: 1245 | .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/morrison_microphys_module.F90:20:33: 20 | saturation_formula, & | 1 Warning: Unused dummy argument ‘saturation_formula’ at (1) [-Wunused-dummy-argument] ../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, & ! In | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] ../src/clubb_driver.F90:6547:39: 6547 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in) | 1 Warning: Unused dummy argument ‘lmin’ at (1) [-Wunused-dummy-argument] ../src/clubb_driver.F90:6547:33: 6547 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in) | 1 Warning: Unused dummy argument ‘nu_vert_res_dep’ at (1) [-Wunused-dummy-argument] ../src/clubb_driver.F90:5722:8: 5722 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter] ../src/clubb_driver.F90:73:8: 73 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘iskw_denom_coef’ which has been explicitly imported at (1) [-Wunused-parameter] ar: creating /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../lib/libclubb_other.a ../src/G_unit_test_types/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 [-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. 952 : call stat_update_var_pt( stats_metadata%iNsm, k, real(Nsm(k), kind = core_rknd) ,stats_zt ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/coamps_microphys_driver_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 179 : max( rtm(1,k) - sat_mixrat_liq( p_in_Pa(k), theta(1,k)*exner(1,k), saturation_formula ), & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 201 : rcm(1,k) = rcm_sat_adj( thlm(1,k), rtm(1,k), p_in_Pa(k), exner(1,k), saturation_formula ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/input_interpret.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 677 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/clubb_tuner.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 282 : nzt = stat_file_num_vertical_levels( "thlm", "../output/"//trim( stats_metadata%fname_zt )//".ctl" ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 283 : nzm = stat_file_num_vertical_levels( "thlm", "../output/"//trim( stats_metadata%fname_zm )//".ctl" ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/jacobian.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 295 : z_i = lin_interpolate_two_points( 8.0e-3_core_rknd, rtm(k), rtm(k-1), gr%zt(1,k), gr%zt(1,k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/simple_rad_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 386 : call microphys_put_var( stats_metadata%irrm_src_adj, adj_terms%rrm_src_adj, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 387 : call microphys_put_var( stats_metadata%iNrm_src_adj, adj_terms%Nrm_src_adj, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 390 : call microphys_put_var( stats_metadata%irrm_evap_adj, adj_terms%rrm_evap_adj, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 391 : call microphys_put_var( stats_metadata%iNrm_evap_adj, adj_terms%Nrm_evap_adj, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 393 : call microphys_put_var( stats_metadata%irrm_mc_nonadj, KK_auto_tndcy+KK_accr_tndcy+KK_evap_tndcy, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1102 : call stat_update_var( stats_metadata%irrm_mc_nonadj, KK_auto_tndcy+KK_accr_tndcy+KK_evap_tndcy, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1683 : call stat_update_var_pt( stats_metadata%im_vol_rad_rain, level, KK_mean_vol_rad, stats_zt ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 974 : = clubb_params(iomicron) * hm_metadata%hmp2_ip_on_hmm2_ip(pdf2hydromet_idx(ivar,hm_metadata)) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/KK_microphys_module.F90 ../src/microphys_init_cleanup.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 384 : z(kp2), p_in_Pa(km1), p_in_Pa(k00), p_in_Pa(kp1), p_in_Pa(kp2) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 433 : press(i) = lin_interpolate_two_points( gr%zt(1,i), z(k), z(k-1), p_in_Pa(k), p_in_Pa(k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/sounding.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 828 : call microphys_put_var( stats_metadata%irsm_sd_morr_int, (/rsm_sd_morr_int/), microphys_stats_sfc ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 846 : call microphys_put_var( stats_metadata%ihl_on_Cp_residual, hl_on_Cp_residual, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 861 : call microphys_put_var( stats_metadata%iPSMLT, real( PSMLT, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 862 : call microphys_put_var( stats_metadata%iEVPMS, real( EVPMS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 863 : call microphys_put_var( stats_metadata%iPRACS, real( PRACS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 864 : call microphys_put_var( stats_metadata%iEVPMG, real( EVPMG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 865 : call microphys_put_var( stats_metadata%iPRACG, real( PRACG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 866 : call microphys_put_var( stats_metadata%iPGMLT, real( PGMLT, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 867 : call microphys_put_var( stats_metadata%iMNUCCC, real( MNUCCC, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 868 : call microphys_put_var( stats_metadata%iPSACWS, real( PSACWS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 869 : call microphys_put_var( stats_metadata%iPSACWI, real( PSACWI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 870 : call microphys_put_var( stats_metadata%iQMULTS, real( QMULTS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 871 : call microphys_put_var( stats_metadata%iQMULTG, real( QMULTG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 872 : call microphys_put_var( stats_metadata%iPSACWG, real( PSACWG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 873 : call microphys_put_var( stats_metadata%iPGSACW, real( PGSACW, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 877 : call microphys_put_var( stats_metadata%iQMULTR, real( QMULTR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 878 : call microphys_put_var( stats_metadata%iQMULTRG, real( QMULTRG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 879 : call microphys_put_var( stats_metadata%iMNUCCD, real( MNUCCD, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 880 : call microphys_put_var( stats_metadata%iPRACI, real( PRACI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 881 : call microphys_put_var( stats_metadata%iPRACIS, real( PRACIS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 883 : call microphys_put_var( stats_metadata%iMNUCCR, real( MNUCCR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 884 : call microphys_put_var( stats_metadata%iPIACR, real( PIACR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 885 : call microphys_put_var( stats_metadata%iPIACRS, real( PIACRS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 886 : call microphys_put_var( stats_metadata%iPGRACS, real( PGRACS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 888 : call microphys_put_var( stats_metadata%iEPRDS, real( EPRDS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 889 : call microphys_put_var( stats_metadata%iPSACR, real( PSACR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 891 : call microphys_put_var( stats_metadata%iEPRDG, real( EPRDG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 894 : call microphys_put_var( stats_metadata%iNGSTEN, real( NGSTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 895 : call microphys_put_var( stats_metadata%iNRSTEN, real( NRSTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 896 : call microphys_put_var( stats_metadata%iNISTEN, real( NISTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 897 : call microphys_put_var( stats_metadata%iNSSTEN, real( NSSTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 898 : call microphys_put_var( stats_metadata%iNCSTEN, real( NCSTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 899 : call microphys_put_var( stats_metadata%iNPRC1, real( NPRC1, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 900 : call microphys_put_var( stats_metadata%iNRAGG, real( NRAGG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 901 : call microphys_put_var( stats_metadata%iNPRACG, real( NPRACG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 902 : call microphys_put_var( stats_metadata%iNSUBR, real( NSUBR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 903 : call microphys_put_var( stats_metadata%iNSMLTR, real( NSMLTR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 904 : call microphys_put_var( stats_metadata%iNGMLTR, real( NGMLTR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 905 : call microphys_put_var( stats_metadata%iNPRACS, real( NPRACS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 906 : call microphys_put_var( stats_metadata%iNNUCCR, real( NNUCCR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 907 : call microphys_put_var( stats_metadata%iNIACR, real( NIACR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 908 : call microphys_put_var( stats_metadata%iNIACRS, real( NIACRS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 909 : call microphys_put_var( stats_metadata%iNGRACS, real( NGRACS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 910 : call microphys_put_var( stats_metadata%iNSMLTS, real( NSMLTS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 911 : call microphys_put_var( stats_metadata%iNSAGG, real( NSAGG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 912 : call microphys_put_var( stats_metadata%iNPRCI, real( NPRCI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 913 : call microphys_put_var( stats_metadata%iNSCNG, real( NSCNG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 914 : call microphys_put_var( stats_metadata%iNSUBS, real( NSUBS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 917 : call microphys_put_var( stats_metadata%iNNUCCC, real( NNUCCC, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 918 : call microphys_put_var( stats_metadata%iNPSACWS, real( NPSACWS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 921 : call microphys_put_var( stats_metadata%iNPSACWI, real( NPSACWI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 922 : call microphys_put_var( stats_metadata%iNPSACWG, real( NPSACWG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 923 : call microphys_put_var( stats_metadata%iNPRAI, real( NPRAI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 924 : call microphys_put_var( stats_metadata%iNMULTS, real( NMULTS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 925 : call microphys_put_var( stats_metadata%iNMULTG, real( NMULTG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 926 : call microphys_put_var( stats_metadata%iNMULTR, real( NMULTR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 927 : call microphys_put_var( stats_metadata%iNMULTRG, real( NMULTRG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 928 : call microphys_put_var( stats_metadata%iNNUCCD, real( NNUCCD, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 929 : call microphys_put_var( stats_metadata%iNSUBI, real( NSUBI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 930 : call microphys_put_var( stats_metadata%iNGMLTG, real( NGMLTG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 931 : call microphys_put_var( stats_metadata%iNSUBG, real( NSUBG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 933 : call microphys_put_var( stats_metadata%iSIZEFIX_NR, real( SIZEFIX_NR,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 934 : call microphys_put_var( stats_metadata%iSIZEFIX_NC, real( SIZEFIX_NC,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 935 : call microphys_put_var( stats_metadata%iSIZEFIX_NI, real( SIZEFIX_NI,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 936 : call microphys_put_var( stats_metadata%iSIZEFIX_NS, real( SIZEFIX_NS,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 937 : call microphys_put_var( stats_metadata%iSIZEFIX_NG, real( SIZEFIX_NG,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 938 : call microphys_put_var( stats_metadata%iNEGFIX_NR, real( NEGFIX_NR,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 939 : call microphys_put_var( stats_metadata%iNEGFIX_NC, real( NEGFIX_NC,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 940 : call microphys_put_var( stats_metadata%iNEGFIX_NI, real( NEGFIX_NI,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 941 : call microphys_put_var( stats_metadata%iNEGFIX_NS, real( NEGFIX_NS,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 942 : call microphys_put_var( stats_metadata%iNEGFIX_NG, real( NEGFIX_NG,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 943 : call microphys_put_var( stats_metadata%iNIM_MORR_CL, real( NIM_MORR_CL,kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 944 : call microphys_put_var( stats_metadata%iQC_INST, real( QC_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 945 : call microphys_put_var( stats_metadata%iQR_INST, real( QR_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 946 : call microphys_put_var( stats_metadata%iQI_INST, real( QI_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 947 : call microphys_put_var( stats_metadata%iQS_INST, real( QS_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 948 : call microphys_put_var( stats_metadata%iQG_INST, real( QG_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 949 : call microphys_put_var( stats_metadata%iNC_INST, real( NC_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 950 : call microphys_put_var( stats_metadata%iNR_INST, real( NR_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 951 : call microphys_put_var( stats_metadata%iNI_INST, real( NI_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 952 : call microphys_put_var( stats_metadata%iNS_INST, real( NS_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 953 : call microphys_put_var( stats_metadata%iNG_INST, real( NG_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 955 : call microphys_put_var( stats_metadata%iT_in_K_mc, real( T_in_K_mc, kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 960 : call microphys_put_var( stats_metadata%ieff_rad_cloud, real( effc(:), kind = core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 961 : call microphys_put_var( stats_metadata%ieff_rad_ice, real( effi(:), kind = core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 962 : call microphys_put_var( stats_metadata%ieff_rad_snow, real( effs(:), kind = core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 963 : call microphys_put_var( stats_metadata%ieff_rad_rain, real( effr(:), kind = core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 964 : call microphys_put_var( stats_metadata%ieff_rad_graupel, real( effg(:), kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/morrison_microphys_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 954 : if ( trim( hm_metadata%hydromet_list(i) ) == "rrm" .and. stats_metadata%iVrrprrp > 0 ) then CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 957 : call stat_update_var( stats_metadata%iVrrprrp, hydromet_vel_covar(:,hm_metadata%iirr), & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 960 : elseif ( trim( hm_metadata%hydromet_list(i) ) == "Nrm" .and. stats_metadata%iVNrpNrp > 0 ) then CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 963 : call stat_update_var( stats_metadata%iVNrpNrp, hydromet_vel_covar(:,hm_metadata%iiNr), stats_zm ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/advance_microphys_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: 'use' statement w/o 'only' found in the following line: 6664 : 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. 868 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1316 : call write_text( "l_modify_ic_with_cubic_int = ", l_modify_ic_with_cubic_int, l_write_to_file, iunit ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1317 : call write_text( "l_modify_bc_for_cnvg_test = ", l_modify_bc_for_cnvg_test, l_write_to_file, iunit ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2223 : (/lon_vals/), (/lat_vals/), time_current, dt_main, l_silhs_out_in,&!intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2240 : (/lon_vals/), (/lat_vals/), time_current, dt_main, l_silhs_out_in,&!intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2295 : if ( .not. (( abs(dt_rad/stats_metadata%stats_tout - real(floor(dt_rad/stats_metadata%stats_tout), kind=core_rknd)) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2297 : ( abs(stats_metadata%stats_tout/dt_rad - real(floor(stats_metadata%stats_tout/dt_rad), kind=core_rknd)) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2512 : clubb_params(1,:), nu_vert_res_dep, lmin, & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2563 : clubb_params(1,:), nu_vert_res_dep, lmin, & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2611 : clubb_params(1,:), & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2620 : stats_zt, stats_zm, stats_sfc, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2626 : precip_fracs, & ! Intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2646 : stats_zt, stats_zm, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3515 : ! em(k) = ( 0.15_core_rknd * (1.0_core_rknd - gr%zm(1,k)/150.0_core_rknd) ) / rho_zm(k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4115 : = max( rtm(1,k) - sat_mixrat_liq( p_in_Pa(k), thm(1,k) * exner(1,k), saturation_formula ), & 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. 102 : Skx(i,k) = min( max( Skx(i,k), -clubb_params(i,iSkw_max_mag) ), clubb_params(i,iSkw_max_mag) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/Skx_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 155 : stats_metadata, & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 460 : 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. 150 : (/1._c,-.6_c, .09_c , .09_c , .788_c, .675_c, .240_c, .222_c, .240_c, .222_c, .240_c, .222_c, & ! chi CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 151 : 0._c, 1._c, .027_c, .027_c, .114_c, .115_c,-.029_c, .093_c, .022_c, .013_c, 0._c , 0._c , & ! eta CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 152 : 0._c, 0._c, 1._c , .34_c , .315_c, .270_c, .120_c, .167_c, 0._c , 0._c , 0._c , 0._c , & ! w CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 153 : 0._c, 0._c, 0._c , 1._c , 0._c , 0._c , .464_c, .320_c, .168_c, .232_c, 0._c , 0._c , & ! Ncn CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 154 : 0._c, 0._c, 0._c , 0._c , 1._c , .821_c, 0._c , 0._c , .173_c, .164_c, .319_c, .308_c, & ! rr CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 155 : 0._c, 0._c, 0._c , 0._c , 0._c , 1._c , .152_c, .143_c, 0._c , 0._c , .285_c, .273_c, & ! Nr CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 156 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, .585_c, .571_c, .379_c, .363_c, & ! ri CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 157 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .571_c, .550_c, .363_c, .345_c, & ! Ni CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 158 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, .485_c, .470_c, & ! rs CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 159 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .470_c, .450_c, & ! Ns CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 160 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, & ! rg CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 161 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c/), & ! Ng CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 166 : (/1._c, .3_c, .09_c , .09_c , .788_c, .675_c, .240_c, .222_c, .240_c, .222_c, .240_c, .222_c, &! chi CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 167 : 0._c, 1._c, .027_c, .027_c, .114_c, .115_c,-.029_c, .093_c, .022_c, .013_c, 0._c , 0._c , &! eta CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 169 : 0._c, 0._c, 0._c , 1._c , 0._c , 0._c , .464_c, .320_c, .168_c, .232_c, 0._c , 0._c , &! Ncn CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 170 : 0._c, 0._c, 0._c , 0._c , 1._c , .821_c, 0._c , 0._c , .173_c, .164_c, .319_c, .308_c, &! rr CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 171 : 0._c, 0._c, 0._c , 0._c , 0._c , 1._c , .152_c, .143_c, 0._c , 0._c , .285_c, .273_c, &! Nr CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 172 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, .585_c, .571_c, .379_c, .363_c, &! ri CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 173 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .571_c, .550_c, .363_c, .345_c, &! Ni CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 174 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, .485_c, .470_c, &! rs CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 175 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .470_c, .450_c, &! Ns CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 176 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, &! rg CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 177 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c/), &! Ng CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/corr_varnce_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 413 : stats_metadata, & ! intent(in) stats_metadata, & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/clip_explicit.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 480 : = + gr%invrs_dzt(i,k) * ( K_zt(i,k) + nu(i) ) * ( gr%invrs_dzm(i,k) + gr%invrs_dzm(i,k-1) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1124 : = + gr%invrs_dzm(i,k) * ( K_zm(i,k) + nu(i) ) * ( gr%invrs_dzt(i,k+1) + gr%invrs_dzt(i,k) ) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/diffusion.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 685 : * ( one - Skw(i,k) / sqrt( four * ( one - sigma_sqd_w(i,k) )**3 + Skw(i,k)**2 ) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/adg1_adg2_3d_luhar_pdf.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 327 : stability_correction(i,k) = one + min( lambda0_stability(i,k) * brunt_vaisala_freq_sqd(i,k) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 630 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 631 : ! for a plot on how output behaves with varying min_max_smth_mag CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 795 : fnc_Richardson(i,k) = ( Ri_zm(i,k) - clubb_params(i,iRichardson_num_min) ) * invrs_min_max_diff CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_helper_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 480 : write(fstderr,*) "grdcol #", i, "rhs # ", n, "band_solvex backward error est. =", berr(i,n) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/lapack_wrap.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 144 : !$acc enter data create( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 238 : !$acc parallel loop gang vector collapse(2) default(present) reduction(.or.:l_field_below_threshold) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 250 : !$acc exit data delete( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/fill_holes.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: 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. 504 : call windm_edsclrm_solve( nz, ngrdcol, gr, nrhs, stats_metadata%iwindm_matrix_condt_num, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 909 : call windm_edsclrm_solve( nz, ngrdcol, gr, nrhs, stats_metadata%iwindm_matrix_condt_num, & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_windm_edsclrm_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 339 : 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. 174 : if ( stats_metadata%iwprtpthlp > 0 ) call check_nan( wprtpthlp, "wprtpthlp", proc_name ) ! intnet(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/numerical_check.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 43 : ! lower_1(2)*upper_1(1)+l_diag(2)*1 = lhs(0,2) => l_diag(2) = lhs(0,2) - lower_1(2)*upper_1(1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 44 : ! lower_1(2)*upper_2(1)+l_diag(2)*upper_1(2) = lhs(-1,2) => upper_1(2) = ( lhs(-1,2)-lower_1(2)*upper_2(1) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 46 : ! l_diag(2)*upper_2(2) = lhs(-2,2) => upper_2(2) = lhs(-2,2) / l_diag(2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 52 : ! l_2(k)*upper_1(k-2)+lower_1(k)*1 = lhs(1,k) => lower_1(k) = lhs(1,k) - l_2(k)*upper_1(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 53 : ! l_2(k)*upper_2(k-2)+lower_1(k)*upper_1(k-1) = lhs( 0,k) => l_diag(k) = lhs(0,k) - l_2(k)*upper_2(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 54 : ! +l_diag(k)*1 + lower_1(k)*upper_1(k-1) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/penta_lu_solver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1173 : !$acc fcor_col, sfc_elevation_col, thlm_forcing_col, rtm_forcing_col, um_forcing_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1174 : !$acc vm_forcing_col, wprtp_forcing_col, wpthlp_forcing_col, rtp2_forcing_col, thlp2_forcing_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1175 : !$acc rtpthlp_forcing_col, wm_zm_col, wm_zt_col, rho_zm_col, rho_col, rho_ds_zm_col, rho_ds_zt_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1176 : !$acc invrs_rho_ds_zm_col, invrs_rho_ds_zt_col, thv_ds_zm_col, thv_ds_zt_col, rfrzm_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1179 : !$acc upwp_sfc_pert_col, vpwp_sfc_pert_col, rtm_ref_col, thlm_ref_col, um_ref_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1181 : !$acc copy( um_col, upwp_col, vm_col, vpwp_col, up2_col, vp2_col, up3_col, vp3_col, rtm_col, wprtp_col, thlm_col, wpthlp_col, rtp2_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1184 : !$acc rtpthvp_col, thlpthvp_col, wp2rtp_col, wp2thlp_col, uprcp_col, vprcp_col, rc_coef_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1185 : !$acc wp4_col, wpup2_col, wpvp2_col, wp2up2_col, wp2vp2_col, ice_supersat_frac_col, um_pert_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1234 : !$acc copyout( rcm_in_layer_col, cloud_cover_col, wprcp_col, w_up_in_cloud_col, w_down_in_cloud_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1235 : !$acc cloudy_updraft_frac_col, cloudy_downdraft_frac_col, invrs_tau_zm_col, Kh_zt_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1241 : !$acc copy( sclrm_col, wpsclrp_col, sclrp2_col, sclrp3_col, sclrprtp_col, sclrpthlp_col, sclrpthvp ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2080 : 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. 259 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 465 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 741 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 868 : 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. 885 : write(iunit,*) "l_use_tke_in_wp3_pr_turb_term = ", clubb_config_flags%l_use_tke_in_wp3_pr_turb_term CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 887 : write(iunit,*) "l_use_wp3_lim_with_smth_Heaviside = ", clubb_config_flags%l_use_wp3_lim_with_smth_Heaviside CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 889 : write(iunit,*) "l_modify_limiters_for_cnvg_test = ", clubb_config_flags%l_modify_limiters_for_cnvg_test CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/model_flags.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 375 : thv_par_1(i,j) = thl_par_1(i,j) + ep1 * thv_ds(i,j) * rt_par_1(i,j) + Lv_coef(i,j) * rc_par_1(i,j) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 623 : thv_par_1(i,j) = thl_par_1(i,j) + ep1 * thv_ds(i,j) * rt_par_1(i,j) + Lv_coef(i,j) * rc_par_1(i,j) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 992 : ! if l_avg_Lscale is true, compute_mixing_length is called two additional CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1472 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1473 : ! for a plot on how output behaves with varying min_max_smth_mag CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1476 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1592 : invrs_tau_shear_smooth(i,k) = clubb_params(i,iC_invrs_tau_shear) * smooth_norm_ddzt_umvm(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1653 : 1.e8_core_rknd * abs(brunt_vaisala_freq_sqd_mixed(i,k))**3) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1669 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_smth, brunt_vaisala_freq_sqd_smth(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1691 : brunt_vaisala_freq_clipped = smooth_max( nz, ngrdcol, 1.0e-7_core_rknd, brunt_vaisala_freq_sqd_smth, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1806 : call stat_update_var(stats_metadata%ibrunt_freq_out_cloud, brunt_freq_out_cloud(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1851 : / ( gr%zm(i,k) - sfc_elevation(i) + clubb_params(i,iz_displace) ) ! small CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1904 : + clubb_params(i,iC_invrs_tau_N2_wpxp) * brunt_freq_out_cloud(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1983 : tmp_calc(i,k) = clubb_params(i,iC_invrs_tau_wpxp_Ri) * Ri_zm_smooth(i,k)**clubb_params(i,iwpxp_Ri_exp) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2014 : * max( Ri_zm(i,k), zero)**clubb_params(i,iwpxp_Ri_exp), 12.0_core_rknd ) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2026 : + clubb_params(i,iC_invrs_tau_N2_clear_wp3) * brunt_freq_out_cloud(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2074 : tau_zt = smooth_min( nz, ngrdcol, tau_zt_unclipped, tau_max_zt, 1.0e3_core_rknd * min_max_smth_mag ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/mixing_length.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 75 : call stat_assign( var_index=stats_metadata%ilh_morr_snow_rate, var_name="lh_morr_snow_rate", & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 99 : call stat_assign( var_index=stats_metadata%ik_lh_start, var_name="k_lh_start", & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_lh_sfc_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 8 : ! easier for the clubb_tuner code to use the clubb_params vector without "knowing" any information CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/parameters_tunable.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 462 : esat(i,k) = 10._core_rknd**(-7.90298_core_rknd*(373.16_core_rknd/T_in_K_clipped-1._core_rknd)+ & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1392 : *(MAX( rtm - sat_mixrat_liq(p_in_Pa,theta*exner, saturation_formula), zero_threshold )) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/saturation.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 114 : call stat_assign( var_index=stats_metadata%iFrad_LW_rad, var_name="Frad_LW_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 123 : call stat_assign( var_index=stats_metadata%iFrad_SW_rad, var_name="Frad_SW_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 132 : call stat_assign( var_index=stats_metadata%iFrad_SW_up_rad, var_name="Frad_SW_up_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 141 : call stat_assign( var_index=stats_metadata%iFrad_LW_up_rad, var_name="Frad_LW_up_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 150 : call stat_assign( var_index=stats_metadata%iFrad_SW_down_rad, var_name="Frad_SW_down_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 160 : call stat_assign( var_index=stats_metadata%iFrad_LW_down_rad, var_name="Frad_LW_down_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_rad_zm_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 88 : call stat_assign( var_index=stats_metadata%iT_in_K_rad, var_name="T_in_K_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 123 : call stat_assign( var_index=stats_metadata%ircm_in_cloud_rad, var_name="rcm_in_cloud_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 132 : call stat_assign( var_index=stats_metadata%icloud_frac_rad, var_name="cloud_frac_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 142 : call stat_assign( var_index=stats_metadata%iice_supersat_frac_rad, var_name="ice_supersat_frac_rad", & !In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 160 : call stat_assign( var_index=stats_metadata%iradht_LW_rad, var_name="radht_LW_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 169 : call stat_assign( var_index=stats_metadata%iradht_SW_rad, var_name="radht_SW_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 178 : call stat_assign( var_index=stats_metadata%ip_in_mb_rad, var_name="p_in_mb_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 187 : call stat_assign( var_index=stats_metadata%isp_humidity_rad, var_name="sp_humidity_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_rad_zt_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 516 : wstar = ( one/T0 * grav * wpthlp(i,1) * 0.2_core_rknd * depth_pos_wpthlp(i) )**(one_third) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/sfc_varnce_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 385 : call stat_update_var_pt( stats_metadata%iprecip_frac_tol, 1, precip_frac_tol(j), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 395 : call precip_frac_assert_check( nz, hydromet_dim, hydromet_tol, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 397 : precip_frac_1(j,:), precip_frac_2(j,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 398 : precip_frac_tol(j) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/precipitation_fraction.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 617 : call stat_update_var( stats_metadata%icoef_wp4_implicit, coef_wp4_implicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1420 : call stat_update_var_pt( stats_metadata%iwp23_matrix_condt_num, 1, one / rcond(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1511 : call stat_end_update_pt( stats_metadata%iwp2_dp1, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1558 : call stat_end_update_pt( stats_metadata%iwp2_pr1, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1620 : call stat_end_update_pt( stats_metadata%iwp3_ta, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1633 : call stat_end_update_pt( stats_metadata%iwp3_tp, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1639 : call stat_end_update_pt( stats_metadata%iwp3_pr_tp, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2710 : call stat_update_var_pt( stats_metadata%iwp2_pr_dfsn, k, rhs_pr_dfsn_wp2(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2715 : call stat_update_var_pt( stats_metadata%iwp2_splat, k, - lhs_splat_wp2(i,k) * wp2(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2731 : call stat_modify_pt( stats_metadata%iwp2_pr1, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2814 : call stat_begin_update_pt( stats_metadata%iwp3_ta, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2829 : call stat_begin_update_pt( stats_metadata%iwp3_tp, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2835 : call stat_begin_update_pt( stats_metadata%iwp3_pr_tp, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2879 : call stat_update_var_pt( stats_metadata%iwp3_splat, k, - lhs_splat_wp3(i,k) * wp3(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2890 : call stat_begin_update_pt( stats_metadata%iwp3_dp1, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2909 : call stat_update_var_pt( stats_metadata%iwp3_pr_turb, k, rhs_pr_turb_wp3(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2911 : call stat_update_var_pt( stats_metadata%iwp3_pr_dfsn, k, rhs_pr_dfsn_wp3(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_wp2_wp3_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 177 : call stat_assign( var_index=stats_metadata%ilh_thlm_mc, var_name="lh_thlm_mc", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 306 : call stat_assign( var_index=stats_metadata%ilh_rcm_avg, var_name="lh_rcm_avg", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 459 : call stat_assign( var_index=stats_metadata%ilh_cloud_frac, var_name="lh_cloud_frac", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 513 : call stat_assign( var_index=stats_metadata%ilh_Ncnp2_zt, var_name="lh_Ncnp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 522 : call stat_assign( var_index=stats_metadata%ilh_Ncp2_zt, var_name="lh_Ncp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 531 : call stat_assign( var_index=stats_metadata%ilh_Nrp2_zt, var_name="lh_Nrp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 540 : call stat_assign( var_index=stats_metadata%ilh_rcp2_zt, var_name="lh_rcp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 549 : call stat_assign( var_index=stats_metadata%ilh_rtp2_zt, var_name="lh_rtp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 558 : call stat_assign( var_index=stats_metadata%ilh_thlp2_zt, var_name="lh_thlp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 567 : call stat_assign( var_index=stats_metadata%ilh_rrp2_zt, var_name="lh_rrp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 576 : call stat_assign( var_index=stats_metadata%ilh_rrm_auto, var_name="lh_rrm_auto", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 585 : call stat_assign( var_index=stats_metadata%ilh_rrm_accr, var_name="lh_rrm_accr", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 593 : call stat_assign( var_index=stats_metadata%ilh_rrm_evap, var_name="lh_rrm_evap", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 602 : call stat_assign( var_index=stats_metadata%ilh_Nrm_auto, var_name="lh_Nrm_auto", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 611 : call stat_assign( var_index=stats_metadata%ilh_Nrm_evap, var_name="lh_Nrm_evap", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 620 : call stat_assign( var_index=stats_metadata%ilh_rrm_src_adj, var_name="lh_rrm_src_adj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 629 : call stat_assign( var_index=stats_metadata%ilh_rrm_evap_adj, var_name="lh_rrm_evap_adj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 638 : call stat_assign( var_index=stats_metadata%ilh_Nrm_src_adj, var_name="lh_Nrm_src_adj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 648 : call stat_assign( var_index=stats_metadata%ilh_Nrm_evap_adj, var_name="lh_Nrm_evap_adj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 658 : call stat_assign( var_index=stats_metadata%ilh_precip_frac, var_name="lh_precip_frac", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 677 : call stat_assign( var_index=stats_metadata%ilh_mixt_frac, var_name="lh_mixt_frac", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 697 : call stat_assign( var_index=stats_metadata%ilh_m_vol_rad_rain, var_name="lh_m_vol_rad_rain", & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 705 : call stat_assign( var_index=stats_metadata%ilh_rrm_mc_nonadj, var_name="lh_rrm_mc_nonadj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 717 : call stat_assign( var_index=stats_metadata%isilhs_variance_category(icategory), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 733 : call stat_assign( var_index=stats_metadata%ilh_samp_frac_category(icategory), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_lh_zt_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 127 : call stat_assign( var_index=stats_metadata%icc, var_name="cc", var_description="cc, Cloud cover", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 344 : call stat_assign( var_index=stats_metadata%iwp23_matrix_condt_num, var_name="wp23_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 351 : call stat_assign( var_index=stats_metadata%ithlm_matrix_condt_num, var_name="thlm_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 360 : call stat_assign( var_index=stats_metadata%irtm_matrix_condt_num, var_name="rtm_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 369 : call stat_assign( var_index=stats_metadata%ithlp2_matrix_condt_num, var_name="thlp2_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 377 : call stat_assign( var_index=stats_metadata%irtp2_matrix_condt_num, var_name="rtp2_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 403 : call stat_assign( var_index=stats_metadata%iwindm_matrix_condt_num, var_name="windm_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 437 : call stat_assign( var_index=stats_metadata%itot_vartn_normlzd_rtm, var_name="tot_vartn_normlzd_rtm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 445 : call stat_assign( var_index=stats_metadata%itot_vartn_normlzd_thlm, var_name="tot_vartn_normlzd_thlm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 453 : call stat_assign( var_index=stats_metadata%itot_vartn_normlzd_wprtp, var_name="tot_vartn_normlzd_wprtp", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_sfc_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 43 : ! lower(k)*upper(k-1)+l_diag(k)*1 = lhs( 0,k) => l_diag(k) = lhs( 0,k) - lower(k)*upper(k-1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 205 : lower_diag_invrs(i,ndim) = 1.0_core_rknd / ( lhs(0,i,ndim) - lhs(1,i,ndim) * upper(i,ndim-1) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 292 : lower_diag_invrs(i,ndim) = 1.0_core_rknd / ( lhs(0,i,ndim) - lhs(1,i,ndim) * upper(i,ndim-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/tridiag_lu_solver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 845 : !$acc rc_coef_zm, Km_zm, Kmh_zm, gamma_Skw_fnc, sigma_sqd_w, sigma_sqd_w_tmp, sigma_sqd_w_zt, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 924 : thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 925 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 926 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 927 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 928 : 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. 929 : 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. 930 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 931 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 934 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 935 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1587 : ! Added an extra check for stats_metadata%irel_humidity > 0; otherwise, if both stats_metadata%irsat = 0 and CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1588 : ! stats_metadata%irel_humidity = 0, rsat is not computed, leading to a floating-point exception CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1600 : call stat_update_var( stats_metadata%irel_humidity, rel_humidity(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1649 : call stat_update_var( stats_metadata%istability_correction, stability_correction(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1730 : call stat_update_var(stats_metadata%iinvrs_tau_wpxp_zm, invrs_tau_wpxp_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1734 : call stat_update_var(stats_metadata%iinvrs_tau_wp3_zm, invrs_tau_wp3_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1738 : call stat_update_var(stats_metadata%iinvrs_tau_no_N2_zm, invrs_tau_no_N2_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1747 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd, brunt_vaisala_freq_sqd(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1749 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_splat, brunt_vaisala_freq_sqd_splat(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1751 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_mixed, brunt_vaisala_freq_sqd_mixed(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1753 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_moist, brunt_vaisala_freq_sqd_moist(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1755 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_dry, brunt_vaisala_freq_sqd_dry(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1774 : clubb_config_flags%l_modify_limiters_for_cnvg_test, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1776 : stats_zm, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1868 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2231 : * ( one - exp( brunt_vaisala_freq_sqd_zt(i,k) / clubb_params(i,ixp3_coef_slope) ) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2654 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2655 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2656 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2657 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2658 : 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. 2659 : 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. 2660 : 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. 2663 : 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. 2664 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2665 : 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. 2666 : 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. 2667 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2670 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2671 : 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. 2674 : 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. 2675 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2676 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2677 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2678 : clubb_config_flags%saturation_formula, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2679 : stats_metadata, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2680 : stats_zt(i), stats_zm(i), stats_sfc(i) ) ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2702 : thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2703 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2704 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2705 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2706 : 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. 2707 : 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. 2708 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2709 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2712 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2713 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2810 : !$acc rc_coef_zm, Km_zm, Kmh_zm, gamma_Skw_fnc, sigma_sqd_w, sigma_sqd_w_tmp, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2811 : !$acc sqrt_em_zt, xp3_coef_fnc, w_1_zm, w_2_zm, varnce_w_1_zm, varnce_w_2_zm, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2816 : !$acc invrs_tau_C4_zm, invrs_tau_C14_zm, invrs_tau_wp2_zm, invrs_tau_wpxp_zm, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2817 : !$acc invrs_tau_wp3_zm, invrs_tau_no_N2_zm, invrs_tau_bkgnd, invrs_tau_shear, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4195 : write(fstderr,*) "l_stability_correct_tau_zm = ", clubb_config_flags%l_stability_correct_tau_zm CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4231 : write(fstderr,*) "Unknown type of double Gaussian PDF selected: ", clubb_config_flags%iiPDF_type CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_clubb_core_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 431 : call stat_assign( var_index=stats_metadata%iinvrs_tau_wpxp_zm, var_name="invrs_tau_wpxp_zm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 447 : call stat_assign( var_index=stats_metadata%iinvrs_tau_no_N2_zm, var_name="invrs_tau_no_N2_zm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2086 : call stat_assign( var_index=stats_metadata%iice_supersat_frac_zm, var_name="ice_supersat_frac_zm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2210 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd, var_name="bv_freq_sqd", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2218 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_splat, var_name="bv_freq_sqd_splat", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2226 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_mixed, var_name="bv_freq_sqd_mixed", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2234 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_moist, var_name="bv_freq_sqd_moist", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2242 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_dry, var_name="bv_freq_sqd_dry", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2250 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_smth, var_name="bv_freq_sqd_smth", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2258 : call stat_assign( var_index=stats_metadata%ibrunt_freq_out_cloud, var_name="bv_freq_out_cloud", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2302 : call stat_assign( var_index=stats_metadata%iwp3_on_wp2_cfl_num, var_name="wp3_on_wp2_cfl_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2330 : call stat_assign( var_index=stats_metadata%istability_correction, var_name="stability_correction", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2384 : call stat_assign( var_index=stats_metadata%isclrprtp(j), var_name="sclr"//trim(sclr_idx)//"prtp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2395 : call stat_assign( var_index=stats_metadata%isclrp2(j), var_name="sclr"//trim(sclr_idx)//"p2", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2406 : call stat_assign( var_index=stats_metadata%isclrpthvp(j), var_name="sclr"//trim(sclr_idx)//"pthvp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2417 : call stat_assign( var_index=stats_metadata%isclrpthlp(j), var_name="sclr"//trim(sclr_idx)//"pthlp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2428 : call stat_assign( var_index=stats_metadata%isclrprcp(j), var_name="sclr"//trim(sclr_idx)//"prcp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2439 : call stat_assign( var_index=stats_metadata%iwpsclrp(j), var_name="wpsclr"//trim(sclr_idx)//"p", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2450 : call stat_assign( var_index=stats_metadata%iwpsclrp2(j), var_name="wpsclr"//trim(sclr_idx)//"p2", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2461 : call stat_assign( var_index=stats_metadata%iwp2sclrp(j), var_name="wp2sclr"//trim(sclr_idx)//"p", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2472 : call stat_assign( var_index=stats_metadata%iwpsclrprtp(j), var_name="wpsclr"//trim(sclr_idx)//"prtp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2495 : call stat_assign( var_index=stats_metadata%iwpedsclrp(j), var_name="wpedsclr"//trim(sclr_idx)//"p", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_zm_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 231 : real( kind = core_rknd ), dimension(ngrdcol, nz, min(1,sclr_dim), 2 ), intent(in) :: & ! h1g, 2010-06-15 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 577 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 578 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 605 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 606 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 617 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 618 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 973 : 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. 988 : 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. 1011 : rsatl_2 = sat_mixrat_liq( nz, ngrdcol, p_in_Pa, tl2, saturation_formula ) ! h1g, 2010-06-16 end mod CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1117 : 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. 1292 : = pdf_params%mixt_frac(i,k) * ( ( sclr1(i,k,j) - sclrm(i,k,j) ) * pdf_params%rc_1(i,k) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1298 : + ( one - pdf_params%mixt_frac(i,k) ) * corr_sclr_rt_2(i,k,j) * pdf_params%crt_2(i,k) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1304 : - ( one - pdf_params%mixt_frac(i,k) ) * corr_sclr_thl_2(i,k,j) * pdf_params%cthl_2(i,k) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/pdf_closure_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 725 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 830 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 838 : time_current, stats_metadata%stats_tout, stats_lh_zt%num_output_fields, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 912 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 920 : time_current, stats_metadata%stats_tout, stats_lh_sfc%num_output_fields, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1149 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1232 : time_current+real(stats_metadata%stats_tout, kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1316 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1405 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1413 : time_current, stats_metadata%stats_tout, stats_sfc%num_output_fields, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2067 : 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. 2203 : call stat_update_var( stats_metadata%ivarnce_thl_1, pdf_params%varnce_thl_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2205 : call stat_update_var( stats_metadata%ivarnce_thl_2, pdf_params%varnce_thl_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2223 : call stat_update_var( stats_metadata%icloud_frac_1, pdf_params%cloud_frac_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2225 : call stat_update_var( stats_metadata%icloud_frac_2, pdf_params%cloud_frac_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2239 : call stat_update_var( stats_metadata%icovar_chi_eta_1, pdf_params%covar_chi_eta_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2241 : call stat_update_var( stats_metadata%icovar_chi_eta_2, pdf_params%covar_chi_eta_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2243 : call stat_update_var( stats_metadata%icorr_w_chi_1, pdf_params%corr_w_chi_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2245 : call stat_update_var( stats_metadata%icorr_w_chi_2, pdf_params%corr_w_chi_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2247 : call stat_update_var( stats_metadata%icorr_w_eta_1, pdf_params%corr_w_eta_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2249 : call stat_update_var( stats_metadata%icorr_w_eta_2, pdf_params%corr_w_eta_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2251 : call stat_update_var( stats_metadata%icorr_chi_eta_1, pdf_params%corr_chi_eta_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2253 : call stat_update_var( stats_metadata%icorr_chi_eta_2, pdf_params%corr_chi_eta_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2259 : call stat_update_var( stats_metadata%icorr_w_thl_1, pdf_params%corr_w_thl_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2261 : call stat_update_var( stats_metadata%icorr_w_thl_2, pdf_params%corr_w_thl_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2263 : call stat_update_var( stats_metadata%icorr_rt_thl_1, pdf_params%corr_rt_thl_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2265 : call stat_update_var( stats_metadata%icorr_rt_thl_2, pdf_params%corr_rt_thl_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2325 : call stat_update_var( stats_metadata%isclrm_f(isclr), sclrm_forcing(:,isclr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2334 : call stat_update_var( stats_metadata%iedsclrm_f(isclr), edsclrm_forcing(:,isclr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2417 : call stat_update_var( stats_metadata%iwp3_on_wp2_cfl_num, wp3_on_wp2 * dt / dzm, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2422 : call stat_update_var( stats_metadata%iice_supersat_frac_zm, ice_supersat_frac_zm, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2434 : call stat_update_var( stats_metadata%ivarnce_w_1_zm, pdf_params_zm%varnce_w_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2436 : call stat_update_var( stats_metadata%ivarnce_w_2_zm, pdf_params_zm%varnce_w_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2438 : call stat_update_var( stats_metadata%imixt_frac_zm, pdf_params_zm%mixt_frac(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2459 : call stat_update_var( stats_metadata%iwpsclrprtp(isclr), wpsclrprtp(:,isclr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2461 : call stat_update_var( stats_metadata%iwpsclrpthlp(isclr), wpsclrpthlp(:,isclr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2486 : call stat_update_var_pt( stats_metadata%icc, grid_level, maxval( cloud_frac(1:nz) ), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2510 : call stat_update_var_pt( stats_metadata%iz_cloud_base, grid_level, -10.0_core_rknd , & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2621 : call stat_update_var_pt( stats_metadata%itot_vartn_normlzd_rtm, grid_level, xtmp, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2627 : write(fstderr, *) "Warning: tot_vartn_normlzd_thlm tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2634 : call stat_update_var_pt( stats_metadata%itot_vartn_normlzd_thlm, grid_level, xtmp, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2640 : write(fstderr, *) "Warning: tot_vartn_normlzd_wprtp tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2647 : call stat_update_var_pt( stats_metadata%itot_vartn_normlzd_wprtp, grid_level, xtmp, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2893 : call stat_update_var( stats_metadata%ilh_rrm_mc, lh_hydromet_mc(:,hm_metadata%iirr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_clubb_utilities.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 501 : write(fstderr,*) "l_mono_flux_lim_rtm=T with l_mono_flux_lim_spikefix=F can lead to spikes aloft." CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 826 : call solve_xm_wpxp_with_single_lhs( nz, ngrdcol, sclr_dim, sclr_tol, gr, dt, l_iter, nrhs, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 925 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 926 : Lscale_zm(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 927 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 931 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 937 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 938 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 941 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 942 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 943 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 944 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 945 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 947 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2977 : call xm_wpxp_rhs( nz, ngrdcol, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3080 : call stat_update_var( stats_metadata%iupwp_pr4, C_uu_shr(i) * wp2(i,:) * ddzt_um(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3082 : call stat_update_var( stats_metadata%ivpwp_pr4, C_uu_shr(i) * wp2(i,:) * ddzt_vm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3279 : if ( stats_metadata%l_stats_samp .and. stats_metadata%ithlm_matrix_condt_num + stats_metadata%irtm_matrix_condt_num > 0 ) then CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4090 : call xm_wpxp_rhs( nz, ngrdcol, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xm_wpxp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 632 : call solve_xp2_xpyp_with_single_lhs( nz, ngrdcol, sclr_dim, sclr_tol, gr, sclr_idx, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1335 : sclrpthlp(:,:,sclr) ) ! Intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1865 : rhs_ta_wpsclrp2, rhs_ta_wprtpsclrp, rhs_ta_wpthlpsclrp, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2737 : 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. 2771 : ixapxbp_matrix_condt_num = max( stats_metadata%irtp2_matrix_condt_num, stats_metadata%ithlp2_matrix_condt_num, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2791 : call stat_update_var_pt( stats_metadata%irtp2_matrix_condt_num, 1, one / rcond(i), & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2794 : call stat_update_var_pt( stats_metadata%ithlp2_matrix_condt_num, 1, one / rcond(i), & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2797 : call stat_update_var_pt( stats_metadata%irtpthlp_matrix_condt_num, 1, one / rcond(i), & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4058 : wp_coef(i,k) = ( one - one_third * beta(i) ) * a1(i,k)**2 * wp3_on_wp2(i,k) / wp2(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4059 : wp_coef_zt(i,k) = ( one - one_third * beta(i) ) * a1_zt(i,k)**2 * wp3_on_wp2_zt(i,k) / wp2_zt(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4240 : sgn_t_vel_sclrprtp(i,k) = sign(one,term_wprtpsclrp_explicit_zm(i,k)*sclrprtp(i,k,sclr)) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4274 : sgn_t_vel_sclrpthlp(i,k) = sign(one,term_wpthlpsclrp_explicit_zm(i,k)*sclrpthlp(i,k,sclr)) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4367 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5269 : !call stat_update_var( stats_metadata%icoef_wprtp2_implicit, coef_wprtp2_implicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5273 : !call stat_update_var( stats_metadata%iterm_wprtp2_explicit, term_wprtp2_explicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5277 : !call stat_update_var( stats_metadata%icoef_wpthlp2_implicit, coef_wpthlp2_implicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5281 : !call stat_update_var( stats_metadata%iterm_wpthlp2_explicit, term_wpthlp2_explicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5285 : !call stat_update_var( stats_metadata%icoef_wprtpthlp_implicit, coef_wprtpthlp_implicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5289 : !call stat_update_var( stats_metadata%iterm_wprtpthlp_explicit, term_wprtpthlp_explicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xp2_xpyp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 552 : call stat_assign( var_index=stats_metadata%iice_supersat_frac, var_name="ice_supersat_frac", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 784 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 938 : call stat_assign( var_index=stats_metadata%irho, var_name="rho", var_description="rho, Air density", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2890 : call stat_assign( var_index=stats_metadata%iw_KK_evap_covar_zt, var_name="w_KK_evap_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2898 : call stat_assign( var_index=stats_metadata%irt_KK_evap_covar_zt, var_name="rt_KK_evap_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2906 : call stat_assign( var_index=stats_metadata%ithl_KK_evap_covar_zt, var_name="thl_KK_evap_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2915 : call stat_assign( var_index=stats_metadata%iw_KK_auto_covar_zt, var_name="w_KK_auto_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2923 : call stat_assign( var_index=stats_metadata%irt_KK_auto_covar_zt, var_name="rt_KK_auto_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2931 : call stat_assign( var_index=stats_metadata%ithl_KK_auto_covar_zt, var_name="thl_KK_auto_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2940 : call stat_assign( var_index=stats_metadata%iw_KK_accr_covar_zt, var_name="w_KK_accr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2949 : call stat_assign( var_index=stats_metadata%irt_KK_accr_covar_zt, var_name="rt_KK_accr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2958 : call stat_assign( var_index=stats_metadata%ithl_KK_accr_covar_zt, var_name="thl_KK_accr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2966 : call stat_assign( var_index=stats_metadata%irr_KK_mvr_covar_zt, var_name="rr_KK_mvr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2975 : call stat_assign( var_index=stats_metadata%iNr_KK_mvr_covar_zt, var_name="Nr_KK_mvr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2984 : call stat_assign( var_index=stats_metadata%iKK_mvr_variance_zt, var_name="KK_mvr_variance_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4932 : call stat_assign( var_index=stats_metadata%icloud_frac_refined, var_name="cloud_frac_refined", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4948 : call stat_assign( var_index=stats_metadata%ihl_on_Cp_residual, var_name="hl_on_Cp_residual", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4969 : call stat_assign( var_index=stats_metadata%isclrm(j), var_name="sclr"//trim(sclr_idx)//"m", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4980 : call stat_assign( var_index=stats_metadata%isclrm_f(j), var_name="sclr"//trim(sclr_idx)//"m_f", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4991 : call stat_assign( var_index=stats_metadata%iedsclrm(j), var_name="edsclr"//trim(sclr_idx)//"m", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5002 : call stat_assign( var_index=stats_metadata%iedsclrm_f(j), var_name="edsclr"//trim(sclr_idx)//"m_f", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_zt_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 466 : = ( ( hm_metadata%hmp2_ip_on_hmm2_ip(j) + one ) / precip_fracs%precip_frac(i,k) - one ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 695 : call calc_corr_norm_and_cholesky_factor( nz, ngrdcol, iiPDF_type, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 696 : pdf_dim, hm_metadata, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 697 : pdf_params%rc_1, pdf_params%rc_2, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 698 : corr_array_n_cloud, corr_array_n_below, & ! intent(out) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 699 : corr_array_1_n, corr_array_2_n, & ! intent(out) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 783 : call stat_update_var_pt( stats_metadata%ihmp2_zt(j), k, hydrometp2_zt(i,k,j), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 820 : corr_array_1_n(i,:,hm_metadata%iiPDF_chi,hm_metadata%iiPDF_eta), & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 821 : corr_array_2_n(i,:,hm_metadata%iiPDF_chi,hm_metadata%iiPDF_eta) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 846 : call stat_update_var_pt( stats_metadata%iprecip_frac, k, precip_fracs%precip_frac(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 855 : call stat_update_var_pt( stats_metadata%iprecip_frac_1, k, precip_fracs%precip_frac_1(i,k), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 864 : call stat_update_var_pt( stats_metadata%iprecip_frac_2, k, precip_fracs%precip_frac_2(i,k), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3854 : call stat_update_var_pt( stats_metadata%imu_hm_1(hm_idx), k, mu_x_1(k,ivar), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3864 : call stat_update_var_pt( stats_metadata%imu_hm_2(hm_idx), k, mu_x_2(k,ivar), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3875 : call stat_update_var_pt( stats_metadata%imu_Ncn_1, k, mu_x_1(k,iiPDF_Ncn), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3884 : call stat_update_var_pt( stats_metadata%imu_Ncn_2, k, mu_x_2(k,iiPDF_Ncn), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3899 : call stat_update_var_pt( stats_metadata%isigma_hm_1(hm_idx), k, sigma_x_1(k,ivar), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3910 : call stat_update_var_pt( stats_metadata%isigma_hm_2(hm_idx), k, sigma_x_2(k,ivar), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3921 : call stat_update_var_pt( stats_metadata%isigma_Ncn_1, k, sigma_x_1(k,iiPDF_Ncn), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3930 : call stat_update_var_pt( stats_metadata%isigma_Ncn_2, k, sigma_x_2(k,iiPDF_Ncn), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4257 : call stat_update_var_pt( stats_metadata%icorr_hmx_hmy_1(hm_idx_jvar,hm_idx_ivar), k, & ! in CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4269 : call stat_update_var_pt( stats_metadata%icorr_hmx_hmy_2(hm_idx_jvar,hm_idx_ivar), k, & ! in CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4394 : call stat_update_var_pt( stats_metadata%imu_hm_1_n(hm_idx), k, mu_hm_1_n(k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4413 : call stat_update_var_pt( stats_metadata%imu_hm_2_n(hm_idx), k, mu_hm_2_n(k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/setup_clubb_pdf_params.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 137 : wprtp_sfc = compute_wprtp_sfc( Cq, ubar, rtm_sfc, sat_mixrat_liq( p_sfc, T_sfc, saturation_formula ) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/Benchmark_cases/cloud_feedback.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 164 : wprtp_sfc = compute_wprtp_sfc( Cd, ubar, rtm_sfc, sat_mixrat_liq( p_sfc, T_sfc, saturation_formula ) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/Benchmark_cases/dycoms2_rf01.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 99 : wprtp_sfc = compute_wprtp_sfc( Cz, ubar, rtm_sfc, sat_mixrat_liq( p_sfc, T_sfc, saturation_formula ) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/Benchmark_cases/fire.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- 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 WARNING: Line has exceeded 100 characters. 447 : call assert_correct_cloud_normal( num_samples, X_u_all_levs(i,:,k,hm_metadata%iiPDF_chi), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2273 : ! call stat_update_var( stats_metadata%ilh_cloud_frac_unweighted, lh_cloud_frac, stats_lh_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2617 : ! call stat_update_var( stats_metadata%ilh_precip_frac_unweighted, lh_precip_frac, stats_lh_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2660 : call stat_update_var_pt( stats_metadata%ik_lh_start, 1, real( k_lh_start(i), kind=core_rknd ), stats_lh_sfc ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2707 : ! call stat_update_var( stats_metadata%ilh_samp_frac_category(icategory), lh_samp_frac(:,icategory), & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/SILHS/latin_hypercube_driver_module.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. 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. 502 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/spurious_source_test.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 559 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1597 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), &! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/pdf_parameter_tests.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. configurable_multi_column_nl not found, setting num_standalone_columns = 1 Warning: ../input/case_setups/bomex_corr_array_cloud.in was not found! The default correlation arrays will be used. Program exited normally configurable_multi_column_nl not found, setting num_standalone_columns = 1 Warning: ../input/case_setups/dycoms2_rf01_corr_array_cloud.in was not found! The default correlation arrays will be used. Program exited normally Directory 1 is 3d364fec45434074a7d9d1815861b4ff8d6df674 Directory 2 is 3d364fec45434074a7d9d1815861b4ff8d6df674 Using reporting threshold: 0.0 The following cases will be compared: ['bomex', 'dycoms2_rf01'] ###DIFFING bomex netCDF (*.nc) files### >No differences detected by the linux diff in bomex_zm.nc< >No differences detected by the linux diff in bomex_zt.nc< >No differences detected by the linux diff in bomex_sfc.nc< >>>The linux diff could not detect any differences in the file pairs for case bomex.<<< ********************************************************************************************************** ###DIFFING dycoms2_rf01 netCDF (*.nc) files### >No differences detected by the linux diff in dycoms2_rf01_zm.nc< >No differences detected by the linux diff in dycoms2_rf01_zt.nc< >No differences detected by the linux diff in dycoms2_rf01_sfc.nc< >>>The linux diff could not detect any differences in the file pairs for case dycoms2_rf01.<<< ********************************************************************************************************** SUMMARY: Linux diff did not detect any differences in the compared files. ......................................................................................................................................................................................................................................................................................................................................................................................................................................................................................../home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:2243:8: 2243 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1893:38: 1893 | real( kind = core_rknd ) :: factor | 1 Warning: Unused variable ‘factor’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1360:8: 1360 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1356:8: 1356 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1356:8: 1356 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1312:8: 1312 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1308:8: 1308 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1308:8: 1308 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1208:8: 1208 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1204:8: 1204 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1204:8: 1204 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1162:8: 1162 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1158:8: 1158 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/grid_class.F90:1158:8: 1158 | use model_flags, only: & | 1 Warning: Unused parameter ‘l_quintic_poly_interp’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:1696:16: 1696 | integer :: i, k | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:1696:19: 1696 | integer :: i, k | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/parameters_tunable.F90:2135:32: 2135 | subroutine init_parameters_999( & | ^ Warning: ‘init_parameters_999’ defined but not used [-Wunused-function] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:565:56: 565 | thlm, um, vm, em, Lscale, exner, rtm, & | 1 Warning: Unused dummy argument ‘em’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:364:8: 364 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘one_half’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_helper_module.F90:364:8: 364 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘zero_threshold’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/fill_holes.F90:660:41: 660 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp3_module.F90:119:16: 119 | integer :: i, k, sclr ! Loop index | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp3_module.F90:119:19: 119 | integer :: i, k, sclr ! Loop index | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/output_netcdf.F90:221:8: 221 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/output_netcdf.F90:218:8: 218 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1288:13: 1288 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1289:15: 1289 | km1_tdiag = 3 ! Thermodynamic subdiagonal index. | 1 Warning: Unused parameter ‘km1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mono_flux_limiter.F90:1287:15: 1287 | kp1_tdiag = 1, & ! Thermodynamic superdiagonal index. | 1 Warning: Unused parameter ‘kp1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clip_explicit.F90:872:43: 872 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clip_explicit.F90:426:40: 426 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clip_explicit.F90:157:22: 157 | integer :: sclr, i ! scalar array index. | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mixing_length.F90:889:8: 889 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘three’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/mixing_length.F90:21:50: 21 | stats_metadata, & | 1 Warning: Unused dummy argument ‘stats_metadata’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:589:29: 589 | -- this is likely unsafe and considered fatal" | 1 Warning: Missing ‘&’ in continued character constant at (1) [-Wampersand] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1327:49: 1327 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1851:13: 1851 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1852:15: 1852 | km1_tdiag = 3 ! Thermodynamic subdiagonal index. | 1 Warning: Unused parameter ‘km1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_windm_edsclrm_module.F90:1850:15: 1850 | kp1_tdiag = 1, & ! Thermodynamic superdiagonal index. | 1 Warning: Unused parameter ‘kp1_tdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:5851:57: 5851 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:4004:22: 4004 | sclr, i, b, k, l ! Loop index | 1 Warning: Unused variable ‘l’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3461:34: 3461 | integer :: i, k, k_low, k_high | 1 Warning: Unused variable ‘k_high’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3461:26: 3461 | integer :: i, k, k_low, k_high | 1 Warning: Unused variable ‘k_low’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3442:35: 3442 | real( kind = core_rknd ) :: tmp | 1 Warning: Unused variable ‘tmp’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3445:20: 3445 | turbulent_prod, & ! Turbulent production term [{x_a units}*{x_b units}/s] | 1 Warning: Unused variable ‘turbulent_prod’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2987:60: 2987 | C4_1d, invrs_tau_C4_zm, C14_1d, invrs_tau_C14_zm, & ! In | 1 Warning: Unused dummy argument ‘c14_1d’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2987:35: 2987 | C4_1d, invrs_tau_C4_zm, C14_1d, invrs_tau_C14_zm, & ! In | 1 Warning: Unused dummy argument ‘c4_1d’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3024:8: 3024 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘one_third’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3109:35: 3109 | real( kind = core_rknd ) :: tmp | 1 Warning: Unused variable ‘tmp’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:3024:8: 3024 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘two_thirds’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2702:13: 2702 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2703:15: 2703 | km1_mdiag = 3 ! Momentum subdiagonal index. | 1 Warning: Unused parameter ‘km1_mdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2701:15: 2701 | kp1_mdiag = 1, & ! Momentum superdiagonal index. | 1 Warning: Unused parameter ‘kp1_mdiag’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2608:42: 2608 | integer :: i, k, low_bound, high_bound | 1 Warning: Unused variable ‘high_bound’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:2608:30: 2608 | integer :: i, k, low_bound, high_bound | 1 Warning: Unused variable ‘low_bound’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:1602:28: 1602 | integer :: sclr, k, i, j | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xp2_xpyp_module.F90:409:18: 409 | rtm_zm, test | 1 Warning: Unused variable ‘test’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:5373:46: 5373 | subroutine wp3_term_pr1_rhs( nz, ngrdcol, gr, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:2346:15: 2346 | C_uu_buoy ! CLUBB tunable parameter C_uu_buoy | 1 Warning: Unused variable ‘c_uu_buoy’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:2157:38: 2157 | subroutine wp23_rhs( nz, ngrdcol, gr, dt, & | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1818:38: 1818 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1381:14: 1381 | C_uu_shr ! CLUBB tunable parameter C_uu_shr | 1 Warning: Unused variable ‘c_uu_shr’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1264:10: 1264 | nrhs = 1 ! Number of RHS vectors | 1 Warning: Unused parameter ‘nrhs’ declared at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1177:45: 1177 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:1364:15: 1364 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:385:10: 385 | c_K1, & ! CLUBB tunable parameter c_K1 | 1 Warning: Unused variable ‘c_k1’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_wp2_wp3_module.F90:386:10: 386 | c_K8 ! CLUBB tunable parameter c_K8 | 1 Warning: Unused variable ‘c_k8’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/stats_clubb_utilities.F90:1587:45: 1587 | subroutine stats_end_timestep( clubb_params, stats_metadata, & ! intent(in) | 1 Warning: Unused dummy argument ‘clubb_params’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/stats_clubb_utilities.F90:1594:51: 1594 | l_standard_term_ta & | 1 Warning: Unused dummy argument ‘l_standard_term_ta’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/stats_clubb_utilities.F90:1593:44: 1593 | l_tke_aniso, & | 1 Warning: Unused dummy argument ‘l_tke_aniso’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/stats_clubb_utilities.F90:1592:45: 1592 | , l_uv_nudge, & | 1 Warning: Unused dummy argument ‘l_uv_nudge’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/setup_clubb_pdf_params.F90:262:25: 262 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/setup_clubb_pdf_params.F90:263:25: 263 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:4321:8: 4321 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘eps’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:4180:43: 4180 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1525:22: 1525 | integer :: i, k, b | 1 Warning: Unused variable ‘b’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1112:74: 1112 | subroutine xm_wpxp_lhs( nz, ngrdcol, 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1252:45: 1252 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1252:29: 1252 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1190:8: 1190 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1118:40: 1118 | stats_metadata, & ! In | 1 Warning: Unused dummy argument ‘stats_metadata’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1112:62: 1112 | subroutine xm_wpxp_lhs( nz, ngrdcol, 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1112:55: 1112 | subroutine xm_wpxp_lhs( nz, ngrdcol, 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1113:56: 1113 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_xm_wpxp_module.F90:1113:40: 1113 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4928:47: 4928 | call calc_trapezoid_zm( nz, ngrdcol, gr, wpthvp, wpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4931:47: 4931 | call calc_trapezoid_zm( nz, ngrdcol, gr, thlpthvp, thlpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4934:47: 4934 | call calc_trapezoid_zm( nz, ngrdcol, gr, rtpthvp, rtpthvp_zt, & ! Intent(in) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zm’ and INTENT(OUT) argument ‘trapezoid_zm’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4822:34: 4822 | wprtp2, wprtp2_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4827:34: 4827 | wpthlp2, wpthlp2_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4832:34: 4832 | wprtpthlp, wprtpthlp_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4857:30: 4857 | cloud_frac, cloud_frac_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4861:30: 4861 | ice_supersat_frac, ice_supersat_frac_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4865:30: 4865 | rcm, rcm_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4869:30: 4869 | wp2thvp, wp2thvp_zm, & | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘variable_zt’ and INTENT(OUT) argument ‘trapezoid_zt’ at (1) /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4760:21: 4760 | integer :: i, k, sclr | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4088:10: 4088 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘iskw_max_mag’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4118:10: 4118 | use model_flags, only: & | 1 Warning: Unused parameter ‘lapack’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:4072:40: 4072 | subroutine check_clubb_settings( nzmax, params, & ! intent(in) | 1 Warning: Unused dummy argument ‘nzmax’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:2918:8: 2918 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘iskw_denom_coef’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:2918:8: 2918 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘iskw_max_mag’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:144:23: 144 | hydromet, l_mix_rat_hm, & ! intent(in) | 1 Warning: Unused dummy argument ‘hydromet’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/advance_clubb_core_module.F90:198:8: 198 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘num_hf_draw_points’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/CLUBB_core/clubb_api_module.F90:1025:16: 1025 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/output_2D_samples_module.F90:239:8: 239 | use parameter_indices, only: nparams | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/output_2D_samples_module.F90:164:8: 164 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/output_2D_samples_module.F90:168:8: 168 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/latin_hypercube_driver_module.F90:1007:44: 1007 | 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_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/latin_hypercube_driver_module.F90:80:8: 80 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/silhs_api_module.F90:347:8: 347 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/silhs_api_module.F90:326:13: 326 | rho_ds_zt, & ! Unused | 1 Warning: Unused dummy argument ‘rho_ds_zt’ at (1) [-Wunused-dummy-argument] /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo/compile/../src/SILHS/silhs_api_module.F90:170:8: 170 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘nparams’ which has been explicitly imported at (1) [-Wunused-parameter] ../src/Benchmark_cases/cloud_sed_module.F90:171:44: 171 | 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:1235:13: 1235 | .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:1236:13: 1236 | .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:1237:13: 1237 | .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:1238:13: 1238 | .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:1239:13: 1239 | .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:1240:13: 1240 | .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:1241:13: 1241 | .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:1242:13: 1242 | .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:1243:13: 1243 | .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:1244:13: 1244 | .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:1245:13: 1245 | .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/morrison_microphys_module.F90:20:33: 20 | saturation_formula, & | 1 Warning: Unused dummy argument ‘saturation_formula’ at (1) [-Wunused-dummy-argument] ../src/KK_microphys_module.F90:43:35: 43 | subroutine KK_local_microphys( gr, dt, nz, & ! In | 1 Warning: Unused dummy argument ‘gr’ at (1) [-Wunused-dummy-argument] ../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/clubb_driver.F90:6547:39: 6547 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in) | 1 Warning: Unused dummy argument ‘lmin’ at (1) [-Wunused-dummy-argument] ../src/clubb_driver.F90:6547:33: 6547 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in) | 1 Warning: Unused dummy argument ‘nu_vert_res_dep’ at (1) [-Wunused-dummy-argument] ../src/clubb_driver.F90:5722:8: 5722 | use constants_clubb, only: & | 1 Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter] ../src/clubb_driver.F90:73:8: 73 | use parameter_indices, only: & | 1 Warning: Unused parameter ‘iskw_denom_coef’ which has been explicitly imported at (1) [-Wunused-parameter] ../src/G_unit_test_types/smooth_heaviside_tests.F90:98:7: 98 | i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] ../src/G_unit_test_types/smooth_heaviside_tests.F90:120:80: 120 | total_mismatches = total_mismatches + COUNT(abs(result - result_cmp) >= eps) | ^ Warning: ‘total_mismatches’ is used uninitialized [-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. 677 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/clubb_tuner.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 952 : call stat_update_var_pt( stats_metadata%iNsm, k, real(Nsm(k), kind = core_rknd) ,stats_zt ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/coamps_microphys_driver_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 282 : nzt = stat_file_num_vertical_levels( "thlm", "../output/"//trim( stats_metadata%fname_zt )//".ctl" ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 283 : nzm = stat_file_num_vertical_levels( "thlm", "../output/"//trim( stats_metadata%fname_zm )//".ctl" ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/jacobian.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 179 : max( rtm(1,k) - sat_mixrat_liq( p_in_Pa(k), theta(1,k)*exner(1,k), saturation_formula ), & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 201 : rcm(1,k) = rcm_sat_adj( thlm(1,k), rtm(1,k), p_in_Pa(k), exner(1,k), saturation_formula ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/input_interpret.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 295 : z_i = lin_interpolate_two_points( 8.0e-3_core_rknd, rtm(k), rtm(k-1), gr%zt(1,k), gr%zt(1,k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/simple_rad_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 386 : call microphys_put_var( stats_metadata%irrm_src_adj, adj_terms%rrm_src_adj, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 387 : call microphys_put_var( stats_metadata%iNrm_src_adj, adj_terms%Nrm_src_adj, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 390 : call microphys_put_var( stats_metadata%irrm_evap_adj, adj_terms%rrm_evap_adj, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 391 : call microphys_put_var( stats_metadata%iNrm_evap_adj, adj_terms%Nrm_evap_adj, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 393 : call microphys_put_var( stats_metadata%irrm_mc_nonadj, KK_auto_tndcy+KK_accr_tndcy+KK_evap_tndcy, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1102 : call stat_update_var( stats_metadata%irrm_mc_nonadj, KK_auto_tndcy+KK_accr_tndcy+KK_evap_tndcy, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1683 : call stat_update_var_pt( stats_metadata%im_vol_rad_rain, level, KK_mean_vol_rad, stats_zt ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/KK_microphys_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 974 : = clubb_params(iomicron) * hm_metadata%hmp2_ip_on_hmm2_ip(pdf2hydromet_idx(ivar,hm_metadata)) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/microphys_init_cleanup.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 828 : call microphys_put_var( stats_metadata%irsm_sd_morr_int, (/rsm_sd_morr_int/), microphys_stats_sfc ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 846 : call microphys_put_var( stats_metadata%ihl_on_Cp_residual, hl_on_Cp_residual, microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 861 : call microphys_put_var( stats_metadata%iPSMLT, real( PSMLT, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 862 : call microphys_put_var( stats_metadata%iEVPMS, real( EVPMS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 863 : call microphys_put_var( stats_metadata%iPRACS, real( PRACS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 864 : call microphys_put_var( stats_metadata%iEVPMG, real( EVPMG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 865 : call microphys_put_var( stats_metadata%iPRACG, real( PRACG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 866 : call microphys_put_var( stats_metadata%iPGMLT, real( PGMLT, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 867 : call microphys_put_var( stats_metadata%iMNUCCC, real( MNUCCC, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 868 : call microphys_put_var( stats_metadata%iPSACWS, real( PSACWS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 869 : call microphys_put_var( stats_metadata%iPSACWI, real( PSACWI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 870 : call microphys_put_var( stats_metadata%iQMULTS, real( QMULTS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 871 : call microphys_put_var( stats_metadata%iQMULTG, real( QMULTG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 872 : call microphys_put_var( stats_metadata%iPSACWG, real( PSACWG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 873 : call microphys_put_var( stats_metadata%iPGSACW, real( PGSACW, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 877 : call microphys_put_var( stats_metadata%iQMULTR, real( QMULTR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 878 : call microphys_put_var( stats_metadata%iQMULTRG, real( QMULTRG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 879 : call microphys_put_var( stats_metadata%iMNUCCD, real( MNUCCD, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 880 : call microphys_put_var( stats_metadata%iPRACI, real( PRACI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 881 : call microphys_put_var( stats_metadata%iPRACIS, real( PRACIS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 883 : call microphys_put_var( stats_metadata%iMNUCCR, real( MNUCCR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 884 : call microphys_put_var( stats_metadata%iPIACR, real( PIACR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 885 : call microphys_put_var( stats_metadata%iPIACRS, real( PIACRS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 886 : call microphys_put_var( stats_metadata%iPGRACS, real( PGRACS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 888 : call microphys_put_var( stats_metadata%iEPRDS, real( EPRDS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 889 : call microphys_put_var( stats_metadata%iPSACR, real( PSACR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 891 : call microphys_put_var( stats_metadata%iEPRDG, real( EPRDG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 894 : call microphys_put_var( stats_metadata%iNGSTEN, real( NGSTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 895 : call microphys_put_var( stats_metadata%iNRSTEN, real( NRSTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 896 : call microphys_put_var( stats_metadata%iNISTEN, real( NISTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 897 : call microphys_put_var( stats_metadata%iNSSTEN, real( NSSTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 898 : call microphys_put_var( stats_metadata%iNCSTEN, real( NCSTEN, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 899 : call microphys_put_var( stats_metadata%iNPRC1, real( NPRC1, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 900 : call microphys_put_var( stats_metadata%iNRAGG, real( NRAGG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 901 : call microphys_put_var( stats_metadata%iNPRACG, real( NPRACG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 902 : call microphys_put_var( stats_metadata%iNSUBR, real( NSUBR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 903 : call microphys_put_var( stats_metadata%iNSMLTR, real( NSMLTR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 904 : call microphys_put_var( stats_metadata%iNGMLTR, real( NGMLTR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 905 : call microphys_put_var( stats_metadata%iNPRACS, real( NPRACS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 906 : call microphys_put_var( stats_metadata%iNNUCCR, real( NNUCCR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 907 : call microphys_put_var( stats_metadata%iNIACR, real( NIACR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 908 : call microphys_put_var( stats_metadata%iNIACRS, real( NIACRS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 909 : call microphys_put_var( stats_metadata%iNGRACS, real( NGRACS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 910 : call microphys_put_var( stats_metadata%iNSMLTS, real( NSMLTS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 911 : call microphys_put_var( stats_metadata%iNSAGG, real( NSAGG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 912 : call microphys_put_var( stats_metadata%iNPRCI, real( NPRCI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 913 : call microphys_put_var( stats_metadata%iNSCNG, real( NSCNG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 914 : call microphys_put_var( stats_metadata%iNSUBS, real( NSUBS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 917 : call microphys_put_var( stats_metadata%iNNUCCC, real( NNUCCC, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 918 : call microphys_put_var( stats_metadata%iNPSACWS, real( NPSACWS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 921 : call microphys_put_var( stats_metadata%iNPSACWI, real( NPSACWI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 922 : call microphys_put_var( stats_metadata%iNPSACWG, real( NPSACWG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 923 : call microphys_put_var( stats_metadata%iNPRAI, real( NPRAI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 924 : call microphys_put_var( stats_metadata%iNMULTS, real( NMULTS, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 925 : call microphys_put_var( stats_metadata%iNMULTG, real( NMULTG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 926 : call microphys_put_var( stats_metadata%iNMULTR, real( NMULTR, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 927 : call microphys_put_var( stats_metadata%iNMULTRG, real( NMULTRG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 928 : call microphys_put_var( stats_metadata%iNNUCCD, real( NNUCCD, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 929 : call microphys_put_var( stats_metadata%iNSUBI, real( NSUBI, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 930 : call microphys_put_var( stats_metadata%iNGMLTG, real( NGMLTG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 931 : call microphys_put_var( stats_metadata%iNSUBG, real( NSUBG, kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 933 : call microphys_put_var( stats_metadata%iSIZEFIX_NR, real( SIZEFIX_NR,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 934 : call microphys_put_var( stats_metadata%iSIZEFIX_NC, real( SIZEFIX_NC,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 935 : call microphys_put_var( stats_metadata%iSIZEFIX_NI, real( SIZEFIX_NI,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 936 : call microphys_put_var( stats_metadata%iSIZEFIX_NS, real( SIZEFIX_NS,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 937 : call microphys_put_var( stats_metadata%iSIZEFIX_NG, real( SIZEFIX_NG,kind=core_rknd),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 938 : call microphys_put_var( stats_metadata%iNEGFIX_NR, real( NEGFIX_NR,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 939 : call microphys_put_var( stats_metadata%iNEGFIX_NC, real( NEGFIX_NC,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 940 : call microphys_put_var( stats_metadata%iNEGFIX_NI, real( NEGFIX_NI,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 941 : call microphys_put_var( stats_metadata%iNEGFIX_NS, real( NEGFIX_NS,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 942 : call microphys_put_var( stats_metadata%iNEGFIX_NG, real( NEGFIX_NG,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 943 : call microphys_put_var( stats_metadata%iNIM_MORR_CL, real( NIM_MORR_CL,kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 944 : call microphys_put_var( stats_metadata%iQC_INST, real( QC_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 945 : call microphys_put_var( stats_metadata%iQR_INST, real( QR_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 946 : call microphys_put_var( stats_metadata%iQI_INST, real( QI_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 947 : call microphys_put_var( stats_metadata%iQS_INST, real( QS_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 948 : call microphys_put_var( stats_metadata%iQG_INST, real( QG_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 949 : call microphys_put_var( stats_metadata%iNC_INST, real( NC_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 950 : call microphys_put_var( stats_metadata%iNR_INST, real( NR_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 951 : call microphys_put_var( stats_metadata%iNI_INST, real( NI_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 952 : call microphys_put_var( stats_metadata%iNS_INST, real( NS_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 953 : call microphys_put_var( stats_metadata%iNG_INST, real( NG_INST,kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 955 : call microphys_put_var( stats_metadata%iT_in_K_mc, real( T_in_K_mc, kind=core_rknd ),microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 960 : call microphys_put_var( stats_metadata%ieff_rad_cloud, real( effc(:), kind = core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 961 : call microphys_put_var( stats_metadata%ieff_rad_ice, real( effi(:), kind = core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 962 : call microphys_put_var( stats_metadata%ieff_rad_snow, real( effs(:), kind = core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 963 : call microphys_put_var( stats_metadata%ieff_rad_rain, real( effr(:), kind = core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 964 : call microphys_put_var( stats_metadata%ieff_rad_graupel, real( effg(:), kind=core_rknd ), microphys_stats_zt ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/morrison_microphys_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 384 : z(kp2), p_in_Pa(km1), p_in_Pa(k00), p_in_Pa(kp1), p_in_Pa(kp2) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 433 : press(i) = lin_interpolate_two_points( gr%zt(1,i), z(k), z(k-1), p_in_Pa(k), p_in_Pa(k-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/sounding.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 954 : if ( trim( hm_metadata%hydromet_list(i) ) == "rrm" .and. stats_metadata%iVrrprrp > 0 ) then CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 957 : call stat_update_var( stats_metadata%iVrrprrp, hydromet_vel_covar(:,hm_metadata%iirr), & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 960 : elseif ( trim( hm_metadata%hydromet_list(i) ) == "Nrm" .and. stats_metadata%iVNrpNrp > 0 ) then CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 963 : call stat_update_var( stats_metadata%iVNrpNrp, hydromet_vel_covar(:,hm_metadata%iiNr), stats_zm ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/advance_microphys_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: 'use' statement w/o 'only' found in the following line: 6664 : 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. 868 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1316 : call write_text( "l_modify_ic_with_cubic_int = ", l_modify_ic_with_cubic_int, l_write_to_file, iunit ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1317 : call write_text( "l_modify_bc_for_cnvg_test = ", l_modify_bc_for_cnvg_test, l_write_to_file, iunit ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2223 : (/lon_vals/), (/lat_vals/), time_current, dt_main, l_silhs_out_in,&!intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2240 : (/lon_vals/), (/lat_vals/), time_current, dt_main, l_silhs_out_in,&!intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2295 : if ( .not. (( abs(dt_rad/stats_metadata%stats_tout - real(floor(dt_rad/stats_metadata%stats_tout), kind=core_rknd)) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2297 : ( abs(stats_metadata%stats_tout/dt_rad - real(floor(stats_metadata%stats_tout/dt_rad), kind=core_rknd)) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2512 : clubb_params(1,:), nu_vert_res_dep, lmin, & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2563 : clubb_params(1,:), nu_vert_res_dep, lmin, & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2611 : clubb_params(1,:), & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2620 : stats_zt, stats_zm, stats_sfc, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2626 : precip_fracs, & ! Intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2646 : stats_zt, stats_zm, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3515 : ! em(k) = ( 0.15_core_rknd * (1.0_core_rknd - gr%zm(1,k)/150.0_core_rknd) ) / rho_zm(k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4115 : = max( rtm(1,k) - sat_mixrat_liq( p_in_Pa(k), thm(1,k) * exner(1,k), saturation_formula ), & 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. 102 : Skx(i,k) = min( max( Skx(i,k), -clubb_params(i,iSkw_max_mag) ), clubb_params(i,iSkw_max_mag) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/Skx_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 155 : stats_metadata, & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 460 : 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. 150 : (/1._c,-.6_c, .09_c , .09_c , .788_c, .675_c, .240_c, .222_c, .240_c, .222_c, .240_c, .222_c, & ! chi CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 151 : 0._c, 1._c, .027_c, .027_c, .114_c, .115_c,-.029_c, .093_c, .022_c, .013_c, 0._c , 0._c , & ! eta CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 152 : 0._c, 0._c, 1._c , .34_c , .315_c, .270_c, .120_c, .167_c, 0._c , 0._c , 0._c , 0._c , & ! w CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 153 : 0._c, 0._c, 0._c , 1._c , 0._c , 0._c , .464_c, .320_c, .168_c, .232_c, 0._c , 0._c , & ! Ncn CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 154 : 0._c, 0._c, 0._c , 0._c , 1._c , .821_c, 0._c , 0._c , .173_c, .164_c, .319_c, .308_c, & ! rr CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 155 : 0._c, 0._c, 0._c , 0._c , 0._c , 1._c , .152_c, .143_c, 0._c , 0._c , .285_c, .273_c, & ! Nr CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 156 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, .585_c, .571_c, .379_c, .363_c, & ! ri CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 157 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .571_c, .550_c, .363_c, .345_c, & ! Ni CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 158 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, .485_c, .470_c, & ! rs CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 159 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .470_c, .450_c, & ! Ns CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 160 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, & ! rg CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 161 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c/), & ! Ng CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 166 : (/1._c, .3_c, .09_c , .09_c , .788_c, .675_c, .240_c, .222_c, .240_c, .222_c, .240_c, .222_c, &! chi CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 167 : 0._c, 1._c, .027_c, .027_c, .114_c, .115_c,-.029_c, .093_c, .022_c, .013_c, 0._c , 0._c , &! eta CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 169 : 0._c, 0._c, 0._c , 1._c , 0._c , 0._c , .464_c, .320_c, .168_c, .232_c, 0._c , 0._c , &! Ncn CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 170 : 0._c, 0._c, 0._c , 0._c , 1._c , .821_c, 0._c , 0._c , .173_c, .164_c, .319_c, .308_c, &! rr CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 171 : 0._c, 0._c, 0._c , 0._c , 0._c , 1._c , .152_c, .143_c, 0._c , 0._c , .285_c, .273_c, &! Nr CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 172 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, .585_c, .571_c, .379_c, .363_c, &! ri CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 173 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .571_c, .550_c, .363_c, .345_c, &! Ni CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 174 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, .485_c, .470_c, &! rs CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 175 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .470_c, .450_c, &! Ns CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 176 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c , .758_c, &! rg CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 177 : 0._c, 0._c, 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 0._c , 1._c/), &! Ng CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/corr_varnce_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 327 : stability_correction(i,k) = one + min( lambda0_stability(i,k) * brunt_vaisala_freq_sqd(i,k) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 630 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 631 : ! for a plot on how output behaves with varying min_max_smth_mag CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 795 : fnc_Richardson(i,k) = ( Ri_zm(i,k) - clubb_params(i,iRichardson_num_min) ) * invrs_min_max_diff CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_helper_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 413 : stats_metadata, & ! intent(in) stats_metadata, & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/clip_explicit.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 685 : * ( one - Skw(i,k) / sqrt( four * ( one - sigma_sqd_w(i,k) )**3 + Skw(i,k)**2 ) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/adg1_adg2_3d_luhar_pdf.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 144 : !$acc enter data create( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 238 : !$acc parallel loop gang vector collapse(2) default(present) reduction(.or.:l_field_below_threshold) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 250 : !$acc exit data delete( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/fill_holes.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 480 : = + gr%invrs_dzt(i,k) * ( K_zt(i,k) + nu(i) ) * ( gr%invrs_dzm(i,k) + gr%invrs_dzm(i,k-1) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1124 : = + gr%invrs_dzm(i,k) * ( K_zm(i,k) + nu(i) ) * ( gr%invrs_dzt(i,k+1) + gr%invrs_dzt(i,k) ) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/diffusion.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 480 : write(fstderr,*) "grdcol #", i, "rhs # ", n, "band_solvex backward error est. =", berr(i,n) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/lapack_wrap.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Number of "private" statements does not not match number of modules. CLUBBStandardsCheck.pl WARNING: Private Test failed! ../src/CLUBB_core/matrix_solver_wrapper.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 504 : call windm_edsclrm_solve( nz, ngrdcol, gr, nrhs, stats_metadata%iwindm_matrix_condt_num, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 909 : call windm_edsclrm_solve( nz, ngrdcol, gr, nrhs, stats_metadata%iwindm_matrix_condt_num, & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_windm_edsclrm_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 174 : if ( stats_metadata%iwprtpthlp > 0 ) call check_nan( wprtpthlp, "wprtpthlp", proc_name ) ! intnet(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/numerical_check.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 43 : ! lower_1(2)*upper_1(1)+l_diag(2)*1 = lhs(0,2) => l_diag(2) = lhs(0,2) - lower_1(2)*upper_1(1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 44 : ! lower_1(2)*upper_2(1)+l_diag(2)*upper_1(2) = lhs(-1,2) => upper_1(2) = ( lhs(-1,2)-lower_1(2)*upper_2(1) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 46 : ! l_diag(2)*upper_2(2) = lhs(-2,2) => upper_2(2) = lhs(-2,2) / l_diag(2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 52 : ! l_2(k)*upper_1(k-2)+lower_1(k)*1 = lhs(1,k) => lower_1(k) = lhs(1,k) - l_2(k)*upper_1(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 53 : ! l_2(k)*upper_2(k-2)+lower_1(k)*upper_1(k-1) = lhs( 0,k) => l_diag(k) = lhs(0,k) - l_2(k)*upper_2(k-2) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 54 : ! +l_diag(k)*1 + lower_1(k)*upper_1(k-1) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/penta_lu_solver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 375 : thv_par_1(i,j) = thl_par_1(i,j) + ep1 * thv_ds(i,j) * rt_par_1(i,j) + Lv_coef(i,j) * rc_par_1(i,j) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 623 : thv_par_1(i,j) = thl_par_1(i,j) + ep1 * thv_ds(i,j) * rt_par_1(i,j) + Lv_coef(i,j) * rc_par_1(i,j) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 992 : ! if l_avg_Lscale is true, compute_mixing_length is called two additional CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1472 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1473 : ! for a plot on how output behaves with varying min_max_smth_mag CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1476 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1592 : invrs_tau_shear_smooth(i,k) = clubb_params(i,iC_invrs_tau_shear) * smooth_norm_ddzt_umvm(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1653 : 1.e8_core_rknd * abs(brunt_vaisala_freq_sqd_mixed(i,k))**3) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1669 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_smth, brunt_vaisala_freq_sqd_smth(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1691 : brunt_vaisala_freq_clipped = smooth_max( nz, ngrdcol, 1.0e-7_core_rknd, brunt_vaisala_freq_sqd_smth, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1806 : call stat_update_var(stats_metadata%ibrunt_freq_out_cloud, brunt_freq_out_cloud(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1851 : / ( gr%zm(i,k) - sfc_elevation(i) + clubb_params(i,iz_displace) ) ! small CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1904 : + clubb_params(i,iC_invrs_tau_N2_wpxp) * brunt_freq_out_cloud(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1983 : tmp_calc(i,k) = clubb_params(i,iC_invrs_tau_wpxp_Ri) * Ri_zm_smooth(i,k)**clubb_params(i,iwpxp_Ri_exp) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2014 : * max( Ri_zm(i,k), zero)**clubb_params(i,iwpxp_Ri_exp), 12.0_core_rknd ) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2026 : + clubb_params(i,iC_invrs_tau_N2_clear_wp3) * brunt_freq_out_cloud(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2074 : tau_zt = smooth_min( nz, ngrdcol, tau_zt_unclipped, tau_max_zt, 1.0e3_core_rknd * min_max_smth_mag ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/mixing_length.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1173 : !$acc fcor_col, sfc_elevation_col, thlm_forcing_col, rtm_forcing_col, um_forcing_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1174 : !$acc vm_forcing_col, wprtp_forcing_col, wpthlp_forcing_col, rtp2_forcing_col, thlp2_forcing_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1175 : !$acc rtpthlp_forcing_col, wm_zm_col, wm_zt_col, rho_zm_col, rho_col, rho_ds_zm_col, rho_ds_zt_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1176 : !$acc invrs_rho_ds_zm_col, invrs_rho_ds_zt_col, thv_ds_zm_col, thv_ds_zt_col, rfrzm_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1179 : !$acc upwp_sfc_pert_col, vpwp_sfc_pert_col, rtm_ref_col, thlm_ref_col, um_ref_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1181 : !$acc copy( um_col, upwp_col, vm_col, vpwp_col, up2_col, vp2_col, up3_col, vp3_col, rtm_col, wprtp_col, thlm_col, wpthlp_col, rtp2_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1184 : !$acc rtpthvp_col, thlpthvp_col, wp2rtp_col, wp2thlp_col, uprcp_col, vprcp_col, rc_coef_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1185 : !$acc wp4_col, wpup2_col, wpvp2_col, wp2up2_col, wp2vp2_col, ice_supersat_frac_col, um_pert_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1234 : !$acc copyout( rcm_in_layer_col, cloud_cover_col, wprcp_col, w_up_in_cloud_col, w_down_in_cloud_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1235 : !$acc cloudy_updraft_frac_col, cloudy_downdraft_frac_col, invrs_tau_zm_col, Kh_zt_col, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1241 : !$acc copy( sclrm_col, wpsclrp_col, sclrp2_col, sclrp3_col, sclrprtp_col, sclrpthlp_col, sclrpthvp ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2080 : 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. 259 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 465 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 741 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 868 : 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. 885 : write(iunit,*) "l_use_tke_in_wp3_pr_turb_term = ", clubb_config_flags%l_use_tke_in_wp3_pr_turb_term CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 887 : write(iunit,*) "l_use_wp3_lim_with_smth_Heaviside = ", clubb_config_flags%l_use_wp3_lim_with_smth_Heaviside CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 889 : write(iunit,*) "l_modify_limiters_for_cnvg_test = ", clubb_config_flags%l_modify_limiters_for_cnvg_test CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/model_flags.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 339 : 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. 462 : esat(i,k) = 10._core_rknd**(-7.90298_core_rknd*(373.16_core_rknd/T_in_K_clipped-1._core_rknd)+ & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1392 : *(MAX( rtm - sat_mixrat_liq(p_in_Pa,theta*exner, saturation_formula), zero_threshold )) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/saturation.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 75 : call stat_assign( var_index=stats_metadata%ilh_morr_snow_rate, var_name="lh_morr_snow_rate", & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 99 : call stat_assign( var_index=stats_metadata%ik_lh_start, var_name="k_lh_start", & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_lh_sfc_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 516 : wstar = ( one/T0 * grav * wpthlp(i,1) * 0.2_core_rknd * depth_pos_wpthlp(i) )**(one_third) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/sfc_varnce_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 8 : ! easier for the clubb_tuner code to use the clubb_params vector without "knowing" any information CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/parameters_tunable.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 114 : call stat_assign( var_index=stats_metadata%iFrad_LW_rad, var_name="Frad_LW_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 123 : call stat_assign( var_index=stats_metadata%iFrad_SW_rad, var_name="Frad_SW_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 132 : call stat_assign( var_index=stats_metadata%iFrad_SW_up_rad, var_name="Frad_SW_up_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 141 : call stat_assign( var_index=stats_metadata%iFrad_LW_up_rad, var_name="Frad_LW_up_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 150 : call stat_assign( var_index=stats_metadata%iFrad_SW_down_rad, var_name="Frad_SW_down_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 160 : call stat_assign( var_index=stats_metadata%iFrad_LW_down_rad, var_name="Frad_LW_down_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_rad_zm_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 88 : call stat_assign( var_index=stats_metadata%iT_in_K_rad, var_name="T_in_K_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 123 : call stat_assign( var_index=stats_metadata%ircm_in_cloud_rad, var_name="rcm_in_cloud_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 132 : call stat_assign( var_index=stats_metadata%icloud_frac_rad, var_name="cloud_frac_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 142 : call stat_assign( var_index=stats_metadata%iice_supersat_frac_rad, var_name="ice_supersat_frac_rad", & !In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 160 : call stat_assign( var_index=stats_metadata%iradht_LW_rad, var_name="radht_LW_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 169 : call stat_assign( var_index=stats_metadata%iradht_SW_rad, var_name="radht_SW_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 178 : call stat_assign( var_index=stats_metadata%ip_in_mb_rad, var_name="p_in_mb_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 187 : call stat_assign( var_index=stats_metadata%isp_humidity_rad, var_name="sp_humidity_rad", & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_rad_zt_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 177 : call stat_assign( var_index=stats_metadata%ilh_thlm_mc, var_name="lh_thlm_mc", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 306 : call stat_assign( var_index=stats_metadata%ilh_rcm_avg, var_name="lh_rcm_avg", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 459 : call stat_assign( var_index=stats_metadata%ilh_cloud_frac, var_name="lh_cloud_frac", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 513 : call stat_assign( var_index=stats_metadata%ilh_Ncnp2_zt, var_name="lh_Ncnp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 522 : call stat_assign( var_index=stats_metadata%ilh_Ncp2_zt, var_name="lh_Ncp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 531 : call stat_assign( var_index=stats_metadata%ilh_Nrp2_zt, var_name="lh_Nrp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 540 : call stat_assign( var_index=stats_metadata%ilh_rcp2_zt, var_name="lh_rcp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 549 : call stat_assign( var_index=stats_metadata%ilh_rtp2_zt, var_name="lh_rtp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 558 : call stat_assign( var_index=stats_metadata%ilh_thlp2_zt, var_name="lh_thlp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 567 : call stat_assign( var_index=stats_metadata%ilh_rrp2_zt, var_name="lh_rrp2_zt", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 576 : call stat_assign( var_index=stats_metadata%ilh_rrm_auto, var_name="lh_rrm_auto", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 585 : call stat_assign( var_index=stats_metadata%ilh_rrm_accr, var_name="lh_rrm_accr", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 593 : call stat_assign( var_index=stats_metadata%ilh_rrm_evap, var_name="lh_rrm_evap", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 602 : call stat_assign( var_index=stats_metadata%ilh_Nrm_auto, var_name="lh_Nrm_auto", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 611 : call stat_assign( var_index=stats_metadata%ilh_Nrm_evap, var_name="lh_Nrm_evap", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 620 : call stat_assign( var_index=stats_metadata%ilh_rrm_src_adj, var_name="lh_rrm_src_adj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 629 : call stat_assign( var_index=stats_metadata%ilh_rrm_evap_adj, var_name="lh_rrm_evap_adj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 638 : call stat_assign( var_index=stats_metadata%ilh_Nrm_src_adj, var_name="lh_Nrm_src_adj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 648 : call stat_assign( var_index=stats_metadata%ilh_Nrm_evap_adj, var_name="lh_Nrm_evap_adj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 658 : call stat_assign( var_index=stats_metadata%ilh_precip_frac, var_name="lh_precip_frac", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 677 : call stat_assign( var_index=stats_metadata%ilh_mixt_frac, var_name="lh_mixt_frac", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 697 : call stat_assign( var_index=stats_metadata%ilh_m_vol_rad_rain, var_name="lh_m_vol_rad_rain", & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 705 : call stat_assign( var_index=stats_metadata%ilh_rrm_mc_nonadj, var_name="lh_rrm_mc_nonadj", & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 717 : call stat_assign( var_index=stats_metadata%isilhs_variance_category(icategory), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 733 : call stat_assign( var_index=stats_metadata%ilh_samp_frac_category(icategory), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_lh_zt_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 385 : call stat_update_var_pt( stats_metadata%iprecip_frac_tol, 1, precip_frac_tol(j), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 395 : call precip_frac_assert_check( nz, hydromet_dim, hydromet_tol, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 397 : precip_frac_1(j,:), precip_frac_2(j,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 398 : precip_frac_tol(j) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/precipitation_fraction.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 127 : call stat_assign( var_index=stats_metadata%icc, var_name="cc", var_description="cc, Cloud cover", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 344 : call stat_assign( var_index=stats_metadata%iwp23_matrix_condt_num, var_name="wp23_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 351 : call stat_assign( var_index=stats_metadata%ithlm_matrix_condt_num, var_name="thlm_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 360 : call stat_assign( var_index=stats_metadata%irtm_matrix_condt_num, var_name="rtm_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 369 : call stat_assign( var_index=stats_metadata%ithlp2_matrix_condt_num, var_name="thlp2_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 377 : call stat_assign( var_index=stats_metadata%irtp2_matrix_condt_num, var_name="rtp2_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 403 : call stat_assign( var_index=stats_metadata%iwindm_matrix_condt_num, var_name="windm_matrix_condt_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 437 : call stat_assign( var_index=stats_metadata%itot_vartn_normlzd_rtm, var_name="tot_vartn_normlzd_rtm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 445 : call stat_assign( var_index=stats_metadata%itot_vartn_normlzd_thlm, var_name="tot_vartn_normlzd_thlm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 453 : call stat_assign( var_index=stats_metadata%itot_vartn_normlzd_wprtp, var_name="tot_vartn_normlzd_wprtp", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_sfc_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 43 : ! lower(k)*upper(k-1)+l_diag(k)*1 = lhs( 0,k) => l_diag(k) = lhs( 0,k) - lower(k)*upper(k-1) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 205 : lower_diag_invrs(i,ndim) = 1.0_core_rknd / ( lhs(0,i,ndim) - lhs(1,i,ndim) * upper(i,ndim-1) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 292 : lower_diag_invrs(i,ndim) = 1.0_core_rknd / ( lhs(0,i,ndim) - lhs(1,i,ndim) * upper(i,ndim-1) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/tridiag_lu_solver.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 617 : call stat_update_var( stats_metadata%icoef_wp4_implicit, coef_wp4_implicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1420 : call stat_update_var_pt( stats_metadata%iwp23_matrix_condt_num, 1, one / rcond(i), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1511 : call stat_end_update_pt( stats_metadata%iwp2_dp1, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1558 : call stat_end_update_pt( stats_metadata%iwp2_pr1, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1620 : call stat_end_update_pt( stats_metadata%iwp3_ta, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1633 : call stat_end_update_pt( stats_metadata%iwp3_tp, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1639 : call stat_end_update_pt( stats_metadata%iwp3_pr_tp, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2710 : call stat_update_var_pt( stats_metadata%iwp2_pr_dfsn, k, rhs_pr_dfsn_wp2(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2715 : call stat_update_var_pt( stats_metadata%iwp2_splat, k, - lhs_splat_wp2(i,k) * wp2(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2731 : call stat_modify_pt( stats_metadata%iwp2_pr1, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2814 : call stat_begin_update_pt( stats_metadata%iwp3_ta, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2829 : call stat_begin_update_pt( stats_metadata%iwp3_tp, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2835 : call stat_begin_update_pt( stats_metadata%iwp3_pr_tp, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2879 : call stat_update_var_pt( stats_metadata%iwp3_splat, k, - lhs_splat_wp3(i,k) * wp3(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2890 : call stat_begin_update_pt( stats_metadata%iwp3_dp1, k, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2909 : call stat_update_var_pt( stats_metadata%iwp3_pr_turb, k, rhs_pr_turb_wp3(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2911 : call stat_update_var_pt( stats_metadata%iwp3_pr_dfsn, k, rhs_pr_dfsn_wp3(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_wp2_wp3_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 845 : !$acc rc_coef_zm, Km_zm, Kmh_zm, gamma_Skw_fnc, sigma_sqd_w, sigma_sqd_w_tmp, sigma_sqd_w_zt, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 924 : thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 925 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 926 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 927 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 928 : 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. 929 : 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. 930 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 931 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 934 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 935 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1587 : ! Added an extra check for stats_metadata%irel_humidity > 0; otherwise, if both stats_metadata%irsat = 0 and CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1588 : ! stats_metadata%irel_humidity = 0, rsat is not computed, leading to a floating-point exception CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1600 : call stat_update_var( stats_metadata%irel_humidity, rel_humidity(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1649 : call stat_update_var( stats_metadata%istability_correction, stability_correction(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1730 : call stat_update_var(stats_metadata%iinvrs_tau_wpxp_zm, invrs_tau_wpxp_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1734 : call stat_update_var(stats_metadata%iinvrs_tau_wp3_zm, invrs_tau_wp3_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1738 : call stat_update_var(stats_metadata%iinvrs_tau_no_N2_zm, invrs_tau_no_N2_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1747 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd, brunt_vaisala_freq_sqd(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1749 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_splat, brunt_vaisala_freq_sqd_splat(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1751 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_mixed, brunt_vaisala_freq_sqd_mixed(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1753 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_moist, brunt_vaisala_freq_sqd_moist(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1755 : call stat_update_var(stats_metadata%ibrunt_vaisala_freq_sqd_dry, brunt_vaisala_freq_sqd_dry(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1774 : clubb_config_flags%l_modify_limiters_for_cnvg_test, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1776 : stats_zm, & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1868 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2231 : * ( one - exp( brunt_vaisala_freq_sqd_zt(i,k) / clubb_params(i,ixp3_coef_slope) ) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2654 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2655 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2656 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2657 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2658 : 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. 2659 : 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. 2660 : 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. 2663 : 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. 2664 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2665 : 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. 2666 : 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. 2667 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2670 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2671 : 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. 2674 : 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. 2675 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2676 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2677 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2678 : clubb_config_flags%saturation_formula, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2679 : stats_metadata, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2680 : stats_zt(i), stats_zm(i), stats_sfc(i) ) ! intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2702 : thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2703 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2704 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2705 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2706 : 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. 2707 : 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. 2708 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2709 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2712 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2713 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2810 : !$acc rc_coef_zm, Km_zm, Kmh_zm, gamma_Skw_fnc, sigma_sqd_w, sigma_sqd_w_tmp, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2811 : !$acc sqrt_em_zt, xp3_coef_fnc, w_1_zm, w_2_zm, varnce_w_1_zm, varnce_w_2_zm, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2816 : !$acc invrs_tau_C4_zm, invrs_tau_C14_zm, invrs_tau_wp2_zm, invrs_tau_wpxp_zm, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2817 : !$acc invrs_tau_wp3_zm, invrs_tau_no_N2_zm, invrs_tau_bkgnd, invrs_tau_shear, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4195 : write(fstderr,*) "l_stability_correct_tau_zm = ", clubb_config_flags%l_stability_correct_tau_zm CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4231 : write(fstderr,*) "Unknown type of double Gaussian PDF selected: ", clubb_config_flags%iiPDF_type CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_clubb_core_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 231 : real( kind = core_rknd ), dimension(ngrdcol, nz, min(1,sclr_dim), 2 ), intent(in) :: & ! h1g, 2010-06-15 CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 577 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 578 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 605 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 606 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 617 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 618 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 973 : 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. 988 : 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. 1011 : rsatl_2 = sat_mixrat_liq( nz, ngrdcol, p_in_Pa, tl2, saturation_formula ) ! h1g, 2010-06-16 end mod CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1117 : 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. 1292 : = pdf_params%mixt_frac(i,k) * ( ( sclr1(i,k,j) - sclrm(i,k,j) ) * pdf_params%rc_1(i,k) ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1298 : + ( one - pdf_params%mixt_frac(i,k) ) * corr_sclr_rt_2(i,k,j) * pdf_params%crt_2(i,k) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1304 : - ( one - pdf_params%mixt_frac(i,k) ) * corr_sclr_thl_2(i,k,j) * pdf_params%cthl_2(i,k) & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/pdf_closure_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 725 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 830 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 838 : time_current, stats_metadata%stats_tout, stats_lh_zt%num_output_fields, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 912 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 920 : time_current, stats_metadata%stats_tout, stats_lh_sfc%num_output_fields, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1149 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1232 : time_current+real(stats_metadata%stats_tout, kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1316 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1405 : time_current+real(stats_metadata%stats_tout,kind=time_precision), & !intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1413 : time_current, stats_metadata%stats_tout, stats_sfc%num_output_fields, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2067 : 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. 2203 : call stat_update_var( stats_metadata%ivarnce_thl_1, pdf_params%varnce_thl_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2205 : call stat_update_var( stats_metadata%ivarnce_thl_2, pdf_params%varnce_thl_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2223 : call stat_update_var( stats_metadata%icloud_frac_1, pdf_params%cloud_frac_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2225 : call stat_update_var( stats_metadata%icloud_frac_2, pdf_params%cloud_frac_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2239 : call stat_update_var( stats_metadata%icovar_chi_eta_1, pdf_params%covar_chi_eta_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2241 : call stat_update_var( stats_metadata%icovar_chi_eta_2, pdf_params%covar_chi_eta_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2243 : call stat_update_var( stats_metadata%icorr_w_chi_1, pdf_params%corr_w_chi_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2245 : call stat_update_var( stats_metadata%icorr_w_chi_2, pdf_params%corr_w_chi_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2247 : call stat_update_var( stats_metadata%icorr_w_eta_1, pdf_params%corr_w_eta_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2249 : call stat_update_var( stats_metadata%icorr_w_eta_2, pdf_params%corr_w_eta_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2251 : call stat_update_var( stats_metadata%icorr_chi_eta_1, pdf_params%corr_chi_eta_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2253 : call stat_update_var( stats_metadata%icorr_chi_eta_2, pdf_params%corr_chi_eta_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2259 : call stat_update_var( stats_metadata%icorr_w_thl_1, pdf_params%corr_w_thl_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2261 : call stat_update_var( stats_metadata%icorr_w_thl_2, pdf_params%corr_w_thl_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2263 : call stat_update_var( stats_metadata%icorr_rt_thl_1, pdf_params%corr_rt_thl_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2265 : call stat_update_var( stats_metadata%icorr_rt_thl_2, pdf_params%corr_rt_thl_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2325 : call stat_update_var( stats_metadata%isclrm_f(isclr), sclrm_forcing(:,isclr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2334 : call stat_update_var( stats_metadata%iedsclrm_f(isclr), edsclrm_forcing(:,isclr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2417 : call stat_update_var( stats_metadata%iwp3_on_wp2_cfl_num, wp3_on_wp2 * dt / dzm, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2422 : call stat_update_var( stats_metadata%iice_supersat_frac_zm, ice_supersat_frac_zm, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2434 : call stat_update_var( stats_metadata%ivarnce_w_1_zm, pdf_params_zm%varnce_w_1(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2436 : call stat_update_var( stats_metadata%ivarnce_w_2_zm, pdf_params_zm%varnce_w_2(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2438 : call stat_update_var( stats_metadata%imixt_frac_zm, pdf_params_zm%mixt_frac(1,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2459 : call stat_update_var( stats_metadata%iwpsclrprtp(isclr), wpsclrprtp(:,isclr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2461 : call stat_update_var( stats_metadata%iwpsclrpthlp(isclr), wpsclrpthlp(:,isclr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2486 : call stat_update_var_pt( stats_metadata%icc, grid_level, maxval( cloud_frac(1:nz) ), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2510 : call stat_update_var_pt( stats_metadata%iz_cloud_base, grid_level, -10.0_core_rknd , & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2621 : call stat_update_var_pt( stats_metadata%itot_vartn_normlzd_rtm, grid_level, xtmp, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2627 : write(fstderr, *) "Warning: tot_vartn_normlzd_thlm tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2634 : call stat_update_var_pt( stats_metadata%itot_vartn_normlzd_thlm, grid_level, xtmp, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2640 : write(fstderr, *) "Warning: tot_vartn_normlzd_wprtp tried to divide by zero denominator ", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2647 : call stat_update_var_pt( stats_metadata%itot_vartn_normlzd_wprtp, grid_level, xtmp, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2893 : call stat_update_var( stats_metadata%ilh_rrm_mc, lh_hydromet_mc(:,hm_metadata%iirr), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_clubb_utilities.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 501 : write(fstderr,*) "l_mono_flux_lim_rtm=T with l_mono_flux_lim_spikefix=F can lead to spikes aloft." CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 826 : call solve_xm_wpxp_with_single_lhs( nz, ngrdcol, sclr_dim, sclr_tol, gr, dt, l_iter, nrhs, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 925 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 926 : Lscale_zm(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 927 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 931 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 937 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 938 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 941 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 942 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 943 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 944 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 945 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 947 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2977 : call xm_wpxp_rhs( nz, ngrdcol, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3080 : call stat_update_var( stats_metadata%iupwp_pr4, C_uu_shr(i) * wp2(i,:) * ddzt_um(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3082 : call stat_update_var( stats_metadata%ivpwp_pr4, C_uu_shr(i) * wp2(i,:) * ddzt_vm(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3279 : if ( stats_metadata%l_stats_samp .and. stats_metadata%ithlm_matrix_condt_num + stats_metadata%irtm_matrix_condt_num > 0 ) then CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4090 : call xm_wpxp_rhs( nz, ngrdcol, xm_wpxp_scalar, l_iter, dt, sclrm(:,:,j), wpsclrp(:,:,j), & ! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xm_wpxp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 431 : call stat_assign( var_index=stats_metadata%iinvrs_tau_wpxp_zm, var_name="invrs_tau_wpxp_zm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 447 : call stat_assign( var_index=stats_metadata%iinvrs_tau_no_N2_zm, var_name="invrs_tau_no_N2_zm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2086 : call stat_assign( var_index=stats_metadata%iice_supersat_frac_zm, var_name="ice_supersat_frac_zm", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2210 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd, var_name="bv_freq_sqd", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2218 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_splat, var_name="bv_freq_sqd_splat", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2226 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_mixed, var_name="bv_freq_sqd_mixed", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2234 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_moist, var_name="bv_freq_sqd_moist", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2242 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_dry, var_name="bv_freq_sqd_dry", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2250 : call stat_assign( var_index=stats_metadata%ibrunt_vaisala_freq_sqd_smth, var_name="bv_freq_sqd_smth", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2258 : call stat_assign( var_index=stats_metadata%ibrunt_freq_out_cloud, var_name="bv_freq_out_cloud", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2302 : call stat_assign( var_index=stats_metadata%iwp3_on_wp2_cfl_num, var_name="wp3_on_wp2_cfl_num", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2330 : call stat_assign( var_index=stats_metadata%istability_correction, var_name="stability_correction", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2384 : call stat_assign( var_index=stats_metadata%isclrprtp(j), var_name="sclr"//trim(sclr_idx)//"prtp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2395 : call stat_assign( var_index=stats_metadata%isclrp2(j), var_name="sclr"//trim(sclr_idx)//"p2", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2406 : call stat_assign( var_index=stats_metadata%isclrpthvp(j), var_name="sclr"//trim(sclr_idx)//"pthvp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2417 : call stat_assign( var_index=stats_metadata%isclrpthlp(j), var_name="sclr"//trim(sclr_idx)//"pthlp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2428 : call stat_assign( var_index=stats_metadata%isclrprcp(j), var_name="sclr"//trim(sclr_idx)//"prcp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2439 : call stat_assign( var_index=stats_metadata%iwpsclrp(j), var_name="wpsclr"//trim(sclr_idx)//"p", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2450 : call stat_assign( var_index=stats_metadata%iwpsclrp2(j), var_name="wpsclr"//trim(sclr_idx)//"p2", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2461 : call stat_assign( var_index=stats_metadata%iwp2sclrp(j), var_name="wp2sclr"//trim(sclr_idx)//"p", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2472 : call stat_assign( var_index=stats_metadata%iwpsclrprtp(j), var_name="wpsclr"//trim(sclr_idx)//"prtp", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2495 : call stat_assign( var_index=stats_metadata%iwpedsclrp(j), var_name="wpedsclr"//trim(sclr_idx)//"p", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_zm_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 466 : = ( ( hm_metadata%hmp2_ip_on_hmm2_ip(j) + one ) / precip_fracs%precip_frac(i,k) - one ) & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 695 : call calc_corr_norm_and_cholesky_factor( nz, ngrdcol, iiPDF_type, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 696 : pdf_dim, hm_metadata, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 697 : pdf_params%rc_1, pdf_params%rc_2, & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 698 : corr_array_n_cloud, corr_array_n_below, & ! intent(out) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 699 : corr_array_1_n, corr_array_2_n, & ! intent(out) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 783 : call stat_update_var_pt( stats_metadata%ihmp2_zt(j), k, hydrometp2_zt(i,k,j), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 820 : corr_array_1_n(i,:,hm_metadata%iiPDF_chi,hm_metadata%iiPDF_eta), & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 821 : corr_array_2_n(i,:,hm_metadata%iiPDF_chi,hm_metadata%iiPDF_eta) ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 846 : call stat_update_var_pt( stats_metadata%iprecip_frac, k, precip_fracs%precip_frac(i,k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 855 : call stat_update_var_pt( stats_metadata%iprecip_frac_1, k, precip_fracs%precip_frac_1(i,k), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 864 : call stat_update_var_pt( stats_metadata%iprecip_frac_2, k, precip_fracs%precip_frac_2(i,k), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3854 : call stat_update_var_pt( stats_metadata%imu_hm_1(hm_idx), k, mu_x_1(k,ivar), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3864 : call stat_update_var_pt( stats_metadata%imu_hm_2(hm_idx), k, mu_x_2(k,ivar), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3875 : call stat_update_var_pt( stats_metadata%imu_Ncn_1, k, mu_x_1(k,iiPDF_Ncn), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3884 : call stat_update_var_pt( stats_metadata%imu_Ncn_2, k, mu_x_2(k,iiPDF_Ncn), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3899 : call stat_update_var_pt( stats_metadata%isigma_hm_1(hm_idx), k, sigma_x_1(k,ivar), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3910 : call stat_update_var_pt( stats_metadata%isigma_hm_2(hm_idx), k, sigma_x_2(k,ivar), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3921 : call stat_update_var_pt( stats_metadata%isigma_Ncn_1, k, sigma_x_1(k,iiPDF_Ncn), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 3930 : call stat_update_var_pt( stats_metadata%isigma_Ncn_2, k, sigma_x_2(k,iiPDF_Ncn), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4257 : call stat_update_var_pt( stats_metadata%icorr_hmx_hmy_1(hm_idx_jvar,hm_idx_ivar), k, & ! in CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4269 : call stat_update_var_pt( stats_metadata%icorr_hmx_hmy_2(hm_idx_jvar,hm_idx_ivar), k, & ! in CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4394 : call stat_update_var_pt( stats_metadata%imu_hm_1_n(hm_idx), k, mu_hm_1_n(k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4413 : call stat_update_var_pt( stats_metadata%imu_hm_2_n(hm_idx), k, mu_hm_2_n(k), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/setup_clubb_pdf_params.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 632 : call solve_xp2_xpyp_with_single_lhs( nz, ngrdcol, sclr_dim, sclr_tol, gr, sclr_idx, & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1335 : sclrpthlp(:,:,sclr) ) ! Intent(inout) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1865 : rhs_ta_wpsclrp2, rhs_ta_wprtpsclrp, rhs_ta_wpthlpsclrp, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2737 : 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. 2771 : ixapxbp_matrix_condt_num = max( stats_metadata%irtp2_matrix_condt_num, stats_metadata%ithlp2_matrix_condt_num, & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2791 : call stat_update_var_pt( stats_metadata%irtp2_matrix_condt_num, 1, one / rcond(i), & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2794 : call stat_update_var_pt( stats_metadata%ithlp2_matrix_condt_num, 1, one / rcond(i), & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2797 : call stat_update_var_pt( stats_metadata%irtpthlp_matrix_condt_num, 1, one / rcond(i), & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4058 : wp_coef(i,k) = ( one - one_third * beta(i) ) * a1(i,k)**2 * wp3_on_wp2(i,k) / wp2(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4059 : wp_coef_zt(i,k) = ( one - one_third * beta(i) ) * a1_zt(i,k)**2 * wp3_on_wp2_zt(i,k) / wp2_zt(i,k) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4240 : sgn_t_vel_sclrprtp(i,k) = sign(one,term_wprtpsclrp_explicit_zm(i,k)*sclrprtp(i,k,sclr)) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4274 : sgn_t_vel_sclrpthlp(i,k) = sign(one,term_wpthlpsclrp_explicit_zm(i,k)*sclrpthlp(i,k,sclr)) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4367 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! Intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5269 : !call stat_update_var( stats_metadata%icoef_wprtp2_implicit, coef_wprtp2_implicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5273 : !call stat_update_var( stats_metadata%iterm_wprtp2_explicit, term_wprtp2_explicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5277 : !call stat_update_var( stats_metadata%icoef_wpthlp2_implicit, coef_wpthlp2_implicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5281 : !call stat_update_var( stats_metadata%iterm_wpthlp2_explicit, term_wpthlp2_explicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5285 : !call stat_update_var( stats_metadata%icoef_wprtpthlp_implicit, coef_wprtpthlp_implicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5289 : !call stat_update_var( stats_metadata%iterm_wprtpthlp_explicit, term_wprtpthlp_explicit(i,:), & ! intent(in) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/advance_xp2_xpyp_module.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 552 : call stat_assign( var_index=stats_metadata%iice_supersat_frac, var_name="ice_supersat_frac", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 784 : var_description="rt'^3, Third-order moment of total water, rt", var_units="(kg/kg)^3", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 938 : call stat_assign( var_index=stats_metadata%irho, var_name="rho", var_description="rho, Air density", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2890 : call stat_assign( var_index=stats_metadata%iw_KK_evap_covar_zt, var_name="w_KK_evap_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2898 : call stat_assign( var_index=stats_metadata%irt_KK_evap_covar_zt, var_name="rt_KK_evap_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2906 : call stat_assign( var_index=stats_metadata%ithl_KK_evap_covar_zt, var_name="thl_KK_evap_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2915 : call stat_assign( var_index=stats_metadata%iw_KK_auto_covar_zt, var_name="w_KK_auto_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2923 : call stat_assign( var_index=stats_metadata%irt_KK_auto_covar_zt, var_name="rt_KK_auto_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2931 : call stat_assign( var_index=stats_metadata%ithl_KK_auto_covar_zt, var_name="thl_KK_auto_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2940 : call stat_assign( var_index=stats_metadata%iw_KK_accr_covar_zt, var_name="w_KK_accr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2949 : call stat_assign( var_index=stats_metadata%irt_KK_accr_covar_zt, var_name="rt_KK_accr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2958 : call stat_assign( var_index=stats_metadata%ithl_KK_accr_covar_zt, var_name="thl_KK_accr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2966 : call stat_assign( var_index=stats_metadata%irr_KK_mvr_covar_zt, var_name="rr_KK_mvr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2975 : call stat_assign( var_index=stats_metadata%iNr_KK_mvr_covar_zt, var_name="Nr_KK_mvr_covar_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2984 : call stat_assign( var_index=stats_metadata%iKK_mvr_variance_zt, var_name="KK_mvr_variance_zt", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4932 : call stat_assign( var_index=stats_metadata%icloud_frac_refined, var_name="cloud_frac_refined", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4948 : call stat_assign( var_index=stats_metadata%ihl_on_Cp_residual, var_name="hl_on_Cp_residual", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4969 : call stat_assign( var_index=stats_metadata%isclrm(j), var_name="sclr"//trim(sclr_idx)//"m", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4980 : call stat_assign( var_index=stats_metadata%isclrm_f(j), var_name="sclr"//trim(sclr_idx)//"m_f", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 4991 : call stat_assign( var_index=stats_metadata%iedsclrm(j), var_name="edsclr"//trim(sclr_idx)//"m", & CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 5002 : call stat_assign( var_index=stats_metadata%iedsclrm_f(j), var_name="edsclr"//trim(sclr_idx)//"m_f", & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/CLUBB_core/stats_zt_module.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. CLUBBStandardsCheck.pl has begun. -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 137 : wprtp_sfc = compute_wprtp_sfc( Cq, ubar, rtm_sfc, sat_mixrat_liq( p_sfc, T_sfc, saturation_formula ) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/Benchmark_cases/cloud_feedback.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 164 : wprtp_sfc = compute_wprtp_sfc( Cd, ubar, rtm_sfc, sat_mixrat_liq( p_sfc, T_sfc, saturation_formula ) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/Benchmark_cases/dycoms2_rf01.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 99 : wprtp_sfc = compute_wprtp_sfc( Cz, ubar, rtm_sfc, sat_mixrat_liq( p_sfc, T_sfc, saturation_formula ) ) CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/Benchmark_cases/fire.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- 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 WARNING: Line has exceeded 100 characters. 447 : call assert_correct_cloud_normal( num_samples, X_u_all_levs(i,:,k,hm_metadata%iiPDF_chi), & ! In CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2273 : ! call stat_update_var( stats_metadata%ilh_cloud_frac_unweighted, lh_cloud_frac, stats_lh_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2617 : ! call stat_update_var( stats_metadata%ilh_precip_frac_unweighted, lh_precip_frac, stats_lh_zt ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2660 : call stat_update_var_pt( stats_metadata%ik_lh_start, 1, real( k_lh_start(i), kind=core_rknd ), stats_lh_sfc ) CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 2707 : ! call stat_update_var( stats_metadata%ilh_samp_frac_category(icategory), lh_samp_frac(:,icategory), & CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/SILHS/latin_hypercube_driver_module.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. 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. 502 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/spurious_source_test.F90 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 559 : l_host_applies_sfc_fluxes ! Use to determine whether a host model has already applied the surface flux, CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters. 1597 : wp2(1,:), rtp2(1,:), thlp2(1,:), up2(1,:), vp2(1,:), &! In CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters. ../src/G_unit_test_types/pdf_parameter_tests.F90 -------------------------------------------------------------------------------- CLUBBStandardsCheck.pl has finished. configurable_multi_column_nl not found, setting num_standalone_columns = 1 Warning: ../input/case_setups/bomex_corr_array_cloud.in was not found! The default correlation arrays will be used. Program exited normally configurable_multi_column_nl not found, setting num_standalone_columns = 1 Warning: ../input/case_setups/dycoms2_rf01_corr_array_cloud.in was not found! The default correlation arrays will be used. Program exited normally Directory 1 is 9136bf065fe59e64db24c8a3f2aeee7178450273 Directory 2 is 3d364fec45434074a7d9d1815861b4ff8d6df674 Using reporting threshold: 0.0 The following cases will be compared: ['bomex', 'dycoms2_rf01'] ###DIFFING bomex netCDF (*.nc) files### >The linux diff detected differences in bomex_zm.nc< >>Differences above threshold were detected in the common fields in file bomex_zm.nc<< >No differences detected by the linux diff in bomex_zt.nc< >No differences detected by the linux diff in bomex_sfc.nc< >>>Differences in common variables detected for case bomex<<< ********************************************************************************************************** ###DIFFING dycoms2_rf01 netCDF (*.nc) files### >The linux diff detected differences in dycoms2_rf01_zm.nc< >>Differences above threshold were detected in the common fields in file dycoms2_rf01_zm.nc<< >No differences detected by the linux diff in dycoms2_rf01_zt.nc< >No differences detected by the linux diff in dycoms2_rf01_sfc.nc< >>>Differences in common variables detected for case dycoms2_rf01<<< ********************************************************************************************************** SUMMARY: There were differences detected in the common variables in netCDF (*.nc) files. =============================== Configuring Test =============================== Working directory set to: . Trying to clone repo... Cloned repo location: /home/jenkins/workspace/clubb_bin_diff_regression_backwards_compatibility_gfortran_test/repo Output Save Mode: none Using branch: master Making list from 'UnresolvedCommits': Run Output Path: repo/output Run commands: ['repo/compile/compile.bash', '\nrm -rf repo/output', 'mkdir repo/output', '\ncp repo/input/tunable_parameters_compatible_r8029/configurable_model_flags.in repo/input/tunable_parameters', '\ncp repo/input/tunable_parameters_compatible_r8029/silhs_parameters.in repo/input/tunable_parameters', '\ncp repo/input/tunable_parameters_compatible_r8029/tunable_parameters.in repo/input/tunable_parameters', '\nrepo/run_scripts/run_scm.bash bomex', '\nrepo/run_scripts/run_scm.bash dycoms2_rf01'] Diffing command: python3 repo/run_scripts/run_bindiff_all.py =============================== Running Test =============================== Parsing message from commit: 9136bf065fe59e64db24c8a3f2aeee7178450273 Found: BIT_CHANGING Checking Commit: 9136bf065fe59e64db24c8a3f2aeee7178450273 Checking out 3d364fec45434074a7d9d1815861b4ff8d6df674 Running: 'repo/compile/compile.bash' Running: ' rm -rf repo/output' Running: 'mkdir repo/output' Running: ' cp repo/input/tunable_parameters_compatible_r8029/configurable_model_flags.in repo/input/tunable_parameters' Running: ' cp repo/input/tunable_parameters_compatible_r8029/silhs_parameters.in repo/input/tunable_parameters' Running: ' cp repo/input/tunable_parameters_compatible_r8029/tunable_parameters.in repo/input/tunable_parameters' Running: ' repo/run_scripts/run_scm.bash bomex' Running: ' repo/run_scripts/run_scm.bash dycoms2_rf01' Output from 3d364fec45434074a7d9d1815861b4ff8d6df674 already saved Diffing: 'python3 repo/run_scripts/run_bindiff_all.py 3d364fec45434074a7d9d1815861b4ff8d6df674 3d364fec45434074a7d9d1815861b4ff8d6df674' Checking out 9136bf065fe59e64db24c8a3f2aeee7178450273 Running: 'repo/compile/compile.bash' Running: ' rm -rf repo/output' Running: 'mkdir repo/output' Running: ' cp repo/input/tunable_parameters_compatible_r8029/configurable_model_flags.in repo/input/tunable_parameters' Running: ' cp repo/input/tunable_parameters_compatible_r8029/silhs_parameters.in repo/input/tunable_parameters' Running: ' cp repo/input/tunable_parameters_compatible_r8029/tunable_parameters.in repo/input/tunable_parameters' Running: ' repo/run_scripts/run_scm.bash bomex' Running: ' repo/run_scripts/run_scm.bash dycoms2_rf01' Output from 3d364fec45434074a7d9d1815861b4ff8d6df674 already saved Diffing: 'python3 repo/run_scripts/run_bindiff_all.py 9136bf065fe59e64db24c8a3f2aeee7178450273 3d364fec45434074a7d9d1815861b4ff8d6df674' Commit '9136bf065fe59e64db24c8a3f2aeee7178450273' is BIT_CHANGING and properly labelled as such. =============================== Test Results =============================== Commit Range Checked = 3d364fec45434074a7d9d1815861b4ff8d6df674...9136bf065fe59e64db24c8a3f2aeee7178450273 No new Unresolved commits found. No fake BIT_CHANGING commits found. No remaining Unresolved Commits. =============================== Updating Config File =============================== Saving into UnresolvedCommits: Saving into BaselineCommit: 9136bf065fe59e64db24c8a3f2aeee7178450273 =============================== Cleanup =============================== Removed repo. Removing all generated output REMOVING: 3d364fec45434074a7d9d1815861b4ff8d6df674 REMOVING: 9136bf065fe59e64db24c8a3f2aeee7178450273 ================== Unresolved Commit Status ================== No remaining Unresolved Commits. Exiting with code: 0 [Pipeline] } [Pipeline] // stage [Pipeline] stage [Pipeline] { (Declarative: Post Actions) [Pipeline] script [Pipeline] { [Pipeline] cleanWs [WS-CLEANUP] Deleting project workspace... [WS-CLEANUP] Deferred wipeout is used... [WS-CLEANUP] done [Pipeline] } [Pipeline] // script [Pipeline] } [Pipeline] // stage [Pipeline] } [Pipeline] // withEnv [Pipeline] } [Pipeline] // node [Pipeline] End of Pipeline Finished: SUCCESS