အသုံးပြုသူသတ်မှတ်ပစ္စည်းများအတွက် ဆပ်ရူတင်း များ (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: 2nd 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: 2nd Piola-Kirchhoff စထရက်စ် တန်ဖိုးfstat: အခြေအနေကိန်းရှင် များdtime: အချိန်တိုးချက်ttime: လက်ရှိ အချိန်တိုးချက် အစရှိ စုစုပေါင်းအချိန်temperature: အပူချိန်