உள்ளடக்கத்திற்கு செல்க

மீள்பிளாஸ்டிக் வடிவமாற்றத்திற்கான துணைநிரல்கள் (uyield.f90)

மீள்பிளாஸ்டிக் விறைப்புத்தன்மை அணியையும் தகைவு திரும்பு வரைபாட்டையும் கணக்கிட துணைநிரல்கள் வழங்கப்படுகின்றன. பயனர் வரையறுத்த நெகிழ்வு செயல்பாட்டைப் பயன்படுத்தும்போது, முதலில் உள்ளீட்டு கோப்பில் !PLASTIC, YIELD=USER ஐ அமைத்து தேவையான பொருள் மாறிலிகளை உள்ளிடவும், பின்னர் uElastoPlasticNumStatus செயல்பாடு மற்றும் uElastoPlasticMatrix, uBackwardEuler துணைநிரல்களை உருவாக்க வேண்டும்.

(1) உண்மை நிலை மாறிகளின் எண்ணிக்கையைத் தரும் செயல்பாடு

integer function uElastoPlasticNumStatus( matl )
    real(kind=kreal),   intent(in)  :: matl(:)
  • matl: பொருள் மாறிலிகளை சேமிக்கும் வரிசையணி (1-100: அமைப்பு வரையறுத்த பொருள் மாறிலிகள், 101-200: பயனர் வரையறுத்த பொருள் மாறிலிகள்)

(2) மீள்பிளாஸ்டிக் விறைப்புத்தன்மை அணியை கணக்கிடும் துணைநிரல்

  subroutine uElastoPlasticMatrix( matl, stress, istat, fstat, plstrain, D, temp, hdflag )
    real(kind=kreal),   intent(in)  :: matl(:)
    real(kind=kreal),   intent(in)  :: stress(6)
    integer(kind=kint), intent(in)  :: istat
    real(kind=kreal),   intent(in)  :: fstat(:)
    real(kind=kreal),   intent(in)  :: plstrain
    real(kind=kreal),   intent(out) :: D(:,:)
    real(kind=kreal),   intent(in)  :: temp
    integer(kind=kint), intent(in)  :: hdflag
  • matl: பொருள் மாறிலிகளை சேமிக்கும் வரிசையணி (1-100: அமைப்பு வரையறுத்த பொருள் மாறிலிகள், 101-200: பயனர் வரையறுத்த பொருள் மாறிலிகள்)
  • stress: 2வது Piola-Kirchhoff தகைவு
  • istat: முழு எண் நிலை மாறி
  • fstat: உண்மை நிலை மாறிகளின் வரிசையணி
  • plstrain: தற்போதைய துணைப்படி தொடக்கத்தில் உள்ள பிளாஸ்டிக் திரிபு
  • D: மீள்பிளாஸ்டிக் அணி
  • temp: வெப்பநிலை
  • hdflag: எல்லா கூறுகளையும் (0), விலகல் கூறுகளை மட்டும் (1), அல்லது பருமனியல் கூறுகளை மட்டும் (2) கணக்கிடுதல்

(3) தகைவு திரும்பு வரைபாடு கணக்கீட்டிற்கான துணைநிரல்

  subroutine uBackwardEuler( matl, stress, plstrain, istat, fstat, temp, hdflag )
    real(kind=kreal),   intent(in)    :: matl(:)
    real(kind=kreal),   intent(inout) :: stress(6)
    real(kind=kreal),   intent(in)    :: plstrain
    integer(kind=kint), intent(inout) :: istat
    real(kind=kreal),   intent(inout) :: fstat(:)
    real(kind=kreal),   intent(in)    :: temp
    integer(kind=kint), intent(in)    :: hdflag
  • matl: பொருள் மாறிலிகளை சேமிக்கும் வரிசையணி (1-100: அமைப்பு வரையறுத்த பொருள் மாறிலிகள், 101-200: பயனர் வரையறுத்த பொருள் மாறிலிகள்)
  • stress: சோதனைத் தகைவுக்காக மீள்தன்மை வடிவமாற்றம் எனக் கருதி பெறப்பட்ட 2வது Piola-Kirchhoff தகைவு
  • plstrain: தற்போதைய துணைப்படி தொடக்கத்தில் உள்ள பிளாஸ்டிக் திரிபு
  • istat: முழு எண் நிலை மாறி
  • fstat: உண்மை நிலை மாறிகளின் வரிசையணி
  • temp: வெப்பநிலை
  • hdflag: எல்லா கூறுகளையும் (0), விலகல் கூறுகளை மட்டும் (1), அல்லது பருமனியல் கூறுகளை மட்டும் (2) கணக்கிடுதல்