*If(DebugControl==1)
// *MatProp(Material_Prototype)
*EndIf
*If(MatProp(Onset_of_Crushing-FC0,Real) > (-2.0 * MatProp(Tension_Strength-FT,Real)))
*tcl(TK_CTRLclear)*\
*tcl(TK_CTRLc "Warning: Material: " *MatProp(0) ". Onset_of_Crushing-FC0 must be more then twice greater than Tension_Strength-FT !!! ")*\
*tcl(TK_TK_WarnWinTextTK_CTRLv)*\
*tcl(TK_CTRLc "Warning: Material: " *MatProp(0) ". Onset_of_Crushing-FC0 was corrected to 2.1 multiple of Tension_Strength-FT \n" " ")*\
*tcl(TK_TK_WarnWinTextTK_CTRLv)*\
*#WarningBox Warning: Onset_of_Crushing-FC0 must be more then twice greater than Tension_Strength-FT !!!
*#WarningBox Info: Onset_of_Crushing-FC0 was corrected to 2.1 multiple of Tension_Strength-FT
  // FC0 *MatProp(Onset_of_Crushing-FC0,Real)
  FC0 *operation(-2.1 * MatProp(Tension_Strength-FT,Real))
*Else
  FC0 *MatProp(Onset_of_Crushing-FC0,Real)
*EndIf
*If(strcmp(MatProp(Material_Prototype),"CC3DNonLinCementitious3")!=0)
  EPS_CP *MatProp(Plastic_Strain-EPS_CP,Real)
*EndIf	
  FIXED *MatProp(Fixed_Crack,Real)
*If(MatProp(Activate_Shear_Factor,Int)==1)
  SHEAR_FACTOR  *MatProp(SHEAR_FACTOR,real)
*EndIf