systematic naming
This commit is contained in:
parent
79ec2c5a9d
commit
2497a5fb4a
|
@ -21,6 +21,7 @@
|
|||
#include "lattice.f90"
|
||||
#include "phase.f90"
|
||||
#include "phase_mechanics.f90"
|
||||
#include "phase_mechanics_plastic.f90"
|
||||
#include "phase_mechanics_plastic_none.f90"
|
||||
#include "phase_mechanics_plastic_isotropic.f90"
|
||||
#include "phase_mechanics_plastic_phenopowerlaw.f90"
|
||||
|
@ -28,6 +29,7 @@
|
|||
#include "phase_mechanics_plastic_dislotwin.f90"
|
||||
#include "phase_mechanics_plastic_dislotungsten.f90"
|
||||
#include "phase_mechanics_plastic_nonlocal.f90"
|
||||
#include "phase_mechanics_eigendeformation.f90"
|
||||
#include "phase_mechanics_eigendeformation_cleavageopening.f90"
|
||||
#include "phase_mechanics_eigendeformation_slipplaneopening.f90"
|
||||
#include "phase_thermal.f90"
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
!----------------------------------------------------------------------------------------------------
|
||||
!> @brief internal microstructure state for all plasticity constitutive models
|
||||
!----------------------------------------------------------------------------------------------------
|
||||
submodule(constitutive) constitutive_mech
|
||||
submodule(constitutive) mechanics
|
||||
|
||||
enum, bind(c); enumerator :: &
|
||||
ELASTICITY_UNDEFINED_ID, &
|
||||
|
@ -1637,5 +1637,5 @@ subroutine constitutive_LiAndItsTangents(Li, dLi_dS, dLi_dFi, &
|
|||
|
||||
end subroutine constitutive_LiAndItsTangents
|
||||
|
||||
end submodule constitutive_mech
|
||||
end submodule mechanics
|
||||
|
||||
|
|
|
@ -0,0 +1,2 @@
|
|||
submodule(constitutive:mechanics) eigendeformation
|
||||
end submodule eigendeformation
|
|
@ -4,7 +4,7 @@
|
|||
!> @brief material subroutine incorporating kinematics resulting from opening of cleavage planes
|
||||
!> @details to be done
|
||||
!--------------------------------------------------------------------------------------------------
|
||||
submodule(constitutive:constitutive_mech) kinematics_cleavage_opening
|
||||
submodule(constitutive:eigendeformation) cleavageopening
|
||||
|
||||
integer, dimension(:), allocatable :: kinematics_cleavage_opening_instance
|
||||
|
||||
|
@ -162,4 +162,4 @@ module subroutine kinematics_cleavage_opening_LiAndItsTangent(Ld, dLd_dTstar, S,
|
|||
|
||||
end subroutine kinematics_cleavage_opening_LiAndItsTangent
|
||||
|
||||
end submodule kinematics_cleavage_opening
|
||||
end submodule cleavageopening
|
||||
|
|
|
@ -4,7 +4,7 @@
|
|||
!> @brief material subroutine incorporating kinematics resulting from opening of slip planes
|
||||
!> @details to be done
|
||||
!--------------------------------------------------------------------------------------------------
|
||||
submodule(constitutive:constitutive_mech) kinematics_slipplane_opening
|
||||
submodule(constitutive:eigendeformation) slipplaneopening
|
||||
|
||||
integer, dimension(:), allocatable :: kinematics_slipplane_opening_instance
|
||||
|
||||
|
@ -193,4 +193,4 @@ module subroutine kinematics_slipplane_opening_LiAndItsTangent(Ld, dLd_dTstar, S
|
|||
|
||||
end subroutine kinematics_slipplane_opening_LiAndItsTangent
|
||||
|
||||
end submodule kinematics_slipplane_opening
|
||||
end submodule slipplaneopening
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
submodule(constitutive:constitutive_mech) plastic
|
||||
submodule(constitutive:mechanics) plastic
|
||||
|
||||
interface
|
||||
|
||||
|
|
Loading…
Reference in New Issue