more systematic naming
This commit is contained in:
parent
e29a732d9f
commit
be39865ff7
|
@ -205,9 +205,9 @@ subroutine hypela2(d,g,e,de,s,t,dt,ngens,m,nn,kcus,matus,ndi,nshear,disp, &
|
|||
use DAMASK_interface
|
||||
use config
|
||||
use YAML_types
|
||||
use discretization_marc
|
||||
use discretization_Marc
|
||||
use homogenization
|
||||
use materialpoint
|
||||
use materialpoint_Marc
|
||||
|
||||
implicit none
|
||||
include "omp_lib.h" ! the openMP function library
|
||||
|
@ -406,8 +406,8 @@ subroutine flux(f,ts,n,time)
|
|||
!--------------------------------------------------------------------------------------------------
|
||||
subroutine uedinc(inc,incsub)
|
||||
use prec
|
||||
use materialpoint
|
||||
use discretization_marc
|
||||
use materialpoint_Marc
|
||||
use discretization_Marc
|
||||
|
||||
implicit none
|
||||
integer, intent(in) :: inc, incsub
|
||||
|
|
|
@ -1212,5 +1212,4 @@ logical function containsRange(str,chunkPos)
|
|||
|
||||
end function containsRange
|
||||
|
||||
|
||||
end module discretization_Marc
|
||||
|
|
|
@ -3,7 +3,7 @@
|
|||
!> @author Philip Eisenlohr, Max-Planck-Institut für Eisenforschung GmbH
|
||||
!> @brief materialpoint engine
|
||||
!--------------------------------------------------------------------------------------------------
|
||||
module materialpoint
|
||||
module materialpoint_Marc
|
||||
use DAMASK_interface
|
||||
use prec
|
||||
use IO
|
||||
|
@ -277,4 +277,4 @@ subroutine materialpoint_results(inc,time)
|
|||
|
||||
end subroutine materialpoint_results
|
||||
|
||||
end module materialpoint
|
||||
end module materialpoint_Marc
|
||||
|
|
Loading…
Reference in New Issue