223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

fixed typo

This commit is contained in:
Martin Diehl 2020-01-21 06:53:32 +01:00
parent 843676fb10
commit 47e5b0077a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mesh/FEM_mech.f90
View File

@ -431,7 +431,7 @@ subroutine FEM_mech_formJacobian(dm_local,xx_local,Jac_pre,Jac,dummy,ierr)
PetscScalar,dimension(cellDOF,cellDOF), target :: K_e, &
K_eA , &
K_eB
PetscScalar,(cellDof**2) ,target :: K_eVec
PetscScalar,dimension(cellDof**2) ,target :: K_eVec
PetscInt :: cellStart, cellEnd, cell, field, face, &
qPt, basis, comp, cidx,bcSize