created new file containing all files to include for commercial FEM to simplify adding/renaming/removing modules
This commit is contained in:
parent
e779c2e1e6
commit
5c4e99f965
|
@ -0,0 +1,39 @@
|
||||||
|
!--------------------------------------------------------------------------------------------------
|
||||||
|
! $Id: libs.f90 3413 2014-08-24 22:07:53Z MPIE\m.diehl $
|
||||||
|
!--------------------------------------------------------------------------------------------------
|
||||||
|
!> @author Martin Diehl, Max-Planck-Institut für Eisenforschung GmbH
|
||||||
|
!> @brief all DAMASK files without solver
|
||||||
|
!> @details List of files needed by MSC.Marc, Abaqus/Explicit, and Abaqus/Standard
|
||||||
|
!--------------------------------------------------------------------------------------------------
|
||||||
|
#include "IO.f90"
|
||||||
|
#include "libs.f90"
|
||||||
|
#include "numerics.f90"
|
||||||
|
#include "debug.f90"
|
||||||
|
#include "math.f90"
|
||||||
|
#include "FEsolving.f90"
|
||||||
|
#include "mesh.f90"
|
||||||
|
#include "material.f90"
|
||||||
|
#include "lattice.f90"
|
||||||
|
#include "damage_none.f90"
|
||||||
|
#include "damage_brittle.f90"
|
||||||
|
#include "damage_ductile.f90"
|
||||||
|
#include "damage_gurson.f90"
|
||||||
|
#include "damage_anisotropic.f90"
|
||||||
|
#include "thermal_isothermal.f90"
|
||||||
|
#include "thermal_adiabatic.f90"
|
||||||
|
#include "vacancy_constant.f90"
|
||||||
|
#include "vacancy_generation.f90"
|
||||||
|
#include "constitutive_none.f90"
|
||||||
|
#include "constitutive_j2.f90"
|
||||||
|
#include "constitutive_phenopowerlaw.f90"
|
||||||
|
#include "constitutive_titanmod.f90"
|
||||||
|
#include "constitutive_dislotwin.f90"
|
||||||
|
#include "constitutive_dislokmc.f90"
|
||||||
|
#include "constitutive_nonlocal.f90"
|
||||||
|
#include "constitutive.f90"
|
||||||
|
#include "crystallite.f90"
|
||||||
|
#include "homogenization_none.f90"
|
||||||
|
#include "homogenization_isostrain.f90"
|
||||||
|
#include "homogenization_RGC.f90"
|
||||||
|
#include "homogenization.f90"
|
||||||
|
#include "CPFEM.f90"
|
|
@ -73,38 +73,7 @@ end function getSolverJobName
|
||||||
|
|
||||||
end module DAMASK_interface
|
end module DAMASK_interface
|
||||||
|
|
||||||
#include "IO.f90"
|
#include CommercialFEM_fileList.f90
|
||||||
#include "libs.f90"
|
|
||||||
#include "numerics.f90"
|
|
||||||
#include "debug.f90"
|
|
||||||
#include "math.f90"
|
|
||||||
#include "FEsolving.f90"
|
|
||||||
#include "mesh.f90"
|
|
||||||
#include "material.f90"
|
|
||||||
#include "lattice.f90"
|
|
||||||
#include "damage_none.f90"
|
|
||||||
#include "damage_brittle.f90"
|
|
||||||
#include "damage_ductile.f90"
|
|
||||||
#include "damage_gurson.f90"
|
|
||||||
#include "damage_anisotropic.f90"
|
|
||||||
#include "thermal_isothermal.f90"
|
|
||||||
#include "thermal_adiabatic.f90"
|
|
||||||
#include "vacancy_constant.f90"
|
|
||||||
#include "vacancy_generation.f90"
|
|
||||||
#include "constitutive_none.f90"
|
|
||||||
#include "constitutive_j2.f90"
|
|
||||||
#include "constitutive_phenopowerlaw.f90"
|
|
||||||
#include "constitutive_titanmod.f90"
|
|
||||||
#include "constitutive_dislotwin.f90"
|
|
||||||
#include "constitutive_dislokmc.f90"
|
|
||||||
#include "constitutive_nonlocal.f90"
|
|
||||||
#include "constitutive.f90"
|
|
||||||
#include "crystallite.f90"
|
|
||||||
#include "homogenization_none.f90"
|
|
||||||
#include "homogenization_isostrain.f90"
|
|
||||||
#include "homogenization_RGC.f90"
|
|
||||||
#include "homogenization.f90"
|
|
||||||
#include "CPFEM.f90"
|
|
||||||
|
|
||||||
subroutine vumat(nBlock, nDir, nshr, nStateV, nFieldV, nProps, lAnneal, &
|
subroutine vumat(nBlock, nDir, nshr, nStateV, nFieldV, nProps, lAnneal, &
|
||||||
stepTime, totalTime, dt, cmName, coordMp, charLength, &
|
stepTime, totalTime, dt, cmName, coordMp, charLength, &
|
||||||
|
|
|
@ -73,41 +73,8 @@ end function getSolverJobName
|
||||||
|
|
||||||
end module DAMASK_interface
|
end module DAMASK_interface
|
||||||
|
|
||||||
#include "IO.f90"
|
#include CommercialFEM_fileList.f90
|
||||||
#include "libs.f90"
|
|
||||||
#include "numerics.f90"
|
|
||||||
#include "debug.f90"
|
|
||||||
#include "math.f90"
|
|
||||||
#include "FEsolving.f90"
|
|
||||||
#include "mesh.f90"
|
|
||||||
#include "material.f90"
|
|
||||||
#include "lattice.f90"
|
|
||||||
#include "damage_none.f90"
|
|
||||||
#include "damage_brittle.f90"
|
|
||||||
#include "damage_ductile.f90"
|
|
||||||
#include "damage_gurson.f90"
|
|
||||||
#include "damage_anisotropic.f90"
|
|
||||||
#include "thermal_isothermal.f90"
|
|
||||||
#include "thermal_adiabatic.f90"
|
|
||||||
#include "vacancy_constant.f90"
|
|
||||||
#include "vacancy_generation.f90"
|
|
||||||
#include "constitutive_none.f90"
|
|
||||||
#include "constitutive_j2.f90"
|
|
||||||
#include "constitutive_phenopowerlaw.f90"
|
|
||||||
#include "constitutive_titanmod.f90"
|
|
||||||
#include "constitutive_dislotwin.f90"
|
|
||||||
#include "constitutive_dislokmc.f90"
|
|
||||||
#include "constitutive_nonlocal.f90"
|
|
||||||
#include "constitutive.f90"
|
|
||||||
#include "crystallite.f90"
|
|
||||||
#include "homogenization_none.f90"
|
|
||||||
#include "homogenization_isostrain.f90"
|
|
||||||
#include "homogenization_RGC.f90"
|
|
||||||
#include "homogenization.f90"
|
|
||||||
#include "CPFEM.f90"
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
subroutine UMAT(STRESS,STATEV,DDSDDE,SSE,SPD,SCD,&
|
subroutine UMAT(STRESS,STATEV,DDSDDE,SSE,SPD,SCD,&
|
||||||
RPL,DDSDDT,DRPLDE,DRPLDT,STRAN,DSTRAN,&
|
RPL,DDSDDT,DRPLDE,DRPLDT,STRAN,DSTRAN,&
|
||||||
TIME,DTIME,TEMP,DTEMP,PREDEF,DPRED,CMNAME,NDI,NSHR,NTENS,&
|
TIME,DTIME,TEMP,DTEMP,PREDEF,DPRED,CMNAME,NDI,NSHR,NTENS,&
|
||||||
|
|
|
@ -102,38 +102,7 @@ end function getSolverJobName
|
||||||
|
|
||||||
end module DAMASK_interface
|
end module DAMASK_interface
|
||||||
|
|
||||||
#include "IO.f90"
|
#include CommercialFEM_fileList.f90
|
||||||
#include "libs.f90"
|
|
||||||
#include "numerics.f90"
|
|
||||||
#include "debug.f90"
|
|
||||||
#include "math.f90"
|
|
||||||
#include "FEsolving.f90"
|
|
||||||
#include "mesh.f90"
|
|
||||||
#include "material.f90"
|
|
||||||
#include "lattice.f90"
|
|
||||||
#include "damage_none.f90"
|
|
||||||
#include "damage_brittle.f90"
|
|
||||||
#include "damage_ductile.f90"
|
|
||||||
#include "damage_gurson.f90"
|
|
||||||
#include "damage_anisotropic.f90"
|
|
||||||
#include "thermal_isothermal.f90"
|
|
||||||
#include "thermal_adiabatic.f90"
|
|
||||||
#include "vacancy_constant.f90"
|
|
||||||
#include "vacancy_generation.f90"
|
|
||||||
#include "constitutive_none.f90"
|
|
||||||
#include "constitutive_j2.f90"
|
|
||||||
#include "constitutive_phenopowerlaw.f90"
|
|
||||||
#include "constitutive_titanmod.f90"
|
|
||||||
#include "constitutive_dislotwin.f90"
|
|
||||||
#include "constitutive_dislokmc.f90"
|
|
||||||
#include "constitutive_nonlocal.f90"
|
|
||||||
#include "constitutive.f90"
|
|
||||||
#include "crystallite.f90"
|
|
||||||
#include "homogenization_none.f90"
|
|
||||||
#include "homogenization_isostrain.f90"
|
|
||||||
#include "homogenization_RGC.f90"
|
|
||||||
#include "homogenization.f90"
|
|
||||||
#include "CPFEM.f90"
|
|
||||||
|
|
||||||
!--------------------------------------------------------------------------------------------------
|
!--------------------------------------------------------------------------------------------------
|
||||||
!> @brief This is the MSC.Marc user subroutine for defining material behavior
|
!> @brief This is the MSC.Marc user subroutine for defining material behavior
|
||||||
|
|
Loading…
Reference in New Issue