SetMPOrthotropic Method

cPropMaterial SetMPOrthotropic Method

CSi API ETABS 2015

Sets the material directional symmetry type to orthotropic, and assigns the orthotropic mechanical properties.

Namespace: ETABS2015
Assembly: ETABS2015 (in ETABS2015.dll) Version: 15.0.0.0 (15.0.0.0)

Syntax

int SetMPOrthotropic(
	string Name,
	ref double[] E,
	ref double[] U,
	ref double[] A,
	ref double[] G,
	double Temp = 0
)

int SetMPOrthotropic(
	string Name,
	ref double[] E,
	ref double[] U,
	ref double[] A,
	ref double[] G,
	double Temp = 0
)

Function SetMPOrthotropic ( _
	Name As String, _
	ByRef E As Double(), _
	ByRef U As Double(), _
	ByRef A As Double(), _
	ByRef G As Double(), _
	Optional Temp As Double = 0 _
) As Integer

Function SetMPOrthotropic ( _
	Name As String, _
	ByRef E As Double(), _
	ByRef U As Double(), _
	ByRef A As Double(), _
	ByRef G As Double(), _
	Optional Temp As Double = 0 _
) As Integer

int SetMPOrthotropic(
	String^ Name, 
	array<double>^% E, 
	array<double>^% U, 
	array<double>^% A, 
	array<double>^% G, 
	double Temp = 0
)

int SetMPOrthotropic(
	String^ Name, 
	array<double>^% E, 
	array<double>^% U, 
	array<double>^% A, 
	array<double>^% G, 
	double Temp = 0
)

Parameters

Name: Type: System String
The name of an existing material property.

E: Type: System Double

U: Type: System Double

A: Type: System Double

G: Type: System Double

Temp (Optional): Type: System Double
The temperature at which the specified data applies. The temperature must have been defined previously for the material.
This item applies only if the specified material has properties that are temperature dependent. That is, it applies only if properties are specified for the material at more than one temperature.

Return Value

Returns zero if the data is successfully assigned; otherwise it returns a nonzero value.

Remarks

Examples

C++

Copy to Clipboard Print

Public Sub Example()
       Dim SapModel As cSapModel
       Dim EtabsObject As cOAPI
       Dim ret As Integer = -1 
       Dim MyE() As Double 
       Dim MyU() As Double 
       Dim MyA() As Double 
       Dim MyG() As Double 

   'create ETABS object
       EtabsObject = CreateObject("CSI.ETABS.API.ETABSObject")

   'start ETABS application
       ret = EtabsObject.ApplicationStart()

   'create SapModel object
       SapModel = EtabsObject.SapModel

   'initialize model
       ret = SapModel.InitializeNewModel()

   'create steel deck template model
       ret = SapModel.File.NewSteelDeck(4,12,12,4,4,24,24)

   'initialize new material property
       ret = SapModel.PropMaterial.SetMaterial("Steel", ETABS2013.eMatType.Steel)

   'assign anisotropic mechanical properties 
       ReDim MyE(2)
       ReDim MyU(2)
       ReDim MyA(2)
       ReDim MyG(2)
       MyE(0)=30000
       MyE(1)=10000
       MyE(2)=2000
       MyU(0)=0.2
       MyU(1)=0.05
       MyU(2)=0.1
       MyA(0)=6.5E-6
       MyA(1)=6.5E-6
       MyA(2)=6.5E-6
       MyG(0)=1500
       MyG(1)=2500
       MyG(2)=8700
       ret = SapModel.PropMaterial.SetMPOrthotropic("Steel", MyE, MyU, MyA, MyG)

   'close ETABS
       EtabsObject.ApplicationExit(False)

   'clean up variables
       SapModel = Nothing
       EtabsObject = Nothing 
   End Sub

Public Sub Example()
       Dim SapModel As cSapModel
       Dim EtabsObject As cOAPI
       Dim ret As Integer = -1 
       Dim MyE() As Double 
       Dim MyU() As Double 
       Dim MyA() As Double 
       Dim MyG() As Double 

   'create ETABS object
       EtabsObject = CreateObject("CSI.ETABS.API.ETABSObject")

   'start ETABS application
       ret = EtabsObject.ApplicationStart()

   'create SapModel object
       SapModel = EtabsObject.SapModel

   'initialize model
       ret = SapModel.InitializeNewModel()

   'create steel deck template model
       ret = SapModel.File.NewSteelDeck(4,12,12,4,4,24,24)

   'initialize new material property
       ret = SapModel.PropMaterial.SetMaterial("Steel", ETABS2013.eMatType.Steel)

   'assign anisotropic mechanical properties 
       ReDim MyE(2)
       ReDim MyU(2)
       ReDim MyA(2)
       ReDim MyG(2)
       MyE(0)=30000
       MyE(1)=10000
       MyE(2)=2000
       MyU(0)=0.2
       MyU(1)=0.05
       MyU(2)=0.1
       MyA(0)=6.5E-6
       MyA(1)=6.5E-6
       MyA(2)=6.5E-6
       MyG(0)=1500
       MyG(1)=2500
       MyG(2)=8700
       ret = SapModel.PropMaterial.SetMPOrthotropic("Steel", MyE, MyU, MyA, MyG)

   'close ETABS
       EtabsObject.ApplicationExit(False)

   'clean up variables
       SapModel = Nothing
       EtabsObject = Nothing 
   End Sub