comp-chem/cp2k
1
0
Fork 0
mirror of https://github.com/cp2k/cp2k.git synced 2026-07-28 14:15:19 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Reduce the number of suppressed convention violations.

Browse source 
svn-origin-rev: 18271
This commit is contained in:
Sergey Chulkov 2018-02-16 10:05:59 +00:00
parent 04a210c5ba
commit 111e753133
5 changed files with 106 additions and 86 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/fm/cp_fm_diag.F
View file

@ -121,6 +121,7 @@ CONTAINS
#if defined (__ELPA)
diag_type = 3
MARK_USED(switched)
#else
! ELPA library not linked, switch to SL
diag_type = 1
@ -130,6 +131,7 @@ CONTAINS
#if defined (__SCALAPACK2)
diag_type = 2
MARK_USED(switched)
#else
! SL2 library not linked, switch to SL
diag_type = 1
@ -426,8 +428,10 @@ CONTAINS
CHARACTER(LEN=*), PARAMETER :: routineN = "cp_fm_syevx", &
routineP = moduleN//":"//routineN
REAL(KIND=dp), PARAMETER :: orfac = -1.0_dp, &
vl = 0.0_dp, &
#if defined(__SCALAPACK)
REAL(KIND=dp), PARAMETER :: orfac = -1.0_dp
#endif
REAL(KIND=dp), PARAMETER :: vl = 0.0_dp, &
vu = 0.0_dp
TYPE(cp_blacs_env_type), POINTER :: context
@ -659,8 +663,10 @@ CONTAINS
CHARACTER(LEN=*), PARAMETER :: routineN = "cp_fm_syevr", &
routineP = moduleN//":"//routineN
#if (!defined(__SCALAPACK) || defined(__SCALAPACK2))
REAL(KIND=dp), PARAMETER :: vl = 0.0_dp, &
vu = 0.0_dp
#endif
CHARACTER(LEN=1) :: job_type
INTEGER :: handle, ilow_local, &

82
src/grid/xyz_to_vab_optimised.F
View file

