@@ -824,7 +824,6 @@ subroutine int8_get_other_data( map, value, other, exists )
824824! !
825825! !! Int8 key generic interface for get_other_data function
826826
827- import hashmap_type, key_type, other_type
828827 class(hashmap_type), intent (inout ) :: map
829828 integer (int8), intent (in ) :: value(:)
830829 type (other_type), intent (out ) :: other
@@ -844,7 +843,6 @@ subroutine int32_get_other_data( map, value, other, exists )
844843! !
845844! ! Int32 key generic interface for get_other_data function
846845
847- import hashmap_type, key_type, other_type
848846 class(hashmap_type), intent (inout ) :: map
849847 integer (int32), intent (in ) :: value(:)
850848 type (other_type), intent (out ) :: other
@@ -864,7 +862,6 @@ subroutine char_get_other_data( map, value, other, exists )
864862! !
865863! ! Character key generic interface for get_other_data function
866864
867- import hashmap_type, key_type, other_type
868865 class(hashmap_type), intent (inout ) :: map
869866 character (* ), intent (in ) :: value
870867 type (other_type), intent (out ) :: other
@@ -889,7 +886,6 @@ subroutine int8_remove_entry(map, value, existed) ! Chase's delent
889886! ! existed - a logical flag indicating whether an entry with the key
890887! ! was present in the original map
891888!
892- import hashmap_type, key_type
893889 class(hashmap_type), intent (inout ) :: map
894890 integer (int8), intent (in ) :: value(:)
895891 logical , intent (out ), optional :: existed
@@ -913,7 +909,6 @@ subroutine int32_remove_entry(map, value, existed) ! Chase's delent
913909! ! existed - a logical flag indicating whether an entry with the key
914910! ! was present in the original map
915911!
916- import hashmap_type, key_type
917912 class(hashmap_type), intent (inout ) :: map
918913 integer (int32), intent (in ) :: value(:)
919914 logical , intent (out ), optional :: existed
@@ -937,7 +932,6 @@ subroutine char_remove_entry(map, value, existed) ! Chase's delent
937932! ! existed - a logical flag indicating whether an entry with the key
938933! ! was present in the original map
939934!
940- import hashmap_type, key_type
941935 class(hashmap_type), intent (inout ) :: map
942936 character (* ), intent (in ) :: value
943937 logical , intent (out ), optional :: existed
@@ -956,7 +950,6 @@ subroutine int8_map_entry(map, value, other, conflict)
956950 ! ! Int8 generic interface for map entry
957951 ! ! ([Specifications](../page/specs/stdlib_hashmaps.html#map_entry-inserts-an-entry-into-the-hash-map))
958952 ! !
959- import hashmap_type, key_type, other_type
960953 class(hashmap_type), intent (inout ) :: map
961954 integer (int8), intent (in ) :: value(:)
962955 type (other_type), intent (in ), optional :: other
@@ -977,7 +970,6 @@ subroutine int32_map_entry(map, value, other, conflict)
977970! ! Inserts an entry into the hash table
978971! ! ([Specifications](../page/specs/stdlib_hashmaps.html#map_entry-inserts-an-entry-into-the-hash-map))
979972! !
980- import hashmap_type, key_type, other_type
981973 class(hashmap_type), intent (inout ) :: map
982974 integer (int32), intent (in ) :: value(:)
983975 type (other_type), intent (in ), optional :: other
@@ -998,7 +990,6 @@ subroutine char_map_entry(map, value, other, conflict)
998990! ! Inserts an entry into the hash table
999991! ! ([Specifications](../page/specs/stdlib_hashmaps.html#map_entry-inserts-an-entry-into-the-hash-map))
1000992! !
1001- import hashmap_type, key_type, other_type
1002993 class(hashmap_type), intent (inout ) :: map
1003994 character (len=* ), intent (in ) :: value
1004995 type (other_type), intent (in ), optional :: other
@@ -1024,7 +1015,6 @@ subroutine int8_key_test(map, value, present)
10241015! ! value - int8 array that is the key to lookup.
10251016! ! present - a flag indicating whether key is present in the map
10261017!
1027- import hashmap_type, key_type
10281018 class(hashmap_type), intent (inout ) :: map
10291019 integer (int8), intent (in ) :: value(:)
10301020 logical , intent (out ) :: present
@@ -1051,7 +1041,6 @@ subroutine int32_key_test(map, value, present)
10511041! ! value - int32 array that is the key to lookup.
10521042! ! present - a flag indicating whether key is present in the map
10531043!
1054- import hashmap_type, key_type
10551044 class(hashmap_type), intent (inout ) :: map
10561045 integer (int32), intent (in ) :: value(:)
10571046 logical , intent (out ) :: present
@@ -1076,7 +1065,6 @@ subroutine char_key_test(map, value, present)
10761065! ! value - char array that is the key to lookup.
10771066! ! present - a flag indicating whether key is present in the map
10781067!
1079- import hashmap_type, key_type
10801068 class(hashmap_type), intent (inout ) :: map
10811069 character (* ), intent (in ) :: value
10821070 logical , intent (out ) :: present
@@ -1102,7 +1090,6 @@ subroutine int8_set_other_data( map, value, other, exists )
11021090! ! in the map
11031091! !
11041092!
1105- import hashmap_type, key_type, other_type
11061093 class(hashmap_type), intent (inout ) :: map
11071094 integer (int8), intent (in ) :: value(:)
11081095 type (other_type), intent (in ) :: other
@@ -1129,7 +1116,6 @@ subroutine int32_set_other_data( map, value, other, exists )
11291116! ! in the map
11301117! !
11311118!
1132- import hashmap_type, key_type, other_type
11331119 class(hashmap_type), intent (inout ) :: map
11341120 integer (int32), intent (in ) :: value(:)
11351121 type (other_type), intent (in ) :: other
@@ -1156,7 +1142,6 @@ subroutine char_set_other_data( map, value, other, exists )
11561142! ! in the map
11571143! !
11581144!
1159- import hashmap_type, key_type, other_type
11601145 class(hashmap_type), intent (inout ) :: map
11611146 character (* ), intent (in ) :: value
11621147 type (other_type), intent (in ) :: other
0 commit comments