მომხმარებლის მიერ განსაზღვრულ მასალებთან დაკავშირებული ქვეპროგრამები (umat.f)¶
უზრუნველყოფს ზოგადი მასალების დეფორმაციის ანალიზის ინტერფეისს, მიუხედავად იმისა, მასალა ელასტიკურია, ჰიპერელასტიკური თუ ელასტოპლასტიკური. მომხმარებლის მიერ განსაზღვრული მასალის გამოყენებისას ჯერ შეყვანის ფაილში უნდა განისაზღვროს !USER_MATERIAL და შეიყვანოს საჭირო მასალის მუდმივები, შემდეგ კი უნდა შეიქმნას ქვეპროგრამები uMatlMatrix და uUpdate.
(1) სიხისტის მატრიცის გამოთვლის ქვეპროგრამა¶
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: მასალის სახელიmatl: მასალის მუდმივების შესანახი მასივი (მაქსიმუმ 100)strain: Green-Lagrange-ის დეფორმაციაstress: მეორე Piola-Kirchhoff-ის ძაბვაfstat: მდგომარეობის ცვლადებიD: კონსტიტუციური განტოლებაdtime: დროის ნამატიttime: მიმდინარე დროის ნამატის დასაწყისში სრული დროtemperature: ტემპერატურა
(2) დეფორმაციისა და ძაბვის განახლების გამოთვლის ქვეპროგრამა¶
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: მასალის სახელიmatl: მასალის მუდმივების შესანახი მასივი (მაქსიმუმ 100)strain: დეფორმაციაstress: მეორე Piola-Kirchhoff-ის ძაბვაfstat: მდგომარეობის ცვლადებიdtime: დროის ნამატიttime: მიმდინარე დროის ნამატის დასაწყისში სრული დროtemperature: ტემპერატურა