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

missed out

This commit is contained in:
Sharan Roongta 2020-10-01 16:07:50 +02:00
parent 33b0181286
commit 26acdaf9ec
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/material.f90
View File

@ -180,8 +180,8 @@ subroutine material_init(restart)
material_name_homogenization(myHomog) = trim(adjustl(sectionName))//material_homogenization%getKey(myHomog) material_name_homogenization(myHomog) = trim(adjustl(sectionName))//material_homogenization%getKey(myHomog)
enddo enddo
call material_parseMicrostructure call material_parseMaterial
print*, 'Microstructure parsed' print*, 'Material parsed'
call material_parseHomogenization call material_parseHomogenization
print*, 'Homogenization parsed' print*, 'Homogenization parsed'
@ -319,7 +319,7 @@ end subroutine material_parseHomogenization
!-------------------------------------------------------------------------------------------------- !--------------------------------------------------------------------------------------------------
!> @brief parses the material part in the material configuration file !> @brief parses the material part in the material configuration file
!-------------------------------------------------------------------------------------------------- !--------------------------------------------------------------------------------------------------
subroutine material_parseMicrostructure subroutine material_parseMaterial
class(tNode), pointer :: materials, & !> list of materials class(tNode), pointer :: materials, & !> list of materials
material, & !> material definition material, & !> material definition
@ -393,7 +393,7 @@ subroutine material_parseMicrostructure
enddo enddo
end subroutine material_parseMicrostructure end subroutine material_parseMaterial
end module material end module material