From df5ea459c8d24c52a7fa6b8bfaa385561430932b Mon Sep 17 00:00:00 2001 From: Eric Morway Date: Sun, 20 Aug 2023 18:52:56 -0700 Subject: [PATCH] Undoing change associated with 7e8644d which was in response to https://github.com/MODFLOW-USGS/modflow6/pull/1306#discussion_r1272202556 --- src/Model/GroundWaterTransport/gwt1.f90 | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/Model/GroundWaterTransport/gwt1.f90 b/src/Model/GroundWaterTransport/gwt1.f90 index 2f795511ad6..89a4ed846a8 100644 --- a/src/Model/GroundWaterTransport/gwt1.f90 +++ b/src/Model/GroundWaterTransport/gwt1.f90 @@ -58,7 +58,7 @@ module GwtModule procedure :: allocate_scalars procedure, private :: package_create procedure :: get_iasym => gwt_get_iasym - procedure, private :: create_packages + procedure, private :: create_gwt_packages procedure, private :: create_bndpkgs end type GwtModelType @@ -108,7 +108,7 @@ subroutine gwt_cr(filename, id, modelname) call this%tsp_cr(filename, id, modelname, 'GWT', indis) ! ! -- Create model packages - call this%create_packages(indis) + call this%create_gwt_packages(indis) ! ! -- Return return @@ -891,7 +891,7 @@ end subroutine create_bndpkgs !> @brief Source package info and begin to process !< - subroutine create_packages(this, indis) + subroutine create_gwt_packages(this, indis) ! -- modules use ConstantsModule, only: LINELENGTH, LENPACKAGENAME use CharacterStringModule, only: CharacterStringType @@ -967,6 +967,6 @@ subroutine create_packages(this, indis) ! ! -- Return return - end subroutine create_packages + end subroutine create_gwt_packages end module GwtModule