Skip to content

Translation status

This page has not yet been translated into English, or its translation is out of date. The current 日本語 version is shown as a fallback.

弾性変形に関わるサブルーチン (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: 応力