fix(mover): correct typo in error message

* closes MODFLOW-USGS#336
langevin-usgs · Mar 10, 2020 · ef85ec0 · ef85ec0
1 parent edeb2ed
commit ef85ec0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Model/ModelUtilities/Mover.f90 b/src/Model/ModelUtilities/Mover.f90
@@ -200,7 +200,7 @@ subroutine set(this, line, inunit, iout, mname, pakorigins, pakmovers)
     ! -- Set pointer to QFROMMVR array in the receiver boundary package
     temp_ptr => pakmovers(ipakloc2)%qfrommvr
     if(this%irch2 < 1 .or. this%irch2 > size(temp_ptr)) then
-      call store_error('ERROR. PROVIDER ID < 1 OR GREATER THAN PACKAGE SIZE ')
+      call store_error('ERROR. RECEIVER ID < 1 OR GREATER THAN PACKAGE SIZE ')
       write(errmsg, '(4x,a,i0,a,i0)') 'RECEIVER ID = ', this%irch2,            &
         '; PACKAGE SIZE = ', size(temp_ptr)
       call store_error(trim(errmsg))