HELIUS2_STRENGTH can be called to obtain the composite strengths of the current unidirectional composite.
SUBROUTINE HELIUS2_STRENGTH(HPROP, STRENGTH)
INTEGER(INT_PTR_KIND()), INTENT(IN) :: HPROP
REAL(8), INTENT(OUT) :: STRENGTH(6)
ENDSUBROUTINE