අන්තර්ගතය වෙත යන්න

පරිශීලක-අර්ථදක්වන ද්‍රව්‍ය සඳහා උපරූටීන (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: උෂ්ණත්වය