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

Taylor homogenization is now called isostrain, changed material.config accordingly. 

corrected error message in case of unknown homogenization
This commit is contained in:
Franz Roters 2009-06-08 13:28:00 +00:00
parent 9d4521b7ec
commit db731a4be3
3 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
trunk/IO.f90
View File

@ -790,7 +790,7 @@ END FUNCTION
case (200) case (200)
msg = 'Unknown constitution specified' msg = 'Unknown constitution specified'
case (201) case (201)
msg = 'Unknown lattice type specified' msg = 'Unknown homogenization specified'
case (202) case (202)
msg = 'Number of slip systems too small' msg = 'Number of slip systems too small'
case (203) case (203)

2
trunk/homogenization.f90
View File

@ -109,7 +109,7 @@ subroutine homogenization_init()
endif endif
homogenization_sizePostResults(i,e) = homogenization_isostrain_sizePostResults(myInstance) homogenization_sizePostResults(i,e) = homogenization_isostrain_sizePostResults(myInstance)
case default case default
call IO_error(200,ext_msg=homogenization_type(mesh_element(3,e))) ! unknown type 200 is phase! call IO_error(201,ext_msg=homogenization_type(mesh_element(3,e))) ! unknown type 201 is homogenization!
end select end select
enddo enddo
enddo enddo

4
trunk/material.config
View File

@ -3,7 +3,7 @@
##################### #####################
[SX] [SX]
type Taylor type isostrain
Ngrains 1 Ngrains 1
[RGC] [RGC]
@ -11,7 +11,7 @@ type RGC
Ngrains 8 Ngrains 8
[Taylor4] [Taylor4]
type Taylor type isostrain
Ngrains 4 Ngrains 4
##################### #####################