using the module is the recommended approach

This commit is contained in:
Martin Diehl 2022-05-13 08:43:24 +02:00
parent c8d48d6eb9
commit 05d3a92944
1 changed files with 1 additions and 1 deletions

View File

@ -208,9 +208,9 @@ subroutine hypela2(d,g,e,de,s,t,dt,ngens,m,nn,kcus,matus,ndi,nshear,disp, &
use discretization_Marc use discretization_Marc
use homogenization use homogenization
use materialpoint_Marc use materialpoint_Marc
use OMP_LIB
implicit none implicit none
include "omp_lib.h" ! the openMP function library
integer, intent(in) :: & ! according to MSC.Marc 2012 Manual D integer, intent(in) :: & ! according to MSC.Marc 2012 Manual D
ngens, & !< size of stress-strain law ngens, & !< size of stress-strain law
nn, & !< integration point number nn, & !< integration point number