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

corrected small syntax errors

This commit is contained in:
Luc Hantcherli 2007-04-11 14:55:06 +00:00
parent 3c5d490148
commit cb4a85319d
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
trunk/CPFEM.f90
View File

@ -138,6 +138,7 @@
CPFEM_in) ! Integration point number CPFEM_in) ! Integration point number
use prec, only: pReal,pInt,ijaco,nCutback use prec, only: pReal,pInt,ijaco,nCutback
use math, only: math_pDecomposition,math_RtoEuler
use IO, only: IO_error use IO, only: IO_error
use mesh, only: mesh_element use mesh, only: mesh_element
use constitutive use constitutive

2
trunk/constitutive.f90
View File

@ -84,7 +84,7 @@ real(pReal), dimension(:,:,:,:), allocatable :: constitutive_state_new
!************************************ !************************************
!* Results * !* Results *
!************************************ !************************************
integer(pInt), constitutive_maxNresults integer(pInt) constitutive_maxNresults
integer(pInt), dimension(:,:,:), allocatable :: constitutive_Nresults integer(pInt), dimension(:,:,:), allocatable :: constitutive_Nresults
real(pReal), dimension(:,:,:,:), allocatable :: constitutive_results real(pReal), dimension(:,:,:,:), allocatable :: constitutive_results