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

no need to exclude any geometry type from usage of nonlocal model

This commit is contained in:
Christoph Kords 2013-04-09 13:10:31 +00:00
parent 924d943edc
commit 5b508b5ee4
2 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
code/IO.f90
View File

@ -1472,8 +1472,6 @@ subroutine IO_error(error_ID,e,i,g,ext_msg)
case (252_pInt) case (252_pInt)
msg = 'nonlocal plasticity works only for direct CPFEM, i.e. one grain per integration point' msg = 'nonlocal plasticity works only for direct CPFEM, i.e. one grain per integration point'
case (253_pInt)
msg = 'element type not supported for nonlocal plasticity'
!-------------------------------------------------------------------------------------------------- !--------------------------------------------------------------------------------------------------
! numerics error messages ! numerics error messages

6
code/constitutive.f90
View File

@ -385,12 +385,6 @@ subroutine constitutive_init
case (constitutive_nonlocal_label) case (constitutive_nonlocal_label)
if(myNgrains/=1_pInt) call IO_error(252_pInt, e,i,g) if(myNgrains/=1_pInt) call IO_error(252_pInt, e,i,g)
select case(FE_geomtype(mesh_element(2,e)))
case (7_pInt,8_pInt,9_pInt,10_pInt)
! all fine
case default
call IO_error(253_pInt,e,i,g)
end select
allocate(constitutive_state0(g,i,e)%p(constitutive_nonlocal_sizeState(myInstance))) allocate(constitutive_state0(g,i,e)%p(constitutive_nonlocal_sizeState(myInstance)))
allocate(constitutive_partionedState0(g,i,e)%p(constitutive_nonlocal_sizeState(myInstance))) allocate(constitutive_partionedState0(g,i,e)%p(constitutive_nonlocal_sizeState(myInstance)))
allocate(constitutive_subState0(g,i,e)%p(constitutive_nonlocal_sizeState(myInstance))) allocate(constitutive_subState0(g,i,e)%p(constitutive_nonlocal_sizeState(myInstance)))