Naudotojo apibrėžtų medžiagų paprogramės (umat.f)¶
Suteikiama bendrųjų medžiagų deformacijos analizės sąsaja, nepriklausomai nuo to, ar medžiaga yra elastinė, hiperelastinė ar elastoplastinė. Norint naudoti naudotojo apibrėžtą medžiagą, pirmiausia įvesties faile reikia nustatyti !USER_MATERIAL ir įvesti reikiamas medžiagos konstantas, o tada sukurti paprogrames uMatlMatrix ir uUpdate.
(1) Standumo matricos skaičiavimo paprogramė¶
subroutine uMatlMatrix( mname, matl, strain, stress, fstat, D, dtime, ttime, temperature )
character(len=*), intent(in) :: mname
real(kind=kreal), intent(in) :: matl(:)
real(kind=kreal), intent(in) :: strain(6)
real(kind=kreal), intent(in) :: stress(6)
real(kind=kreal), intent(in) :: fstat(:)
real(kind=kreal), intent(out) :: D(:,:)
real(kind=kreal), intent(in) :: dtime
real(kind=kreal), intent(in) :: ttime
real(kind=kreal), optional :: temperature
mname: medžiagos pavadinimasmatl: medžiagos konstantas saugantis masyvas (daugiausia 100)strain: Greeno–Lagranžo deformacijastress: 2-asis Piolos–Kirchhofo įtempisfstat: būsenos kintamiejiD: konstitucinė priklausomybėdtime: laiko prieaugisttime: bendrasis laikas dabartinio laiko prieaugio pradžiojetemperature: temperatūra
(2) Deformacijos ir įtempių atnaujinimo paprogramė¶
subroutine uUpdate( mname, matl, strain, stress, fstat, dtime, ttime, temperature )
character(len=\*), intent(in) :: mname
real(kind=kreal), intent(in) :: matl(:)
real(kind=kreal), intent(in) :: strain(6)
real(kind=kreal), intent(inout) :: stress(6)
real(kind=kreal), intent(inout) :: fstat(:)
real(kind=kreal), intent(in) :: dtime
real(kind=kreal), intent(in) :: ttime
real(kind=kreal), optional :: temperature
mname: medžiagos pavadinimasmatl: medžiagos konstantas saugantis masyvas (daugiausia 100)strain: deformacijastress: 2-asis Piolos–Kirchhofo įtempisfstat: būsenos kintamiejidtime: laiko prieaugisttime: bendrasis laikas dabartinio laiko prieaugio pradžiojetemperature: temperatūra