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

[skip ci] indentation hick-up

This commit is contained in:
Martin Diehl 2019-09-23 22:13:52 -07:00
parent ffcb7a0a24
commit 116f43f401
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/mesh_marc.f90
View File

@ -888,11 +888,11 @@ subroutine buildCells(thisMesh,elem,connectivity_elem)
call results_closeJobFile call results_closeJobFile
#endif #endif
contains contains
!-------------------------------------------------------------------------------------------------- !------------------------------------------------------------------------------------------------
!> @brief count unique rows (same rows need to be stored consequtively) !> @brief count unique rows (same rows need to be stored consecutively)
!-------------------------------------------------------------------------------------------------- !------------------------------------------------------------------------------------------------
pure function uniqueRows(A) result(u) pure function uniqueRows(A) result(u)
integer, dimension(:,:), intent(in) :: A !< array, rows need to be sorted integer, dimension(:,:), intent(in) :: A !< array, rows need to be sorted