Refactored read_in subroutines for naming consistency

MintonGroup · Aug 19, 2021 · f75623f · f75623f
1 parent cf8523a
commit f75623f
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/src/io/io.f90 b/src/io/io.f90
@@ -1169,7 +1169,7 @@ function io_read_hdr(iu, t, npl, ntp, out_form, out_type) result(ierr)
       return
    end function io_read_hdr
 
-   module subroutine io_read_param_in(self, param_file_name) 
+   module subroutine io_read_in_param(self, param_file_name) 
       !! author: David A. Minton
       !!
       !! Read in parameters for the integration
@@ -1201,7 +1201,7 @@ module subroutine io_read_param_in(self, param_file_name)
       667 continue
       write(*,*) "Error reading parameter file: " // trim(adjustl(errmsg))
       call util_exit(FAILURE)
-   end subroutine io_read_param_in
+   end subroutine io_read_in_param
 
 
    module subroutine io_toupper(string)

diff --git a/src/modules/swiftest_classes.f90 b/src/modules/swiftest_classes.f90
@@ -81,7 +81,7 @@ module swiftest_classes
       procedure :: reader         => io_param_reader
       procedure :: writer         => io_param_writer
       procedure :: dump           => io_dump_param
-      procedure :: read_from_file => io_read_param_in
+      procedure :: read_from_file => io_read_in_param
    end type swiftest_parameters
 
    !********************************************************************************************************************************
@@ -622,11 +622,11 @@ module subroutine io_read_in_cb(self, param)
          class(swiftest_parameters), intent(inout) :: param !! Current run configuration parameters
       end subroutine io_read_in_cb
 
-      module subroutine io_read_param_in(self, param_file_name) 
+      module subroutine io_read_in_param(self, param_file_name) 
          implicit none
          class(swiftest_parameters), intent(inout) :: self            !! Current run configuration parameters
          character(len=*),           intent(in)    :: param_file_name !! Parameter input file name (i.e. param.in)
-      end subroutine io_read_param_in
+      end subroutine io_read_in_param
 
       module subroutine io_read_frame_body(self, iu, param, form)
          implicit none