*If(strcmp(MatProp(Material_Prototype),"CCCombinedMaterial")!=0 && strcmp(MatProp(Material_Prototype),"CCSandwicKubinaCombinedMaterial")!=0 && strcmp(MatProp(Material_Prototype),"CCSandwicKubina")!=0 && strcmp(MatProp(Material_Prototype),"CCBeam3DMaterial")!=0 && strcmp(MatProp(Material_Prototype),"CCShellMaterial")!=0 && strcmp(MatProp(Material_Prototype),"CCReinforcementWithTempDepProperties")!=0 && strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2WithTempDepProperties")!=0 && strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2SHCCWithTempDepProperties")!=0 && strcmp(MatProp(Material_Prototype),"CCCombinedMaterialWithTempDepProperties")!=0  && strcmp(MatProp(Material_Prototype),"CC3DBiLinearVonMisesWithTempDepProperties")!=0)
*#
*Set Var MaterialType=1
*If(strcmp(MatProp(Material_Prototype),"CCModelBaXi94")==0)
*WarningBox Error: CCModelBaXi94 material is not supported. Please use CCTransportMaterial.
*include ..\include.src.bas\WriteBaXiFUNCTIONs.bas
*EndIf
*#
*If(strcmp(MatProp(Material_Prototype),"CCTransportMaterial")==0 || strcmp(MatProp(Material_Prototype),"CCTransportMaterialLevel7")==0)
*include ..\include.src.bas\Function_for_Temperature_Advanced_Variables.bas
*include ..\include.src.bas\Function_for_Moisture_Advanced_Variables.bas
*EndIf
*#
*If(strcmp(MatProp(Material_Prototype),"CCTransportMaterialLevel7")==0)
*include ..\include.src.bas\CCModelTransportMaterial_functions.bas
*EndIf
*#
*If(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2Variable")==0)
*include ..\include.src.bas\Function_for_Variable_NonCem2.bas
*EndIf
*#

MATERIAL ID *matvar
  NAME "*MatProp(0)#*matvar#*MatNum"
*If( strcmp(MatProp(Material_Prototype),"CC2DBiLinearSteelVonMises")!=0 && strcmp(MatProp(Material_Prototype),"CC3DBiLinearSteelVonMises")!=0 && strcmp(MatProp(Material_Prototype),"CCFromFile")!=0)
  TYPE "*MatProp(Material_Prototype)"
*EndIf
*#
*Set Var MaterialNonQuadratic=MatProp(Non-Quadratic_Element,Int)
*If(MaterialNonQuadratic==1)
*tcl(TK_CTRLclear)*\
*tcl(TK_CTRLc "Info: In the model is MATERIAL with Non-Quadratic elements: " *MatProp(0) " \n ")*\
*tcl(TK_TK_WarnWinTextTK_CTRLv)*\
*#WarningBox Info: In the model is MATERIAL with Non-Quadratic elements
// All elements in this material will be Non-Qadratic
*EndIf
*EndIf
*If(strcmp(MatProp(Material_Prototype),"CCModelBaXi94")==0)
*#
*include ..\include.src.bas\CCModelBaXi94MaterialParameters.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCTransportMaterial")==0)
*#
*include ..\include.src.bas\CCModelTransportMaterial.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2Variable")==0)
*#
*include ..\include.src.bas\CC3DNonLinCementitious2Variable.bas
*include ..\include.src.bas\addCC3DNonLinCementitious2AdvanceMaterialParameters.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCTransportMaterialLevel7")==0)
*#
*include ..\include.src.bas\CCModelTransportMaterial.bas
*include ..\include.src.bas\CCModelTransportMaterialLevel7.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCPlaneStressElastIsotropic")==0 || strcmp(MatProp(Material_Prototype),"CCPlaneStrainElastIsotropic")==0||strcmp(MatProp(Material_Prototype),"CCASymElastIsotropic")==0 || strcmp(MatProp(Material_Prototype),"CC3DElastIsotropic")==0)
*#
*include ..\include.src.bas\BasicMaterialParameters.bas
*include ..\include.src.bas\ModelIdealisation.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCPlaneStressSteel")==0)
*#
  E *MatProp(Reinf_01_Young_s_Modulus-E,Real)
*include ..\include.src.bas\BasicMaterialParameters.bas
*#	YIELD *MatProp(Reinf_01_Yield_Strength_YS,Real)
  RHO *MatProp(RHO-Density,Real)
  ALPHA *MatProp(Thermal_Expansion-Alpha,Real)
  FUNCTION *Operation(matvar*IncrAdvancedFunID+9)
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCSBETAMaterial")==0)
*#
*include ..\include.src.bas\BasicMaterialParameters.bas
*#
*include ..\include.src.bas\addCCSBETAMaterialParameters.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC2DInterface")==0 || strcmp(MatProp(Material_Prototype),"CC3DInterface")==0)
*#
*include ..\include.src.bas\CCInterfaceMaterialParameters.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DBiLinearSteelVonMises")==0 || strcmp(MatProp(Material_Prototype),"CC2DBiLinearSteelVonMises")==0)
   TYPE "CC3DBiLinearSteelVonMises"
*include ..\include.src.bas\BasicMaterialParameters.bas
*include ..\include.src.bas\CC3DBiLinearSteelVonMisesParametersOnly.bas
*#
*# ElseIf(strcmp(MatProp(Material_Prototype),"Spring_for")==0)
*ElseIf(strcmp(MatProp(Material_Prototype),"CCSpringMaterial")==0)
*#
*include ..\include.src.bas\CCSpringMaterial.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCFromFile")==0)
*#
*include ..\include.src.bas\CCFromFile.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DCementitious")==0)
*include ..\include.src.bas\BasicMaterialParameters.bas
*include ..\include.src.bas\addCC3DCementitiousMaterialParameters.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious")==0 || strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2")==0 )
*include ..\include.src.bas\BasicMaterialParameters.bas
*include ..\include.src.bas\addCC3DCementitiousMaterialParameters.bas
*include ..\include.src.bas\addCC3DNonLinCementitiousMaterialParameters.bas
*include ..\include.src.bas\addCC3DNonLinCementitious2AdvanceMaterialParameters.bas
*#
*include ..\include.src.bas\addRadialCracks_MaterialParameter.bas
*include ..\include.src.bas\ModelIdealisation.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2Fatigue")==0 )
*include ..\include.src.bas\BasicMaterialParameters.bas
*include ..\include.src.bas\addCC3DCementitiousMaterialParameters.bas
*include ..\include.src.bas\addCC3DNonLinCementitiousMaterialParameters.bas
*include ..\include.src.bas\addCC3DNonLinCementitious2AdvanceMaterialParameters.bas
*include ..\include.src.bas\addRadialCracks_MaterialParameter.bas
*include ..\include.src.bas\addCC3DNonLinCementitious2FatigueMaterialParameters.bas
*include ..\include.src.bas\ModelIdealisation.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2FRC")==0 )
*include ..\include.src.bas\BasicMaterialParameters.bas
*include ..\include.src.bas\addCC3DCementitiousMaterialParameters.bas
*include ..\include.src.bas\addCC3DNonLinCementitiousMaterialParameters.bas
*include ..\include.src.bas\addCC3DNonLinCementitious2AdvanceMaterialParameters.bas
*include ..\include.src.bas\addRadialCracks_MaterialParameter.bas
*include ..\include.src.bas\addCC3DNonLinCementitious2FRCMaterialParameters.bas
*include ..\include.src.bas\ModelIdealisation.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2User")==0 || strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2SHCC")==0)
*include ..\include.src.bas\BasicMaterialParameters.bas
*include ..\include.src.bas\addCC3DCementitiousMaterialParameters.bas
*#
*include ..\include.src.bas\addCC3DNonLinCementitious2User_SHCCMaterialParameters.bas
*include ..\include.src.bas\addCC3DNonLinCementitious2AdvanceMaterialParameters.bas
*include ..\include.src.bas\addRadialCracks_MaterialParameter.bas
*#
*include ..\include.src.bas\ModelIdealisation.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC1DElastIsotropic")==0)
*#
*include ..\include.src.bas\BasicReinforcementMaterialParameters.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCSteelDRC")==0)      
*#
*include ..\include.src.bas\BasicReinforcementMaterialParameters.bas
*include ..\include.src.bas\addCCsteelDRCMaterialParameters.bas
*#*
*ElseIf(strcmp(MatProp(Material_Prototype),"CCReinforcement")==0)
*#
*include ..\include.src.bas\BasicReinforcementMaterialParameters.bas
*#
  FUNCTION *Operation(matvar*IncrAdvancedFunID+9)