@ -18,7 +18,6 @@
!> \author Ruyman Reyes
! **************************************************************************************************
! We use the caller routine in libgrid.a (which may have a different range of la/lb_max_local implemented
#ifdef __HAS_LIBGRID
#else
@ -47,8 +46,7 @@ SUBROUTINE call_to_xyz_to_vab(prefactor, coef_xyz, lp, &
rp, ra, rab, vab, coset, &
la_min_local, lb_min_local, &
maxl, lvab, hvab)
USE kinds, ONLY: dp
USE kinds, ONLY: dp
REAL(KIND=dp), INTENT(IN) :: prefactor
INTEGER, INTENT(IN) :: lp
@ -62,6 +60,84 @@ SUBROUTINE call_to_xyz_to_vab(prefactor, coef_xyz, lp, &
INTEGER, DIMENSION(-1:maxl, -1:maxl, -1:maxl), &
INTENT(IN) :: coset
INTERFACE
SUBROUTINE xyz_to_vab(prefactor, coef_xyz, lp, la_max_local, &
lb_max_local, rp, ra, rab, vab, coset, &
la_min_local, lb_min_local, maxl, lvab, hvab)
IMPORT :: dp
REAL(kind=dp), INTENT(in) :: prefactor
INTEGER, INTENT(in) :: lp, la_max_local, lb_max_local, &
la_min_local, lb_min_local, maxl, lvab, hvab
INTEGER, DIMENSION(-1:maxl, -1:maxl, -1:maxl), &
INTENT(in) :: coset
REAL(kind=dp), DIMENSION(((lp+1)*(lp+2)*(lp+3))/6), &
INTENT(inout) :: coef_xyz
REAL(kind=dp), DIMENSION(3), INTENT(in) :: rp, ra, rab
REAL(kind=dp), DIMENSION(lvab, hvab), &
INTENT(inout) :: vab
END SUBROUTINE xyz_to_vab
SUBROUTINE xyz_to_vab_0_0(prefactor, coef_xyz, lp, vab, lvab, hvab)
IMPORT :: dp
REAL(kind=dp), INTENT(in) :: prefactor
INTEGER, INTENT(in) :: lp, lvab, hvab
REAL(kind=dp), DIMENSION(((lp+1)*(lp+2)*(lp+3))/6), &
INTENT(inout) :: coef_xyz
REAL(kind=dp), DIMENSION(lvab, hvab), &
INTENT(inout) :: vab
END SUBROUTINE xyz_to_vab_0_0
#:for name2 in range(1, 5)
SUBROUTINE xyz_to_vab_0_${name2}$(prefactor, coef_xyz, lp, rp, ra, rab, vab, &
coset, lb_min_local, maxl, lvab, hvab)
IMPORT :: dp
REAL(kind=dp), INTENT(in) :: prefactor
INTEGER, INTENT(in) :: lp, lb_min_local, maxl, lvab, hvab
INTEGER, DIMENSION(-1:maxl, -1:maxl, -1:maxl), &
INTENT(in) :: coset
REAL(kind=dp), DIMENSION(((lp+1)*(lp+2)*(lp+3))/6), &
INTENT(inout) :: coef_xyz
REAL(kind=dp), DIMENSION(lvab, hvab), &
INTENT(inout) :: vab
REAL(kind=dp), DIMENSION(3), INTENT(in) :: rp, ra, rab
END SUBROUTINE xyz_to_vab_0_${name2}$
#:endfor
#:for name1 in range(1, 5)
SUBROUTINE xyz_to_vab_${name1}$_0(prefactor, coef_xyz, lp, rp, ra, vab, &
coset, la_min_local, maxl, lvab, hvab)
IMPORT :: dp
REAL(kind=dp), INTENT(in) :: prefactor
INTEGER, INTENT(in) :: lp, la_min_local, maxl, lvab, hvab
INTEGER, DIMENSION(-1:maxl, -1:maxl, -1:maxl), &
INTENT(in) :: coset
REAL(kind=dp), DIMENSION(((lp+1)*(lp+2)*(lp+3))/6), &
INTENT(inout) :: coef_xyz
REAL(kind=dp), DIMENSION(lvab, hvab), &
INTENT(inout) :: vab
REAL(kind=dp), DIMENSION(3), INTENT(in) :: rp, ra
END SUBROUTINE xyz_to_vab_${name1}$_0
#:endfor
#:for name1 in range(1, 5)
#:for name2 in range(1, 5)
SUBROUTINE xyz_to_vab_${name1}$_${name2}$(prefactor, coef_xyz, lp, rp, ra, rab, vab, &
coset, la_min_local, lb_min_local, maxl, lvab, hvab)
IMPORT :: dp
REAL(kind=dp), INTENT(in) :: prefactor
INTEGER, INTENT(in) :: lp, lb_min_local, la_min_local, maxl, lvab, hvab
INTEGER, DIMENSION(-1:maxl, -1:maxl, -1:maxl), &
INTENT(in) :: coset
REAL(kind=dp), DIMENSION(((lp+1)*(lp+2)*(lp+3))/6), &
INTENT(inout) :: coef_xyz
REAL(kind=dp), DIMENSION(lvab, hvab), &
INTENT(inout) :: vab
REAL(kind=dp), DIMENSION(3), INTENT(in) :: rp, ra, rab
END SUBROUTINE xyz_to_vab_${name1}$_${name2}$
#:endfor
#:endfor
END INTERFACE
SELECT CASE (la_max_local)
CASE (0)
SELECT CASE (lb_max_local)

10
src/pw/fft/fft_lib.F
View file

@ -170,9 +170,6 @@ CONTAINS
!> \param stat ...
! **************************************************************************************************
SUBROUTINE fft_3d(plan, scale, zin, zout, stat)
USE fft_plan, ONLY: fft_plan_type
USE fft_kinds, ONLY: dp
TYPE(fft_plan_type), INTENT(IN) :: plan
REAL(KIND=dp), INTENT(IN) :: scale
COMPLEX(KIND=dp), DIMENSION(*), INTENT(INOUT) :: zin, zout
@ -213,9 +210,6 @@ CONTAINS
!> \param plan_style ...
! **************************************************************************************************
SUBROUTINE fft_create_plan_1dm(plan, fft_type, fsign, trans, n, m, zin, zout, plan_style)
USE fft_plan, ONLY: fft_plan_type
USE fft_kinds, ONLY: dp
TYPE(fft_plan_type), INTENT(INOUT) :: plan
INTEGER, INTENT(IN) :: fft_type, fsign
LOGICAL, INTENT(IN) :: trans
@ -245,9 +239,6 @@ CONTAINS
!> \param plan ...
! **************************************************************************************************
SUBROUTINE fft_destroy_plan(plan)
USE fft_plan, ONLY: fft_plan_type
USE fft_kinds, ONLY: dp
TYPE(fft_plan_type), INTENT(INOUT) :: plan
! Planning only needed for FFTW3
@ -268,7 +259,6 @@ CONTAINS
!> \param stat ...
! **************************************************************************************************
SUBROUTINE fft_1dm(plan, zin, zout, scale, stat)
TYPE(fft_plan_type), INTENT(IN) :: plan
COMPLEX(KIND=dp), DIMENSION(*), INTENT(INOUT) :: zin, zout
REAL(KIND=dp), INTENT(IN) :: scale

19
src/qs_integrate_potential_low.F
View file

@ -33,6 +33,25 @@ MODULE qs_integrate_potential_low
PUBLIC :: integrate_pgf_product_rspace
INTERFACE
SUBROUTINE call_to_xyz_to_vab(prefactor, coef_xyz, lp, la_max_local, lb_max_local, &
rp, ra, rab, vab, coset, la_min_local, lb_min_local, &
maxl, lvab, hvab)
IMPORT :: dp
REAL(KIND=dp), INTENT(in) :: prefactor
INTEGER, INTENT(in) :: lp
REAL(kind=dp), DIMENSION(((lp+1)*(lp+2)*(lp+3))/6), &
INTENT(inout) :: coef_xyz
INTEGER, INTENT(in) :: la_max_local, lb_max_local, la_min_local, &
lb_min_local, maxl, lvab, hvab
REAL(kind=dp), DIMENSION(3), INTENT(in) :: rp, ra, rab
REAL(kind=dp), DIMENSION(lvab, hvab), &
INTENT(inout) :: vab
INTEGER, DIMENSION(-1:maxl, -1:maxl, -1:maxl), &
INTENT(in) :: coset
END SUBROUTINE call_to_xyz_to_vab
END INTERFACE
CONTAINS
! **************************************************************************************************

71
tools/conventions/conventions.supp
View file

@ -4,16 +4,6 @@ Data file MM_POTENTIAL copied to tests/QMMM/QS
Data file POTENTIAL copied to tests/QMMM/QS
Flag FD_DEBUG not mentioned in INSTALL
Flag FD_DEBUG not mentioned in cp2k_flags()
Flag FLUSH_OPT not mentioned in INSTALL
Flag FLUSH_OPT not mentioned in cp2k_flags()
Flag FMG_INTEGRATE not mentioned in INSTALL
Flag FMG_INTEGRATE not mentioned in cp2k_flags()
Flag FMG_INTEGRATE_FULL not mentioned in INSTALL
Flag FMG_INTEGRATE_FULL not mentioned in cp2k_flags()
Flag FM_FLAT_GRID not mentioned in INSTALL
Flag FM_FLAT_GRID not mentioned in cp2k_flags()
Flag LIBMICSMM_HPP not mentioned in INSTALL
Flag LIBMICSMM_HPP not mentioned in cp2k_flags()
Flag LIBMICSMM_USE_LIBXSMM not mentioned in INSTALL
Flag LIBMICSMM_USE_LIBXSMM not mentioned in cp2k_flags()
Flag LIBMICSMM_USE_MKLSMM not mentioned in INSTALL
@ -32,14 +22,10 @@ Flag LIBXSTREAM_PRINT not mentioned in INSTALL
Flag LIBXSTREAM_PRINT not mentioned in cp2k_flags()
Flag MKL_DIRECT_CALL_SEQ not mentioned in INSTALL
Flag MKL_DIRECT_CALL_SEQ not mentioned in cp2k_flags()
Flag PARAMS_IN_SMEM_OPT not mentioned in INSTALL
Flag PARAMS_IN_SMEM_OPT not mentioned in cp2k_flags()
Flag USE_NATIVE_64 not mentioned in INSTALL
Flag USE_NATIVE_64 not mentioned in cp2k_flags()
Flag XC_MAJOR_VERSION not mentioned in INSTALL
Flag XC_MAJOR_VERSION not mentioned in cp2k_flags()
Flag XC_MINOR_VERSION not mentioned in INSTALL
Flag XC_MINOR_VERSION not mentioned in cp2k_flags()
Flag __ACC_MIC not mentioned in INSTALL
Flag __ACC_MIC not mentioned in cp2k_flags()
Flag __CRAY_PM_FAKE_ENERGY not mentioned in INSTALL
@ -72,7 +58,6 @@ Flag __SCALAPACK2 not mentioned in INSTALL
Flag __F2008 not mentioned in cp2k_flags()
al_system_dynamics.F: Found WRITE statement with hardcoded unit in "dump_vel"
almo_scf.F: Found WRITE statement with hardcoded unit in "almo_scf_init"
almo_scf_optimizer.F: Found WRITE statement with hardcoded unit in "almo_scf_xalmo_pcg"
base_hooks.F: Found CALL m_abort in procedure "cp_abort"
base_hooks.F: Found STOP statement in procedure "cp__a"
base_hooks.F: Found STOP statement in procedure "cp__b"
@ -118,9 +103,6 @@ cp_dbcsr_cholesky.F: Routine PSPOTRI called with an implicit interface.
cp_dbcsr_cholesky.F: Routine PSTRMM called with an implicit interface.
cp_dbcsr_cholesky.F: Routine PSTRSM called with an implicit interface.
cp_dbcsr_operations.F: Found CALL cp_fm_gemm in procedure "cp_dbcsr_plus_fm_fm_t"
cp_dbcsr_operations.F: Found WRITE statement with hardcoded unit in "copy_dbcsr_to_cfm"
cp_dbcsr_operations.F: Found WRITE statement with hardcoded unit in "copy_dbcsr_to_fm"
cp_dbcsr_operations.F: Found WRITE statement with hardcoded unit in "copy_dbcsr_to_fm_bc"
cp_dbcsr_operations.F: Found WRITE statement with hardcoded unit in "cp_dbcsr_plus_fm_fm_t"
cp_ddapc_util.F: Found WRITE statement with hardcoded unit in "debug_charge"
cp_ddapc_util.F: Found WRITE statement with hardcoded unit in "debug_der_a_matrix"
@ -130,8 +112,6 @@ cp_files.F: Found CLOSE statement in procedure "close_file"
cp_files.F: Found OPEN statement in procedure "open_file"
cp_fm_basic_linalg.F: Found CALL cp_fm_gemm in procedure "cp_complex_fm_gemm"
cp_fm_diag.F: Found CALL cp_fm_gemm in procedure "cp_fm_geeig_canon"
cp_fm_diag.F: Unused parameter 'vl' declared at (1) [-Wunused-parameter]
cp_fm_diag.F: Unused parameter 'vu' declared at (1) [-Wunused-parameter]
cp_gemm_interface.F: Found CALL cp_fm_gemm in procedure "cp_gemm"
cp_lbfgs.F: Found WRITE statement with hardcoded unit in "active"
cp_lbfgs.F: Found WRITE statement with hardcoded unit in "cauchy"
@ -154,9 +134,6 @@ cp_dbcsr_operations.F: Found WRITE statement with hardcoded unit in "create_bl_d
cp_dbcsr_operations.F: Found WRITE statement with hardcoded unit in "dbcsr_create_dist_block_cyclic"
dbcsr_mm_dist_operations.F: Found WRITE statement with hardcoded unit in "dbcsr_create_image_dist"
dbcsr_mm_dist_operations.F: Found WRITE statement with hardcoded unit in "dbcsr_reset_locals"
dbcsr_error_handling.F: Found WRITE statement with hardcoded unit in "dbcsr_int_assert"
dbcsr_error_handling.F: Found WRITE statement with hardcoded unit in "dbcsr_logical_assert"
dbcsr_error_handling.F: Found WRITE statement with hardcoded unit in "dbcsr_not_assert"
dbcsr_example_1.F: Found WRITE statement with hardcoded unit in "dbcsr_example_1"
dbcsr_example_2.F: Found CALL RANDOM_NUMBER in procedure "dbcsr_example_2"
dbcsr_example_2.F: Found WRITE statement with hardcoded unit in "dbcsr_example_2"
@ -176,7 +153,6 @@ dbcsr_mm_accdrv.F: Found FLOAT in "setup_stackbuffers"
dbcsr_mm_common.F: Found FLOAT in "count_mpi_statistics"
dbcsr_mm_common.F: Found WRITE statement with hardcoded unit in "rec_sort_index"
dbcsr_mm_cannon.F: Found FLOAT in "multiply_cannon"
dbcsr_mm_cannon.F: Found WRITE statement with hardcoded unit in "call_rec_sort_index"
dbcsr_mm_cannon.F: Found WRITE statement with hardcoded unit in "multiply_cannon"
dbcsr_mm_cannon.F: Found WRITE statement with hardcoded unit in "dbcsr_make_images_dense"
dbcsr_mm_cannon.F: Found WRITE statement with hardcoded unit in "setup_rec_index_2d"
@ -190,10 +166,6 @@ dbcsr_mm_multrec.F: Found WRITE statement with hardcoded unit in "dbcsr_mm_multr
dbcsr_mm_multrec.F: Found WRITE statement with hardcoded unit in "sparse_multrec"
dbcsr_mm_sched.F: Found FLOAT in "stats_print_report"
dbcsr_mm_sched.F: Found WRITE statement with hardcoded unit in "dbcsr_mm_sched_process"
dbcsr_operations.F: Found WRITE statement with hardcoded unit in "dbcsr_trace_ab_c"
dbcsr_operations.F: Found WRITE statement with hardcoded unit in "dbcsr_trace_ab_d"
dbcsr_operations.F: Found WRITE statement with hardcoded unit in "dbcsr_trace_ab_s"
dbcsr_operations.F: Found WRITE statement with hardcoded unit in "dbcsr_trace_ab_z"
dbcsr_performance_multiply.F: Found WRITE statement with hardcoded unit in "dbcsr_perf_multiply"
dbcsr_performance_multiply.F: Found WRITE statement with hardcoded unit in "perf_multiply"
dbcsr_ptr_util.F: Found WRITE statement with hardcoded unit in "ensure_array_size_c"
@ -232,15 +204,9 @@ eip_silicon.F: Found WRITE statement with hardcoded unit in "eip_lenosky_silicon
eip_silicon.F: Found WRITE statement with hardcoded unit in "subfeniat_b"
eip_silicon.F: Found WRITE statement with hardcoded unit in "subfeniat_l"
erf_fn.F: Found GOTO statement in procedure "calerf"
ewalds_multipole_debug.F: Found WRITE statement with hardcoded unit in "debug_ewald_multipoles"
ewalds_multipole_debug.F: Found WRITE statement with hardcoded unit in "debug_ewald_multipoles_fields"
ewalds_multipole_debug.F: Found WRITE statement with hardcoded unit in "debug_ewald_multipoles_fields2"
ewalds_multipole_debug.h: Copyright banner malformed
extended_system_init.F: Found WRITE statement with hardcoded unit in "init_barostat_variables"
f77_int.h: Copyright banner malformed
farming_methods.F: Found CLOSE statement in procedure "farming_parse_input"
farming_methods.F: Found OPEN statement in procedure "farming_parse_input"
fft_lib.F: Unused parameter 'dp' which has been explicitly imported at (1) [-Wunused-parameter]
fparser.F: Copyright banner malformed
fparser.F: Found WRITE statement with hardcoded unit in "parseerrmsg"
free_energy_methods.F: Found WRITE statement with hardcoded unit in "ui_check_norm_sc"
@ -267,20 +233,11 @@ hfx_compression_methods.F: Found READ with unchecked STAT in "hfx_decompress_cac
hfx_energy_potential.F: Found WRITE statement with hardcoded unit in "print_integrals"
input_enumeration_types.F: Found WRITE statement with hardcoded unit in "enum_i2c"
input_parsing.F: Found WRITE statement with hardcoded unit in "section_vals_parse"
k290.F: Found GOTO statement in procedure "mesh"
k290.F: Found GOTO statement in procedure "sppt2"
k290.F: Found WRITE statement with hardcoded unit in "atftm1"
k290.F: Found WRITE statement with hardcoded unit in "bzrduc"
k290.F: Found WRITE statement with hardcoded unit in "mesh"
k290.F: Found WRITE statement with hardcoded unit in "sppt2"
library_tests.F: Found CALL RANDOM_NUMBER in procedure "copy_test"
library_tests.F: Found CALL RANDOM_NUMBER in procedure "cp_fm_gemm_test"
library_tests.F: Found CALL RANDOM_NUMBER in procedure "fft_test"
library_tests.F: Found CALL RANDOM_NUMBER in procedure "rs_pw_transfer_test"
library_tests.F: Routine PILAENV called with an implicit interface.
lri_debug_integrals.F: Found WRITE statement with hardcoded unit in "overlap_aabb_test_simple"
lri_debug_integrals.F: Found WRITE statement with hardcoded unit in "overlap_ab_test_simple"
lri_debug_integrals.F: Found WRITE statement with hardcoded unit in "overlap_abc_test_simple"
machine.F: Found OPEN statement in procedure "m_cpuinfo"
machine_internal.F: Found CALL m_abort in procedure "m_getarg"
machine_internal.F: Found CALL m_abort in procedure "m_getcwd"
@ -332,7 +289,6 @@ qs_fb_filter_matrix_methods.F: Found WRITE statement with hardcoded unit in "fb_
qs_gspace_mixing.F: Found WRITE statement with hardcoded unit in "broyden_mixing_new"
qs_gspace_mixing.F: Found WRITE statement with hardcoded unit in "multisecant_mixing"
qs_initial_guess.F: Found WRITE statement with hardcoded unit in "calculate_first_density_matrix"
qs_integrate_potential_low.F: Routine CALL_TO_XYZ_TO_VAB called with an implicit interface.
qs_integrate_potential_low.F: Routine INTEGRATE_CORE_0 called with an implicit interface.
qs_integrate_potential_low.F: Routine INTEGRATE_CORE_1 called with an implicit interface.
qs_integrate_potential_low.F: Routine INTEGRATE_CORE_2 called with an implicit interface.
@ -356,7 +312,6 @@ qs_loc_utils.F: Routine PZROT called with an implicit interface.
qs_localization_methods.F: Routine PZROT called with an implicit interface.
qs_ot.F: Found WRITE statement with hardcoded unit in "qs_ot_generate_rotation"
qs_rho_atom_methods.F: Found WRITE statement with hardcoded unit in "init_rho_atom"
scptb_types.F: Found WRITE statement with hardcoded unit in "scp_vector_print"
se_core_matrix.F: Found WRITE statement with hardcoded unit in "aa"
se_core_matrix.F: Found WRITE statement with hardcoded unit in "makeds"
se_core_matrix.F: Found WRITE statement with hardcoded unit in "makes"
@ -416,32 +371,6 @@ xml_parser.F: Found WRITE statement with hardcoded unit in "xml_report_details_s
xml_parser.F: Found WRITE statement with hardcoded unit in "xml_report_errors_extern_"
xml_parser.F: Found WRITE statement with hardcoded unit in "xml_report_errors_int_"
xml_parser.F: Found WRITE statement with hardcoded unit in "xml_report_errors_string_"
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_0_0 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_0_1 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_0_2 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_0_3 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_0_4 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_1_0 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_1_1 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_1_2 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_1_3 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_1_4 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_2_0 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_2_1 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_2_2 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_2_3 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_2_4 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_3_0 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_3_1 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_3_2 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_3_3 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_3_4 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_4_0 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_4_1 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_4_2 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_4_3 called with an implicit interface.
xyz_to_vab_optimised.F: Routine XYZ_TO_VAB_4_4 called with an implicit interface.
dbcsr_tensor_test.F: Found CALL RANDOM_NUMBER in procedure "dbcsr_t_random_dist"
optimize_embedding_potential.F: Found FLOAT in "init_embed_pot"
et_coupling_proj.F: Routine INFOG2L called with an implicit interface.