Skip to content

लोचदार विरूपणसम्बन्धी सबरुटिन (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: प्रतिबल