From def0415ff4d27568a5f5ce8140a683dfb03b0fee Mon Sep 17 00:00:00 2001 From: Sam Cox Date: Thu, 14 Jun 2018 14:16:34 +0100 Subject: [PATCH] Add missing SUNMATRIX module initialization in the DENSE solver case (solverType==3). --- src/atchem2.f90 | 1 + 1 file changed, 1 insertion(+) diff --git a/src/atchem2.f90 b/src/atchem2.f90 index 22af31b4b..594fb125c 100644 --- a/src/atchem2.f90 +++ b/src/atchem2.f90 @@ -351,6 +351,7 @@ end subroutine FCVFUN else if ( solverType == 3 ) then call FSUNDENSEMATINIT( 1, neq, neq, ier ) ! call FCVDENSE( neq, ier ) + call FSUNDENSELINSOLINIT( 1, ier ) call FCVDLSINIT( ier ) ! UNEXPECTED SOLVER TYPE else