FUNCTION ID *Operation(matvar*IncrAdvancedFunID+121)
  NAME "Function for DoH"
  TYPE "CCMultiLinearFunction" REMOVE_ALL 
  xvalues *\
*for(i=1;i<=MatProp(Function_for_DoH,Int);i=i+2)
   *MatProp(Function_for_DoH,*i,Real) *\
*End
*Realformat "%10.4e"

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


