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

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