Removed '(type, external)' from 'implicit none'

Author: mzecc

fortitude.toml

@@ -1,5 +1,9 @@
 [check]
-# TODO: think about adding other rules
-select = [ "C", "E", "S" ]
-ignore = [ ]
+# Fortitude rules (https://fortitude.readthedocs.io/en/stable/rules/):
+# Error (E), Correctness (C), Obsolescent (OB), Modernisation (MOD),
+# Style (S), Portability (PORT), Fortitude (FORT)
+select = [ "C", "E", "S", "PORT" ]
+#Ignoring:
+# C003:	'implicit none' missing 'external'  [f2py does not recognize the syntax implicit none(type, external)]
+ignore = ["C003"]
 line-length = 120

src/example_fgen_basic/error_v/creation.f90

@@ -6,7 +6,7 @@ module m_error_v_creation
 
     use m_error_v, only: ErrorV, NO_ERROR_CODE
 
-    implicit none(type, external)
+    implicit none
     private
 
     public :: create_error, create_errors

src/example_fgen_basic/error_v/creation_wrapper.f90

@@ -17,7 +17,7 @@ module m_error_v_creation_w
         error_v_manager_set_instance_index_to => set_instance_index_to, &
         error_v_manager_ensure_instance_array_size_is_at_least => ensure_instance_array_size_is_at_least
 
-    implicit none(type, external)
+    implicit none
     private
 
     public :: create_error, create_errors

src/example_fgen_basic/error_v/error_v.f90

@@ -9,7 +9,7 @@
 !> indicates no error (i.e. is our equivalent of a null value).
 module m_error_v
 
-    implicit none(type, external)
+    implicit none
     private
 
     integer, parameter, public :: NO_ERROR_CODE = 0

src/example_fgen_basic/error_v/error_v_manager.f90

@@ -6,7 +6,7 @@ module m_error_v_manager
 
     use m_error_v, only: ErrorV
 
-    implicit none(type, external)
+    implicit none
     private
 
     type(ErrorV), dimension(:), allocatable :: instance_array

src/example_fgen_basic/error_v/error_v_wrapper.f90

@@ -14,7 +14,7 @@ module m_error_v_w
         error_v_manager_get_instance => get_instance, &
         error_v_manager_ensure_instance_array_size_is_at_least => ensure_instance_array_size_is_at_least
 
-    implicit none(type, external)
+    implicit none
     private
 
     public :: build_instance, finalise_instance, finalise_instances, &

src/example_fgen_basic/error_v/passing.f90

@@ -6,7 +6,7 @@ module m_error_v_passing
 
     use m_error_v, only: ErrorV, NO_ERROR_CODE
 
-    implicit none(type, external)
+    implicit none
     private
 
     public :: pass_error, pass_errors

src/example_fgen_basic/error_v/passing_wrapper.f90

@@ -18,7 +18,7 @@ module m_error_v_passing_w
     !     error_v_manager_set_instance_index_to => set_instance_index_to, &
     !     error_v_manager_ensure_instance_array_size_is_at_least => ensure_instance_array_size_is_at_least
 
-    implicit none(type, external)
+    implicit none
     private
 
     public :: pass_error, pass_errors

src/example_fgen_basic/result/result.f90

@@ -6,7 +6,7 @@ module m_result
 
     use m_error_v, only: ErrorV, NO_ERROR_CODE
 
-    implicit none (type, external)
+    implicit none
     private
 
     type, abstract, public :: ResultBase

src/example_fgen_basic/result/result_dp.f90

@@ -9,7 +9,7 @@ module m_result_dp
     use m_result, only: ResultBase
     use m_result_none, only: ResultNone
 
-    implicit none (type, external)
+    implicit none
     private
 
     type, extends(ResultBase), public :: ResultDP