1  int ps;
       2  struct vp {
       3    int wa;
       4  };
       5  typedef struct vp *vpt;
       6  typedef struct vc {
       7    int o;
       8    vpt py[8];
       9  } *vct;
      10  struct n {
      11    int a;
      12  };
      13  struct nh {
      14    int x;
      15  };
      16  typedef struct np *npt;
      17  struct np {
      18    vct d;
      19    int di;
      20  };
      21  struct nh xhp;
      22  struct n np[3];
      23  
      24  f(dp)
      25       npt dp;
      26  {
      27    vpt *py;
      28    int a, l, o = 0;
      29    a = dp->d->o;
      30    if (dp->di < 0)
      31      l = ps;
      32  
      33    if ((int)o & 3)
      34      g();
      35  
      36    xhp.x = a;
      37    py = &dp->d->py[dp->di];
      38    if (o + l > ps)
      39      np[2].a = (int)(py[1])->wa;
      40  }