Bug fix: memory allocation error in CMM (#61)

SimVascular · Nov 17, 2021 · a07bc45 · a07bc45
1 parent bb4b8c4
commit a07bc45
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Code/Source/svFSI/CMM.f b/Code/Source/svFSI/CMM.f
@@ -56,7 +56,7 @@ SUBROUTINE CONSTRUCT_CMM(lM, Ag, Yg, Dg)
 !     CMM: dof = nsd+1
 !     CMM init: dof = nsd
       ALLOCATE(ptr(eNoN), xl(nsd,eNoN), al(tDof,eNoN), yl(tDof,eNoN),
-     2   dl(nsd,eNoN), bfl(nsd,eNoN), pS0l(nsymd,eNoN), pSl(nsymd),
+     2   dl(tDof,eNoN), bfl(nsd,eNoN), pS0l(nsymd,eNoN), pSl(nsymd),
      3   vwpl(2,eNoN), N(eNoN), Nx(nsd,eNoN), lR(dof,eNoN),
      4   lK(dof*dof,eNoN,eNoN))