ALTADataSet.AddSuspensionInterval

Member of: SynthesisAPI.ALTADataSet

Adds interval censored suspensions to the data set.

Syntax

.AddSuspensionInterval(StartValue, EndValue, NumberinGroup, ByRef Stress())

.AddSuspensionInterval(StartValue, EndValue, NumberinGroup, Stress1)

.AddSuspensionInterval(StartValue, EndValue, NumberinGroup, Stress1, Stress2)

Parameters

StartValue

Required. Double. The starting value of the suspension interval.

EndValue

Required. Double. The ending value of the suspension interval.

NumberInGroup

Required. Integer. The number of units that were suspended during the interval.

Stress()

Required. Object. The stress values, where Stress(0) = value for first stress definition, Stress(1) = value for second stress definitition, etc. Can be an array of numeric stress values or ALTAStressProfile objects (stress profiles apply to the cumulative damage (CD) model only).

Stress1

Required. Object. The stress value for the first stress definition. Can be a numeric stress value or an ALTAStressProfile object (stress profiles apply to the cumulative damage (CD) model only).

Stress2

Required. Object. The stress value for the second stress definition. Can be a numeric stress value or an ALTAStressProfile object (stress profiles apply to the cumulative damage (CD) model only).

Example

The following example demonstrates how to add suspension intervals to an ALTADataSet object.

VBA

 'Declare a new ALTADataSet object.  
  Dim ADS As New ALTADataSet
 
 'Define a stress type with use stress level = 10. 
  Call ADS.AddStressDefinition("Temperature",,10)
  
 'Add suspensions for Temperature = 190. 
  Dim Stress(0) As Variant
  Stress(0) = 190

  Call ADS.AddSuspensionInterval(100, 120, 1, Stress)
  Call ADS.AddSuspensionInterval(120, 130, 1, Stress)
  Call ADS.AddSuspensionInterval(130, 140, 1, Stress)

VB.NET
 
 'Declare a new ALTADataSet object.  
  Dim ADS As New ALTADataSet
 
 'Define a stress type with use stress level = 10. 
  ADS.AddStressDefinition("Temperature",,10)
  
 'Add suspensions for Temperature = 190. 
  ADS.AddSuspensionInterval(100, 120, 1, 190)
  ADS.AddSuspensionInterval(120, 130, 1, 190)
  ADS.AddSuspensionInterval(130, 140, 1, 190)