COMMON /EGRID/NORTH,ALONVT,POLEI,POLEJ,
     X     XMESHL,IDIM,JDIM,PHI0,LAM0,COSPH0,
     X     SINPH0,TANPH0
      save /EGRID/