corrected small syntax errors
This commit is contained in:
parent
3c5d490148
commit
cb4a85319d
|
@ -138,6 +138,7 @@
|
|||
CPFEM_in) ! Integration point number
|
||||
|
||||
use prec, only: pReal,pInt,ijaco,nCutback
|
||||
use math, only: math_pDecomposition,math_RtoEuler
|
||||
use IO, only: IO_error
|
||||
use mesh, only: mesh_element
|
||||
use constitutive
|
||||
|
|
|
@ -84,7 +84,7 @@ real(pReal), dimension(:,:,:,:), allocatable :: constitutive_state_new
|
|||
!************************************
|
||||
!* Results *
|
||||
!************************************
|
||||
integer(pInt), constitutive_maxNresults
|
||||
integer(pInt) constitutive_maxNresults
|
||||
integer(pInt), dimension(:,:,:), allocatable :: constitutive_Nresults
|
||||
real(pReal), dimension(:,:,:,:), allocatable :: constitutive_results
|
||||
|
||||
|
|
Loading…
Reference in New Issue