స్థితిస్థాపక వికృతికి సంబంధించిన ఉపరూటీన్లు (uelastic.f90)¶

స్థితిస్థాపక మరియు హైపర్‌ఎలాస్టిసిటీ సమస్యల్లో స్థితిస్థాపక దృఢత్వ మ్యాట్రిక్స్‌ను లెక్కించడానికి మరియు ఒత్తిడిని నవీకరించడానికి ఉపరూటీన్లు అందించబడతాయి. వినియోగదారు స్థితిస్థాపక లేదా హైపర్‌ఎలాస్టిసిటీ నిర్మాణ సంబంధాన్ని ఉపయోగించాలంటే, ముందుగా ఇన్‌పుట్ ఫైల్‌లో !ELASTIC, TYPE=USER లేదా !HYPERELASTIC, TYPE=USER ను అమర్చి అవసరమైన పదార్థ స్థిరాంకాలను ఇన్‌పుట్ చేయాలి; తరువాత uElasticMatrix మరియు uElasticUpdate ఉపరూటీన్లను సృష్టించాలి.

(1) స్థితిస్థాపక దృఢత్వ మ్యాట్రిక్స్ గణన ఉపరూటీన్¶

subroutine uElasticMatrix( matl, strain, D )
    REAL(KIND=kreal), INTENT(IN) :: matl(:)
    REAL(KIND=kreal), INTENT(IN) :: strain(6)
    REAL(KIND=kreal), INTENT(OUT) :: D(6,6)

• matl: పదార్థ స్థిరాంకాలను నిల్వ చేసే అర్రే (గరిష్ఠం 100)
• strain: Green-Lagrange స్ట్రెయిన్
• D: స్థితిస్థాపక మ్యాట్రిక్స్

(2) ఒత్తిడి గణన ఉపరూటీన్¶

subroutine uElasticUpdate ( matl, strain, stress )
    REAL(KIND=kreal), INTENT(IN) :: matl(:)
    REAL(KIND=kreal), INTENT(IN) :: strain(6)
    REAL(KIND=kreal), INTENT(OUT) :: stress(6)

• matl: పదార్థ స్థిరాంకాలను నిల్వ చేసే అర్రే (గరిష్ఠం 100)
• strain: Green-Lagrange స్ట్రెయిన్
• stress: ఒత్తిడి