Merge pull request #359 from tjgiese/fix-cew-print

ioutfile intent in rather than intent out
merzlab · Apr 17, 2024 · 0cbf8f6 · 0cbf8f6
2 parents 52127db + b84ed94
commit 0cbf8f6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/modules/quick_cew_module.f90 b/src/modules/quick_cew_module.f90
@@ -1205,7 +1205,7 @@ subroutine print_cew(self, iOutfile, ierr)
 
     implicit none
     type(quick_cew_type), intent(in) :: self
-    integer, intent(out) :: iOutfile
+    integer, intent(in) :: iOutfile
     integer, intent(out) :: ierr
 
     if(self%use_cew) then