Przejdź do treści

Podprogramy do odkształceń sprężystych (uelastic.f90)

Dostępne są podprogramy do obliczania macierzy sztywności sprężystej oraz aktualizacji naprężeń w zagadnieniach sprężystych i hipersprężystych. Aby użyć zdefiniowanej przez użytkownika zależności konstytutywnej dla materiału sprężystego lub hipersprężystego, należy najpierw ustawić w pliku wejściowym !ELASTIC, TYPE=USER lub !HYPERELASTIC, TYPE=USER i wprowadzić wymagane stałe materiałowe, a następnie zaimplementować podprogramy uElasticMatrix i uElasticUpdate.

(1) Podprogram do obliczania macierzy sztywności sprężystej

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: Tablica przechowująca stałe materiałowe (maksymalnie 100)
  • strain: Odkształcenie Greena-Lagrange’a
  • D: Macierz sprężystości

(2) Podprogram do obliczania naprężeń

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: Tablica przechowująca stałe materiałowe (maksymalnie 100)
  • strain: Odkształcenie Greena-Lagrange’a
  • stress: Naprężenie