CModel.ScaleParameter A

Returns the scale parameter for ALTA models. Returns 0 if the model is not an ALTA model.

Scale parameter = eta for Weibull, lambda for exponential, log-mean for lognormal.

Syntax

• ScaleParameter_A()As Double

Usage Example

 'Declare a new repository connection object. See Repository. 
 Dim MyRepository As New Repository
 
 'Connect to the Synthesis repository. 
 Dim Success As Boolean = False
 Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
 
 'Get the list of projects in the connected repository. 
 Dim ListOfModels() As NameIdPair
 ListOfModels = MyRepository.GetAllModelsInfo()
 
 'Select the ID of the model and retrieve it. 
 Dim AModel as cModel
 AModel = MyRepository.GetModel(ListOfModels(0).ID)
 
 'Retrieve the scale parameter of the Model. 
 Dim ScaleParameter as Double
 ScaleParameter = MyRepository.GetModel(ListOfModels(0).ID).ScaleParameter_A