CModel.Bounds Unreliability: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
No edit summary
 
(10 intermediate revisions by 2 users not shown)
Line 1: Line 1:
{{DISPLAYTITLE:cModel.Bounds_Unreliability}}
{{DISPLAYTITLE:cModel.Bounds Unreliability}}{{Template:API}}{{Template:APIBreadcrumb|.[[CModel Class|cModel]]}}
{{Template:APIClass|CModel Class|cModel}}  
{{Template:CModel.Bounds Unreliability.Cmt}} {{Template:CModel.BoundsNote.Cmt}}


== Syntax ==
*Bounds_Unreliability( Time {{APIPrefix|As Double}} , {{APIPrefix|Optional}} StartAge {{APIPrefix|As Double}} = 0 , {{APIPrefix|Optional}} DutyCycle {{APIPrefix|As Double}} = 1.0 ) {{APIPrefix|As}} [[BoundsValues Class|BoundsValues]]


Parameters
<onlyinclude>Calculates the bounds on the probability of failure at a specified time for an associated cModel object. Returns a '''[[BoundsValues Class|BoundsValues]]''' object that represents the confidence bounds.</onlyinclude>
:''Time'': The time to calculate the reliability.


:''StartAge'': The start age.


:''DutyCycle'': The duty cycle.
{{Template:API_BoundsNote}}


== Usage Example ==
== Syntax==
  {{APIComment|'Declare a new repository connection class. See [[Repository Class|Repository]].}}
'''.Bounds_Unreliability'''( ''Time'', ''StartAge'', ''DutyCycle'')
  Dim MyRepository As New Repository
 
===Parameters===
''Time''
:Required. Double. The time at which to calculate the probability of failure.
 
''StartAge''
:Optional. Double. The start age. Default value = 0.
 
''DutyCycle''
:Optional. Double. The duty cycle. Default value = 1.
 
 
== Example ==
This example assumes that a published model with ID #47 exists in the repository.
 
'''VBA'''
{{APIComment|...}}
  {{APIComment|'Get model ID #47 from project ID #1 in the repository.}}
  {{APIPrefix|Dim}} AModel {{APIPrefix|As}} cModel
  MyRepository.Project.SetCurrentProject(1) 
  {{APIPrefix|Set}} AModel = MyRepository.Model.GetModel(47)
    
    
  {{APIComment|'Connect to the Synthesis repository.}}
  {{APIComment|'Set the confidence level to 90% two-sided bounds.}}
  Dim Success As Boolean = False
  {{APIPrefix|Dim}} ErrorMsg {{APIPrefix|As}} String
  Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
  {{APIPrefix|Call}} AModel.SetConfidenceLevel(0.9, ConfBoundsSides_TwoSidedBoth, False, ErrorMsg)
 
  {{APIComment|'Get the list of projects in the connected repository.}}
  {{APIComment|'Calculate the bounds on the model's probability of failure at time &#61; 100.}}
  Dim ListOfModels() As [[NameIdPair Class|NameIdPair]]
  {{APIPrefix|Dim}} ResultValue {{APIPrefix|As}} BoundsValues
  ListOfModels = MyRepository.GetAllModelsInfo()
  {{APIPrefix|Set}} ResultValue = AModel.Bounds_Unreliability(100)
 
  {{APIComment|'Select the ID of the model and retrieve it.}}
  {{APIComment|'Output sample: Display the results for the upper and lower confidence bounds.}}
  Dim AModel as cModel
  MsgBox ({{APIString|" Upper bound: "}} & ResultValue.Upper & {{APIString|", Lower bound: "}} & ResultValue.Lower)
  AModel = MyRepository.GetModel(ListOfModels(0).ID)
 
'''VB.NET'''
{{APIComment|...}}
{{APIComment|'Get model ID #47 from project ID #1 in the repository.}}
  {{APIPrefix|Dim}} AModel {{APIPrefix|As}} cModel
  MyRepository.Project.SetCurrentProject(1) 
  {{APIPrefix|Set}} AModel = MyRepository.Model.GetModel(47)
    
    
  {{APIComment|'Get the bounds on unreliability at time &#61; 100.}}
  {{APIComment|'Set the confidence level to 90% two-sided bounds.}}
  Dim ModelBoundsValue as BoundsValues
  {{APIPrefix|Dim}} ErrorMsg {{APIPrefix|As}} String
  ModelBoundsValue = AModel.Bounds_Unreliability(100)
  AModel.SetConfidenceLevel(0.9, ConfBoundsSides.TwoSidedBoth, False, ErrorMsg)
{{APIComment|'Calculate the bounds on the model's probability of failure at time &#61; 100.}}
  {{APIPrefix|Dim}} ResultValue {{APIPrefix|As}} BoundsValues
  ResultValue = AModel.Bounds_Unreliability(100)
{{APIComment|'Output sample: Display the results for the upper and lower confidence bounds.}}
  MsgBox ({{APIString|" Upper bound: "}} & ResultValue.Upper & {{APIString|", Lower bound: "}} & ResultValue.Lower)

Latest revision as of 19:02, 18 August 2016

APIWiki.png


Member of: SynthesisAPI.cModel


Calculates the bounds on the probability of failure at a specified time for an associated cModel object. Returns a BoundsValues object that represents the confidence bounds.


Remarks: Use the SetConfidenceLevel method to specify the confidence bound settings, and then use this method to perform the calculations. This method applies to published models only. Returns nothing if the calculation is performed on a non-published model.

Syntax

.Bounds_Unreliability( Time, StartAge, DutyCycle) 

Parameters

Time

Required. Double. The time at which to calculate the probability of failure.

StartAge

Optional. Double. The start age. Default value = 0.

DutyCycle

Optional. Double. The duty cycle. Default value = 1.


Example

This example assumes that a published model with ID #47 exists in the repository.

VBA

 ... 

 'Get model ID #47 from project ID #1 in the repository. 
  Dim AModel As cModel
  MyRepository.Project.SetCurrentProject(1)  
  Set AModel = MyRepository.Model.GetModel(47)
 
 'Set the confidence level to 90% two-sided bounds. 
  Dim ErrorMsg As String
  Call AModel.SetConfidenceLevel(0.9, ConfBoundsSides_TwoSidedBoth, False, ErrorMsg)

 'Calculate the bounds on the model's probability of failure at time = 100. 
  Dim ResultValue As BoundsValues
  Set ResultValue = AModel.Bounds_Unreliability(100)

 'Output sample: Display the results for the upper and lower confidence bounds. 
  MsgBox (" Upper bound: " & ResultValue.Upper & ", Lower bound: " & ResultValue.Lower)
VB.NET

 ... 

 'Get model ID #47 from project ID #1 in the repository. 
  Dim AModel As cModel
  MyRepository.Project.SetCurrentProject(1)  
  Set AModel = MyRepository.Model.GetModel(47)
 
 'Set the confidence level to 90% two-sided bounds. 
  Dim ErrorMsg As String
  AModel.SetConfidenceLevel(0.9, ConfBoundsSides.TwoSidedBoth, False, ErrorMsg)

 'Calculate the bounds on the model's probability of failure at time = 100. 
  Dim ResultValue As BoundsValues
  ResultValue = AModel.Bounds_Unreliability(100)

 'Output sample: Display the results for the upper and lower confidence bounds. 
  MsgBox (" Upper bound: " & ResultValue.Upper & ", Lower bound: " & ResultValue.Lower)