
FUNCTION ID *Operation(matvar*IncrAdvancedFunID+20)
  NAME "*MatProp(Material_Prototype) geometry with Bond"
  TYPE "CCMultiLinearFunction" REMOVE_ALL 
*Realformat "%10.4e"
  xvalues *\
*for(i=1;i<=MatProp(Function_for_Bond_Slip,Int);i=i+2)
   *Operation(MatProp(Function_for_Bond_Slip,*i,Real)) *\
*End
*Realformat "%10.4e"

  yvalues *\
*for(i=2;i<=MatProp(Function_for_Bond_Slip,Int);i=i+2)
   *Operation(MatProp(Max_Bond_Strength,Real) * MatProp(Function_for_Bond_Slip,*i,Real)) *\
*End
*#	xvalues *MatProp(Bond_Slip_1,Real) *MatProp(Bond_Slip_2,Real) *MatProp(Bond_Slip_3,Real) *MatProp(Bond_Slip_4,Real) *MatProp(Bond_Slip_5,Real) *MatProp(Bond_Slip_6,Real) *MatProp(Bond_Slip_7,Real)
*#	yvalues *MatProp(Bond_Stress_1,Real) *MatProp(Bond_Stress_2,Real) *MatProp(Bond_Stress_3,Real) *MatProp(Bond_Stress_4,Real) *MatProp(Bond_Stress_5,Real) *MatProp(Bond_Stress_6,Real) *MatProp(Bond_Stress_7,Real)


*If(MatProp(Activate_temperature_dependancy,Int)==1)

  FUNCTION ID *Operation(matvar*IncrAdvancedFunID+21)
  NAME "*MatProp(Material_Prototype) geometry with Bond Function_temperature_dependancy"
  TYPE "CCMultiLinearFunction" REMOVE_ALL 
*Realformat "%10.4e"
  xvalues *\
*for(i=1;i<=MatProp(Function_temperature_dependancy,Int);i=i+2)
   *Operation(MatProp(Function_temperature_dependancy,*i,Real)) *\
*End
*Realformat "%10.4e"

  yvalues *\
*for(i=2;i<=MatProp(Function_temperature_dependancy,Int);i=i+2)
   *Operation(1.0 * MatProp(Function_temperature_dependancy,*i,Real)) *\
*End       

*EndIf
*If(MatProp(Activate_corrosion_dependancy,Int)==1)

  FUNCTION ID *Operation(matvar*IncrAdvancedFunID+22)
  NAME "*MatProp(Material_Prototype) geometry with Bond Function_corrosion_dependancy"
  TYPE "CCMultiLinearFunction" REMOVE_ALL 
*Realformat "%10.4e"
  xvalues *\
*for(i=1;i<=MatProp(Function_corrosion_dependancy,Int);i=i+2)
   *Operation(MatProp(Function_corrosion_dependancy,*i,Real)) *\
*End
*Realformat "%10.4e"

  yvalues *\
*for(i=2;i<=MatProp(Function_corrosion_dependancy,Int);i=i+2)
   *Operation(1.0 * MatProp(Function_corrosion_dependancy,*i,Real)) *\
*End       

*EndIf
*If(MatProp(Activate_location_dependancy,Int)==1)

  FUNCTION ID *Operation(matvar*IncrAdvancedFunID+23)
  NAME "*MatProp(Material_Prototype) geometry with Bond Function_location_dependancy"
  TYPE "CCMultiLinearFunction" REMOVE_ALL 
*Realformat "%10.4e"
  xvalues *\
*for(i=1;i<=MatProp(Function_location_dependancy,Int);i=i+2)
   *Operation(MatProp(Function_location_dependancy,*i,Real)) *\
*End
*Realformat "%10.4e"

  yvalues *\
*for(i=2;i<=MatProp(Function_location_dependancy,Int);i=i+2)
   *Operation(1.0 * MatProp(Function_location_dependancy,*i,Real)) *\
*End       

*EndIf


