#define DIM "1"
#define Q "0"
Local H0 =       - y*d + x0*d0;
Local H1 =       - 3/2 - y*d - 2*x0*d0;
Local b0=y*d0;
Local g0  =x0*i_;
Local bm0 =-x0*d;
Local gm0 = - y*d0*d*i_ - x0*d0*d0*i_ - 3/2*d0*i_;
Local mom =  - y*d*d*i_ - 3/2*d*i_ - x0*d*d0*i_;