!*******************************************************************************
!$RCSfile$
!$Revision$
!$Date$
!*******************************************************************************
MODULE pointval_fi

  SAVE

  REAL    x0,y0
  REAL    xR,yT
  REAL    xL,yB
  REAL    xp,yp

END MODULE pointval_fi
