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