pointer_init-CG.inc

      ipw = 0
      ipp = 0
      ipr = 0
      ipxold = 0