subroutine event_display_lab_to_ypixels(x,y,z, xpixel, ypixel)
c
c This routine takes lab coordinates in millmeters and returns the coordinates
c of the corresponding display pixel in the y view. Keep in mind that X11 uses
c increasing x to move to the right, increasing y to move down on the screen.
c
c As a result, increasing lab y (or x) corresponds to decreasing X11 y;
c increasing lab z corresponds to X11 increasing x.
c
c George Gollin, g-gollin@uiuc.edu, 1999.
c
c
#include "event_display.inc"
c
c *************************************************************************
c


      xpixel=pixel_at_zy_0 + 
     .     (z - telescope_min_zy)  * pixels_per_zy
c
      ypixel=pixel_at_y_0 - 
     .     (y - telescope_min_y) * pixels_per_y
c
c
      return
      end