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

Author: mzecc

src/example_fgen_basic/get_square_root.f90

@@ -5,7 +5,7 @@ module m_get_square_root
     use m_error_v, only: ErrorV
     use m_result_dp, only: ResultDP
 
-    implicit none(type, external)
+    implicit none
     private
 
     public :: get_square_root

src/example_fgen_basic/get_square_root_wrapper.f90

@@ -10,7 +10,7 @@ module m_get_square_root_w
         result_dp_manager_set_instance_index_to => set_instance_index_to, &
         result_dp_manager_ensure_instance_array_size_is_at_least => ensure_instance_array_size_is_at_least
 
-    implicit none(type, external)
+    implicit none
     private
 
     public :: get_square_root

src/example_fgen_basic/get_wavelength.f90

@@ -7,7 +7,7 @@ module m_get_wavelength
 
     use kind_parameters, only: dp
 
-    implicit none(type, external)
+    implicit none
     private
 
     real(kind=dp), parameter, public :: speed_of_light = 2.99792e8_dp

src/example_fgen_basic/get_wavelength_wrapper.f90

@@ -15,7 +15,7 @@ module m_get_wavelength_w  ! Convention to date: just suffix wrappers with _w
     ! and the original function should have the same name.
     ! ("o_" for original)
 
-    implicit none(type, external)
+    implicit none
     private
 
     public :: get_wavelength

src/example_fgen_basic/kind_parameters.f90

@@ -2,7 +2,7 @@
 !> See https://fortran-lang.org/learn/best_practices/floating_point/
 module kind_parameters
 
-    implicit none(type, external)
+    implicit none
     private
 
     !> Single precision real numbers, 6 digits, range 10⁻³⁷ to 10³⁷-1; 32 bits