
FUNCTION ID *Operation(matvar*IncrAdvancedFunID+5)
  NAME "Fc_Reduction-COMPRED for *MatProp(Material_Prototype) material"
  TYPE "CCMultiLinearFunction" REMOVE_ALL 
  xvalues *\
*for(i=1;i<=MatProp(Fc_Reduction-COMPRED,Int);i=i+2)
   *MatProp(Fc_Reduction-COMPRED,*i) *\
*End

  yvalues *\
*for(i=2;i<=MatProp(Fc_Reduction-COMPRED,INT);i=i+2)
   *MatProp(Fc_Reduction-COMPRED,*i) *\
*End
