FUNCTION ID *Operation(matvar*IncrAdvancedFunID+4)
  NAME "PARAM  Fc0 for *MatProp(Material_Prototype) material"
  TYPE "CCMultiLinearFunction" REMOVE_ALL 
  xvalues *\
*for(i=1;i<=MatProp(Function_for_Fc0,Int);i=i+2)
   *MatProp(Function_for_Fc0,*i,Real) *\
*End

  yvalues *\
*for(i=2;i<=MatProp(Function_for_Fc0,Int);i=i+2)
*Realformat "%10.4e"
   *Operation(MatProp(Onset_of_Crushing-FC0,Real)*MatProp(Function_for_Fc0,*i,Real)) *\
*End
