avoid long lines

This commit is contained in:
Martin Diehl 2021-04-03 20:39:07 +02:00
parent 09beb8f38c
commit 857a990a0e
1 changed files with 2 additions and 1 deletions

View File

@ -89,7 +89,8 @@ program DAMASK_mesh
if (maxCutBack < 0) call IO_error(301,ext_msg='maxCutBack')
! reading basic information from load case file and allocate data structure containing load cases
call DMGetDimension(geomMesh,dimPlex,ierr); CHKERRA(ierr) !< dimension of mesh (2D or 3D)
call DMGetDimension(geomMesh,dimPlex,ierr) !< dimension of mesh (2D or 3D)
CHKERRA(ierr)
nActiveFields = 1
allocate(solres(nActiveFields))