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

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