HELIUS3_STRENGTH は、現在の平織物複合材料の極限および Knee 点複合強度を取得するために呼び出すことができます。
SUBROUTINE HELIUS3_STRENGTH(HPROP, STRENGTH, KNEE) INTEGER(INT_PTR_KIND()), INTENT(IN) :: HPROP REAL(8), INTENT(OUT) :: STRENGTH(7), KNEE(3) ENDSUBROUTINE