From d01e24c30287f71886da6f8b04370fe7075fbfce Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Mon, 27 Jan 2025 16:22:31 +0100 Subject: [PATCH] Fixed Pointer argument 'map' is not associated --- src/utils/map_module.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/utils/map_module.f90 b/src/utils/map_module.f90 index ceaec874..9ebcbc6d 100644 --- a/src/utils/map_module.f90 +++ b/src/utils/map_module.f90 @@ -157,7 +157,7 @@ subroutine cache_map_reallocate(map,sze) stop 2 endif if (associated(map%value)) then - do i=1_8,min(size(map%key),map%n_elements) + do i=1_8,min(size(map%value),map%n_elements) value_new(i) = map%value(i) enddo deallocate(map%value)