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

polishing

This commit is contained in:
Martin Diehl 2019-10-14 15:09:16 +02:00
parent 1726d95a56
commit 9ee709d214
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/mesh_marc.f90
View File

@ -176,8 +176,12 @@ subroutine mesh_init(ip,el)
end subroutine mesh_init end subroutine mesh_init
!--------------------------------------------------------------------------------------------------
subroutine writeGeometry(elemType,connectivity_elem,connectivity_cell,coordinates_nodes,coordinates_points) !> @brief Writes all information needed for the DADF5 geometry
!--------------------------------------------------------------------------------------------------
subroutine writeGeometry(elemType, &
connectivity_elem,connectivity_cell, &
coordinates_nodes,coordinates_points)
integer, intent(in) :: elemType integer, intent(in) :: elemType
integer, dimension(:,:), intent(in) :: & integer, dimension(:,:), intent(in) :: &