Console Output
Skipping 202 KB..
Full Log| .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]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/coamps_microphys_driver_module.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/microphys_init_cleanup.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/simple_rad_module.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/mpace_a.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/sfc_flux.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/bomex.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/clex9_nov02.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/cloud_feedback.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/cobra.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/dycoms2_rf01.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/dycoms2_rf02.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/fire.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/gabls2.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/gabls3.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/gabls3_night.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/jun25.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/lba.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/mpace_b.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/nov11.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/rico.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/neutral_case.F90
../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]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/twp_ice.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/clex9_oct14.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/extended_atmosphere_module.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/stat_file_utils.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/KK_microphys_module.F90
../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]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/arm.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/arm_0003.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/arm_3year.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/astex_a209.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/atex.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/Benchmark_cases/arm_97.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/input_fields.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/bugsrad_driver.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/sounding.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c -I../src ../src/estimate_scm_microphys_module.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c -I../src ../src/lh_microphys_driver_module.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/microphys_driver.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/clubb_driver.F90
../src/clubb_driver.F90:6537:39:
6537 | clubb_params, nu_vert_res_dep, lmin, & ! intent(in)
| 1
Warning: Unused dummy argument ‘lmin’ at (1) [-Wunused-dummy-argument]
../src/clubb_driver.F90:6537:33:
6537 | 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:5712:8:
5712 | use constants_clubb, only: &
| 1
Warning: Unused parameter ‘fstdout’ which has been explicitly imported at (1) [-Wunused-parameter]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c ../src/error.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -Wno-conversion -c -I../src ../src/enhanced_simann.F90
ar rv /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../lib/libclubb_other.a clex9_oct14.o extended_atmosphere_module.o enhanced_simann.o diag_ustar_module.o twp_ice.o cloud_sed_module.o neutral_case.o quicksort.o morrison_microphys_module.o sounding.o fire.o gabls2.o lba.o clex9_nov02.o hydrostatic_module.o rad_lwsw_module.o estimate_scm_microphys_module.o arm_3year.o spec_hum_to_mixing_ratio.o cloud_feedback.o arm_97.o silhs_category_variance_module.o cobra.o gabls3_night.o microphys_init_cleanup.o advance_microphys_module.o bugsrad_driver.o extrapolation.o simple_rad_module.o coamps_microphys_driver_module.o mpace_b.o jun25.o mixed_moment_PDF_integrals.o dycoms2_rf01.o cos_solar_zen_module.o microphys_driver.o input_fields.o bomex.o ice_dfsn_module.o sfc_flux.o input_interpret.o dycoms2_rf02.o mpace_a.o soil_vegetation.o stat_file_utils.o rico.o time_dependent_input.o astex_a209.o parameters_radiation.o error.o gfdl_activation.o arm.o gabls3.o arm_0003.o input_netcdf.o atex.o KK_microphys_module.o nov11.o wangara.o parameters_microphys.o input_grads.o lh_microphys_driver_module.o clubb_driver.o clubb_model_settings.o
ar: creating /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../lib/libclubb_other.a
a - clex9_oct14.o
a - extended_atmosphere_module.o
a - enhanced_simann.o
a - diag_ustar_module.o
a - twp_ice.o
a - cloud_sed_module.o
a - neutral_case.o
a - quicksort.o
a - morrison_microphys_module.o
a - sounding.o
a - fire.o
a - gabls2.o
a - lba.o
a - clex9_nov02.o
a - hydrostatic_module.o
a - rad_lwsw_module.o
a - estimate_scm_microphys_module.o
a - arm_3year.o
a - spec_hum_to_mixing_ratio.o
a - cloud_feedback.o
a - arm_97.o
a - silhs_category_variance_module.o
a - cobra.o
a - gabls3_night.o
a - microphys_init_cleanup.o
a - advance_microphys_module.o
a - bugsrad_driver.o
a - extrapolation.o
a - simple_rad_module.o
a - coamps_microphys_driver_module.o
a - mpace_b.o
a - jun25.o
a - mixed_moment_PDF_integrals.o
a - dycoms2_rf01.o
a - cos_solar_zen_module.o
a - microphys_driver.o
a - input_fields.o
a - bomex.o
a - ice_dfsn_module.o
a - sfc_flux.o
a - input_interpret.o
a - dycoms2_rf02.o
a - mpace_a.o
a - soil_vegetation.o
a - stat_file_utils.o
a - rico.o
a - time_dependent_input.o
a - astex_a209.o
a - parameters_radiation.o
a - error.o
a - gfdl_activation.o
a - arm.o
a - gabls3.o
a - arm_0003.o
a - input_netcdf.o
a - atex.o
a - KK_microphys_module.o
a - nov11.o
a - wangara.o
a - parameters_microphys.o
a - input_grads.o
a - lh_microphys_driver_module.o
a - clubb_driver.o
a - clubb_model_settings.o
make[1]: Leaving directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
cd /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../obj; make -f Make.clubb_standalone
cd /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../obj; make -f Make.clubb_tuner
cd /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../obj; make -f Make.jacobian
cd /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../obj; make -f Make.G_unit_tests
cd /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../obj; make -f Make.int2txt
make[1]: Entering directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/clubb_standalone.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/hole_filling_tests.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../src/Numerical_recipes/nrtype.f90
make[1]: Entering directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/jacobian.F90
make[1]: Entering directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c -I../src/CLUBB_core ../src/int2txt.F90
gfortran int2txt.o -o /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../bin/int2txt -L/home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
gfortran -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../src/Numerical_recipes/nr.f90
gfortran clubb_standalone.o -o /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../bin/clubb_standalone -L/home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
gfortran -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../src/Numerical_recipes/nrutil.f90
make[1]: Leaving directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
cd /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../obj; make -f Make.clubb_thread_test
make[1]: Entering directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/clubb_thread_test.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/tuner_tests.F90
gfortran clubb_thread_test.o -o /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../bin/clubb_thread_test -L/home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/mu_sigma_hm_tests.F90
gfortran jacobian.o -o /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../bin/jacobian -L/home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
make[1]: Leaving directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/smooth_heaviside_tests.F90
make[1]: Leaving directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/read_corr_mtx_test.F90
../src/G_unit_test_types/smooth_heaviside_tests.F90:98:7:
98 | i
| 1
Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable]
make[1]: Leaving directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/w_up_in_cloud_tests.F90
../src/G_unit_test_types/smooth_heaviside_tests.F90:120:80:
120 | total_mismatches = total_mismatches + COUNT(abs(result - result_cmp) >= eps)
| ^
Warning: ‘total_mismatches’ is used uninitialized in this function [-Wuninitialized]
../src/G_unit_test_types/smooth_heaviside_tests.F90:32:31:
32 | integer :: total_mismatches
| ^
note: ‘total_mismatches’ was declared here
../src/G_unit_test_types/w_up_in_cloud_tests.F90:24:8:
24 | use clubb_precision, only: &
| 1
Warning: Unused parameter ‘core_rknd’ which has been explicitly imported at (1) [-Wunused-parameter]
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/KK_integrals_tests.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/spurious_source_test.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/Nc_Ncn_test.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/corr_cholesky_mtx_tests.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/silhs_category_test.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/smooth_min_max_tests.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_test_types/pdf_parameter_tests.F90
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c ../src/clubb_tuner.F90
gfortran -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../src/Numerical_recipes/amoeba.f90
gfortran -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../src/Numerical_recipes/amebsa.f90
gfortran -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../src/Numerical_recipes/ran_state.f90
gfortran -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../src/Numerical_recipes/ran1_v.f90
gfortran -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -c /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../src/Numerical_recipes/ran1_s.f90
gfortran clubb_tuner.o amoeba.o amebsa.o ran1_v.o ran_state.o nrutil.o ran1_s.o nr.o nrtype.o -o /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../bin/clubb_tuner -L/home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
make[1]: Leaving directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
gfortran -DNETCDF -D__GFORTRAN__ -DCLUBB_REAL_TYPE=8 -DCOAMPS_MICRO -DNR_SP -DSILHS -Dradoffline -Dnooverlap -DCLUBB -I/usr/local/NETCDF-Fortran-4.5.3-gfortran/include/ -march=native -msse3 -mfpmath=sse -fopenmp -g -fbounds-check -mieee-fp -ffpe-trap=invalid,zero,overflow -finit-real=nan -finit-integer=-99999 -finit-logical=false -fall-intrinsics -fbacktrace -O2 -Wall -Wextra -Wconversion -Wunderflow -Wcharacter-truncation -std=f2008 -pedantic -c ../src/G_unit_tests.F90
../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]
gfortran hole_filling_tests.o tuner_tests.o mu_sigma_hm_tests.o smooth_heaviside_tests.o read_corr_mtx_test.o w_up_in_cloud_tests.o pdf_parameter_tests.o KK_integrals_tests.o spurious_source_test.o Nc_Ncn_test.o G_unit_tests.o smooth_min_max_tests.o silhs_category_test.o corr_cholesky_mtx_tests.o -o /home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../bin/G_unit_tests -L/home/jenkins/workspace/clubb_G_unit_gfortran_tests/compile/../lib -lclubb_other -lclubb_coamps -lclubb_gfdlact -lsilhs -lclubb_bugsrad -lclubb_KK_microphys -lclubb_parabolic -lclubb_morrison -lmicrophys_utils -lclubb_param -lclubb_lapack -march=native -msse3 -mfpmath=sse -fopenmp -L/usr/local/NETCDF-Fortran-4.5.3-gfortran/lib -lnetcdff
make[1]: Leaving directory '/home/jenkins/workspace/clubb_G_unit_gfortran_tests/obj'
python ../utilities/check_for_missing_threadprivate.py ../src/CLUBB_core/ ../src/SILHS/
check_for_missing_threadprivate.py has begun.
[91mcheck_for_missing_threadprivate.py did not pass.[0m
[91mfailedFiles = ['../src/CLUBB_core/corr_varnce_module.F90', '../src/CLUBB_core/sponge_layer_damping.F90', '../src/CLUBB_core/parameters_model.F90', '../src/CLUBB_core/error_code.F90'][0m
perl ../utilities/CLUBBStandardsCheck.pl ../src/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
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.
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.
283 : nzt = stat_file_num_vertical_levels( "thlm", "../output/"//trim( stats_metadata%fname_zt )//".ctl" )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
284 : 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.
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.
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.
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: 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: 'use' statement w/o 'only' found in the following line:
6654 : 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.
866 : 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.
1311 : 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.
1312 : 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.
2212 : (/lon_vals/), (/lat_vals/), time_current, dt_main, l_silhs_out_in,&!intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2229 : (/lon_vals/), (/lat_vals/), time_current, dt_main, l_silhs_out_in,&!intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2284 : 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.
2286 : ( 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.
2610 : stats_zt, stats_zm, stats_sfc, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2616 : precip_fracs, & ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2636 : stats_zt, stats_zm, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3505 : ! 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.
4105 : = 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.
perl ../utilities/CLUBBStandardsCheck.pl ../src/CLUBB_core/*.F90
CLUBBStandardsCheck.pl has begun.
--------------------------------------------------------------------------------
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.
683 : * ( one - Skw(i,k) / sqrt( four * ( one - sigma_sqd_w(i,k) )**3 + Skw(i,k)**2 ) )
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/adg1_adg2_3d_luhar_pdf.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
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.
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: 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.
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.
326 : stability_correction(i,k) = one + min( lambda0_stability(i,k) * brunt_vaisala_freq_sqd(i,k) &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
627 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
628 : ! for a plot on how output behaves with varying min_max_smth_mag
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/advance_helper_module.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
501 : call windm_edsclrm_solve( nz, ngrdcol, gr, nrhs, stats_metadata%iwindm_matrix_condt_num, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
891 : 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.
123 : !$acc enter data create( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
141 : !$acc exit data delete( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
227 : !$acc parallel loop gang vector collapse(2) default(present) reduction(.or.:l_field_below_threshold)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
239 : !$acc exit data delete( invrs_denom_integral, field_clipped, denom_integral_global, rho_ds_dz, &
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/fill_holes.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
43 : ! lower_1(2)*upper_1(1)+l_diag(2)*1 = lhs(0,2) => l_diag(2) = lhs(0,2) - lower_1(2)*upper_1(1)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
44 : ! lower_1(2)*upper_2(1)+l_diag(2)*upper_1(2) = lhs(-1,2) => upper_1(2) = ( lhs(-1,2)-lower_1(2)*upper_2(1) )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
46 : ! l_diag(2)*upper_2(2) = lhs(-2,2) => upper_2(2) = lhs(-2,2) / l_diag(2)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
52 : ! l_2(k)*upper_1(k-2)+lower_1(k)*1 = lhs(1,k) => lower_1(k) = lhs(1,k) - l_2(k)*upper_1(k-2)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
53 : ! l_2(k)*upper_2(k-2)+lower_1(k)*upper_1(k-1) = lhs( 0,k) => l_diag(k) = lhs(0,k) - l_2(k)*upper_2(k-2)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
54 : ! +l_diag(k)*1 + lower_1(k)*upper_1(k-1)
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/penta_lu_solver.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
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.
342 : call calc_coefs_wpxpyp_semiimpl( nz, wp2(i,:), rtp2(i,:), thlp2(i,:), wprtp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: File has lines that exceed 100 characters.
../src/CLUBB_core/new_pdf_main.F90
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
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.
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.
527 : 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.
260 : 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.
466 : 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.
742 : 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.
869 : 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.
886 : 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.
888 : 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.
890 : 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.
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.
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.
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.
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.
1482 : ! https://github.com/larson-group/clubb/issues/965#issuecomment-1119816722
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1483 : ! for a plot on how output behaves with varying min_max_smth_mag
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1486 : logical, parameter :: l_smooth_min_max = .false. ! whether to apply smooth min and max functions
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1573 : ustar(i) = smooth_max( ( upwp_sfc(i)**2 + vpwp_sfc(i)**2 )**one_fourth, ufmin, min_max_smth_mag )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1672 : 1.e8_core_rknd * abs(brunt_vaisala_freq_sqd_mixed(i,k))**3)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1688 : 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.
1710 : 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.
1825 : 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.
1865 : * sqrt(em(i,k)) / ( gr%zm(i,k) - sfc_elevation(i) + z_displace ) ! small
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2079 : 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.
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.
1167 : !$acc fcor_col, sfc_elevation_col, thlm_forcing_col, rtm_forcing_col, um_forcing_col, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1168 : !$acc vm_forcing_col, wprtp_forcing_col, wpthlp_forcing_col, rtp2_forcing_col, thlp2_forcing_col, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1169 : !$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.
1170 : !$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.
1173 : !$acc wpedsclrp_sfc_col, 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.
1175 : !$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.
1178 : !$acc rtpthvp_col, thlpthvp_col, wp2rtp_col, wp2thlp_col, uprcp_col, vprcp_col, rc_coef_col, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1179 : !$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.
1229 : !$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.
1230 : !$acc cloudy_updraft_frac_col, cloudy_downdraft_frac_col, invrs_tau_zm_col, Kh_zt_col, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1236 : !$acc copy( sclrm_col, wpsclrp_col, sclrp2_col, sclrp3_col, sclrprtp_col, sclrpthlp_col, sclrpthvp )
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2066 : 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.
637 : call stat_update_var( stats_metadata%icoef_wp4_implicit, coef_wp4_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1426 : 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.
1514 : call stat_end_update_pt( stats_metadata%iwp2_dp1, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1561 : call stat_end_update_pt( stats_metadata%iwp2_pr1, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1625 : call stat_end_update_pt( stats_metadata%iwp3_ta, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1638 : call stat_end_update_pt( stats_metadata%iwp3_tp, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1644 : call stat_end_update_pt( stats_metadata%iwp3_pr_tp, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2713 : 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.
2718 : 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.
2734 : call stat_modify_pt( stats_metadata%iwp2_pr1, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2817 : call stat_begin_update_pt( stats_metadata%iwp3_ta, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2832 : call stat_begin_update_pt( stats_metadata%iwp3_tp, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2838 : call stat_begin_update_pt( stats_metadata%iwp3_pr_tp, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2882 : 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.
2893 : call stat_begin_update_pt( stats_metadata%iwp3_dp1, k, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2912 : 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.
2914 : 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.
856 : !$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.
933 : thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
934 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
935 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
936 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
937 : 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.
938 : 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.
939 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
940 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
943 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
944 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1592 : ! 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.
1593 : ! stats_metadata%irel_humidity = 0, rsat is not computed, leading to a floating-point exception
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1605 : call stat_update_var( stats_metadata%irel_humidity, rel_humidity(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1654 : call stat_update_var( stats_metadata%istability_correction, stability_correction(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1735 : 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.
1739 : 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.
1743 : 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.
1752 : 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.
1754 : 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.
1756 : 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.
1758 : 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.
1760 : 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.
1779 : clubb_config_flags%l_modify_limiters_for_cnvg_test, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1781 : stats_zm, & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1873 : sclrm(i,:,:), sclrm_trsport_only(i,:,:), & ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2662 : thlm(i,:), rtm(i,:), wprtp(i,:), wpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2663 : wp2(i,:), wp3(i,:), rtp2(i,:), rtp3(i,:), thlp2(i,:), thlp3(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2664 : wpthvp(i,:), wp2thvp(i,:), rtpthvp(i,:), thlpthvp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2665 : p_in_Pa(i,:), exner(i,:), rho(i,:), rho_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2666 : 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.
2667 : 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.
2668 : 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.
2671 : 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.
2672 : Lscale_up(i,:), Lscale_down(i,:), tau_zt(i,:), Kh_zt(i,:), wp2rcp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2673 : 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.
2674 : 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.
2675 : vp2_zt(i,:), upwp_zt(i,:), vpwp_zt(i,:), wpup2(i,:), wpvp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2678 : rtprcp(i,:), rcp2(i,:), em(i,:), a3_coef(i,:), a3_coef_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2679 : 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.
2682 : 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.
2683 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), sclrpthvp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2684 : wpsclrp(i,:,:), sclrprcp(i,:,:), wp2sclrp(i,:,:), wpsclrp2(i,:,:), wpsclrprtp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2685 : wpsclrpthlp(i,:,:), wpedsclrp(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2686 : clubb_config_flags%saturation_formula, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2687 : stats_metadata, & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2688 : stats_zt(i), stats_zm(i), stats_sfc(i) ) ! intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2708 : thlm_forcing(i,:), rtm_forcing(i,:), um_forcing(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2709 : vm_forcing(i,:), wm_zm(i,:), wm_zt(i,:), p_in_Pa(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2710 : rho_zm(i,:), rho(i,:), exner(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2711 : rho_ds_zt(i,:), invrs_rho_ds_zm(i,:), invrs_rho_ds_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2712 : 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.
2713 : 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.
2714 : rtm(i,:), wprtp(i,:), thlm(i,:), wpthlp(i,:), wp2(i,:), wp3(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2715 : rtp2(i,:), thlp2(i,:), rtpthlp(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2718 : wpsclrp_sfc(i,:), wpedsclrp_sfc(i,:), sclrm(i,:,:), wpsclrp(i,:,:), sclrp2(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2719 : sclrprtp(i,:,:), sclrpthlp(i,:,:), sclrm_forcing(i,:,:), edsclrm(i,:,:), edsclrm_forcing(i,:,:) ) ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2813 : !$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.
2814 : !$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.
2819 : !$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.
2820 : !$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.
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.
233 : 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.
598 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
599 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
629 : wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), thlp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
630 : Skw(i,:), Skrt(i,:), Skthl(i,:), wprtp(i,:), wpthlp(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
641 : call LY93_driver( nz, wm(i,:), rtm(i,:), thlm(i,:), wp2(i,:), rtp2(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
642 : thlp2(i,:), Skw(i,:), Skrt(i,:), Skthl(i,:), & ! In
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
997 : 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.
1012 : 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.
1035 : 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.
1141 : 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.
1316 : = 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.
1322 : + ( 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.
1328 : - ( 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.
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.
507 : 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.
849 : 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.
948 : dt, sigma_sqd_w(i,:), wm_zm(i,:), wm_zt(i,:), wp2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
949 : Lscale_zm(i,:), wp3_on_wp2(i,:), wp3_on_wp2_zt(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
950 : Kh_zt(i,:), Kh_zm(i,:), invrs_tau_C6_zm(i,:), Skw_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
954 : wpthlp_forcing(i,:), thlm_ref(i,:), rho_ds_zm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
960 : wp2sclrp(i,:,:), sclrpthvp(i,:,:), sclrm_forcing(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
961 : sclrp2(i,:,:), exner(i,:), rcm(i,:), p_in_Pa(i,:), thvm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
964 : um_forcing(i,:), vm_forcing(i,:), ug(i,:), vg(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
965 : wpthvp(i,:), fcor(i), um_ref(i,:), vm_ref(i,:), up2(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
966 : vp2(i,:), uprcp(i,:), vprcp(i,:), rc_coef(i,:), rtm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
967 : wprtp(i,:), thlm(i,:), wpthlp(i,:), sclrm(i,:,:), wpsclrp(i,:,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
968 : um(i,:), upwp(i,:), vm(i,:), vpwp(i,:), rtm_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
970 : sclrm_old(i,:,:), wpsclrp_old(i,:,:), um_old(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2578 : call stat_update_var( stats_metadata%icoef_wp2rtp_implicit, coef_wp2rtp_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2580 : call stat_update_var( stats_metadata%iterm_wp2rtp_explicit, term_wp2rtp_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2582 : call stat_update_var( stats_metadata%icoef_wp2thlp_implicit, coef_wp2thlp_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2584 : call stat_update_var( stats_metadata%iterm_wp2thlp_explicit, term_wp2thlp_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2986 : 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.
3089 : call stat_update_var( stats_metadata%iupwp_pr4, C_uu_shr * wp2(i,:) * ddzt_um(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3091 : call stat_update_var( stats_metadata%ivpwp_pr4, C_uu_shr * wp2(i,:) * ddzt_vm(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
3288 : 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.
4099 : 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.
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.
607 : 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.
1310 : sclrpthlp(:,:,sclr) ) ! Intent(inout)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
1840 : rhs_ta_wpsclrp2, rhs_ta_wprtpsclrp, rhs_ta_wpthlpsclrp, &
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
2712 : 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.
2746 : 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.
2766 : 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.
2769 : 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.
2772 : 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.
4025 : wp_coef(i,k) = ( one - one_third * beta ) * a1(i,k)**2 * wp3_on_wp2(i,k) / wp2(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4026 : wp_coef_zt(i,k) = ( one - one_third * beta ) * a1_zt(i,k)**2 * wp3_on_wp2_zt(i,k) / wp2_zt(i,k)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
4207 : 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.
4241 : 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.
4334 : invrs_rho_ds_zm, rho_ds_zm, & ! Intent(in) & ! Intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5234 : call stat_update_var( stats_metadata%icoef_wprtp2_implicit, coef_wprtp2_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5236 : call stat_update_var( stats_metadata%iterm_wprtp2_explicit, term_wprtp2_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5238 : call stat_update_var( stats_metadata%icoef_wpthlp2_implicit, coef_wpthlp2_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5240 : call stat_update_var( stats_metadata%iterm_wpthlp2_explicit, term_wpthlp2_explicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5242 : call stat_update_var( stats_metadata%icoef_wprtpthlp_implicit, coef_wprtpthlp_implicit(i,:), & ! intent(in)
CLUBBStandardsCheck.pl WARNING: Line has exceeded 100 characters.
5244 : 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 has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/Benchmark_cases/*.F90
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.
perl ../utilities/CLUBBStandardsCheck.pl ../src/KK_microphys/*.F90
CLUBBStandardsCheck.pl has begun.
CLUBBStandardsCheck.pl has finished.
perl ../utilities/CLUBBStandardsCheck.pl ../src/SILHS/*.F90
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.
perl ../utilities/CLUBBStandardsCheck.pl ../src/G_unit_test_types/*.F90
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.
558 : 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.
1595 : 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.