double precision DPHI,DSUMPH,DDEPHI
     +                ,DEG,DTHG,DPHIG,DPLABG
      integer          KMP
      character*4	vertextype
      COMMON /PHIOUT/  DPHI(61),DSUMPH(61),DDEPHI(61)
     +                ,DEG,DTHG,DPHIG,DPLABG(3),KMP,
     +			vertextype