From f7aacaf0a7054b0b2b63bf405f79650e269a31c1 Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Wed, 9 Oct 2013 21:31:13 -0400 Subject: [PATCH] Change intent in res_interface to match previous commit. --- src/solver_interface.F90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/solver_interface.F90 b/src/solver_interface.F90 index 113e3119af..b629a0789f 100644 --- a/src/solver_interface.F90 +++ b/src/solver_interface.F90 @@ -56,8 +56,8 @@ module solver_interface abstract interface subroutine res_interface(x, res) import :: Vector - type(Vector), intent(in) :: x ! solution vector - type(Vector), intent(out) :: res ! residual vector + type(Vector), intent(in) :: x ! solution vector + type(Vector), intent(inout) :: res ! residual vector end subroutine res_interface subroutine jac_interface(x)