added a missing exclamation mark in front of an $OMP directive
This commit is contained in:
parent
d96780967b
commit
19b6fae88b
|
@ -2836,7 +2836,7 @@ subroutine mesh_marc_count_cpSizes (unit)
|
||||||
mesh_HomogMicro(mesh_element(3,i),mesh_element(4,i)) + 1 ! count combinations of homogenization and microstructure
|
mesh_HomogMicro(mesh_element(3,i),mesh_element(4,i)) + 1 ! count combinations of homogenization and microstructure
|
||||||
enddo
|
enddo
|
||||||
|
|
||||||
$OMP CRITICAL (write2out)
|
!$OMP CRITICAL (write2out)
|
||||||
|
|
||||||
! write(6,*)
|
! write(6,*)
|
||||||
! write(6,*) 'Input Parser: IP COORDINATES'
|
! write(6,*) 'Input Parser: IP COORDINATES'
|
||||||
|
|
Loading…
Reference in New Issue