*ElseIf(strcmp(MatProp(Material_Prototype),"CCCyclingReinforcement")==0)
*#
*include ..\include.src.bas\BasicReinforcementMaterialParameters.bas
*#
*include ..\include.src.bas\addCCCyclicReinforcementMaterialParameters.bas
  FUNCTION *Operation(matvar*IncrAdvancedFunID+9)
*ElseIf(strcmp(MatProp(Material_Prototype),"CCSmearedReinf")==0)
*include ..\include.src.bas\BasicReinforcementMaterialParameters.bas
  RATIO *MatProp(Reinforcing_RATIO_p=As/Ac,Real)
  FUNCTION *Operation(matvar*IncrAdvancedFunID+9)	
  DIRECTION *MatProp(Dir_X_of_the_smeared_reinf,Real) *MatProp(Dir_Y_of_the_smeared_reinf,Real) *\
*If(ndime==3)
	*MatProp(Dir_Z_of_the_smeared_reinf,Real)
*EndIf
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DDruckerPragerPlasticity")==0)
*include ..\include.src.bas\BasicMaterialParameters.bas
*include ..\include.src.bas\ModelIdealisation.bas
*#
*include ..\include.src.bas\addCCDrucker-PragerMaterialParameters.bas
*#
*ElseIf((strcmp(MatProp(Material_Prototype),"CCMicroplane4")==0) || (strcmp(MatProp(Material_Prototype),"CCMicroplane7")==0))
*include ..\include.src.bas\BasicMaterialParameters.bas
*include ..\include.src.bas\addCCMicroplaneMaterialParameters.bas
*include ..\include.src.bas\ModelIdealisation.bas
*include ..\include.src.bas\addRadialCracks_MaterialParameter.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCM4RC")==0 )
*include ..\include.src.bas\CCM4RCMaterialParameters.bas
*include ..\include.src.bas\ModelIdealisation.bas
*include ..\include.src.bas\addRadialCracks_MaterialParameter.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelB3")==0)
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelB3.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelB3Improved")==0 || strcmp(MatProp(Material_Prototype),"CCModelB4")==0)
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelB3Improved.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelFIB_MC2010")==0 || strcmp(MatProp(Material_Prototype),"CCModelEN1992")==0)
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelCP2010.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelBP_KX")==0)
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelBP_KX.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelCEB_FIP78")==0)
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelCEB_FIP78.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelACI78")==0 || strcmp(MatProp(Material_Prototype),"CCModelACI209R2")==0)
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelACI78.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelCSA_S6_14")==0))
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelACI78.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelCSN731201")==0)
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelCSN731201.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelBP1")==0)
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelBP1.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCModelBP2")==0)
*#
*Set Var oMujMat=tcl(TK_FindMaterialNumber *MatProp(Use_Base_Material) *MatProp(0))
*include ..\include.src.bas\CCModelBP2.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCBeam3DMaterial")==0)
*#
*include ..\include.src.bas\CCBeamGeometry.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCShellMaterial")==0)
*If(MatProp(Allow_Shell_Deformation_in_Z,Int)==1)
*include ..\include.src.bas\ShellInterfaceSelection.bas
*EndIf
*include ..\include.src.bas\CCShellGeometry.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCCombinedMaterial")==0 || strcmp(MatProp(Material_Prototype),"CCCombinedMaterialWithTempDepProperties")==0)
*#
*#include ..\include.src.bas\CCCombinedMaterial.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DBiLinearVonMisesWithTempDepProperties")==0)
*#
*include ..\include.src.bas\CC3DBiLinearVonMisesWithTempDepProperties.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCReinforcementWithTempDepProperties")==0)
*#
*include ..\include.src.bas\CCReinforcementWithTempDepProperties.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2WithTempDepProperties")==0)
*#
*include ..\include.src.bas\CC3DNonLinCementitious2WithTempDepProperties.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious2SHCCWithTempDepProperties")==0)
*#
*include ..\include.src.bas\CC3DNonLinCementitious2SHCCWithTempDepProperties.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious3")==0)
*#
*include ..\include.src.bas\CC3DNonLinCementitious3MaterialParameters.bas
*#
*ElseIf(strcmp(MatProp(Material_Prototype),"CCMaterialWithRandomFields")==0)
*#
*include ..\include.src.bas\CCMaterialWithRandomFieldsMaterialParameters.bas
*#
*Else
// unknown Material_Prototype -- *MatProp(Material_Prototype) --
*EndIf
*Set Var oJdeoShell=0
