From 83c26348421e9ff52f402abebb018c87986e1339 Mon Sep 17 00:00:00 2001 From: Jonathan Moussa Date: Tue, 10 Sep 2024 12:27:03 -0400 Subject: [PATCH] Remove module keyword from internal module subroutine mopac_record --- src/interface/mopac_api_finalize.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/interface/mopac_api_finalize.F90 b/src/interface/mopac_api_finalize.F90 index 55ec498d..6e88aebf 100644 --- a/src/interface/mopac_api_finalize.F90 +++ b/src/interface/mopac_api_finalize.F90 @@ -92,7 +92,7 @@ module subroutine mopac_finalize(properties) use_disk = .true. end subroutine mopac_finalize - module subroutine mopac_record(properties) + subroutine mopac_record(properties) type(mopac_properties), intent(out) :: properties integer, external :: ijbo double precision, external :: dipole, dipole_for_MOZYME