NAME:
  hatojd
 PURPOSE: (one line)
  Find the nearest Julian date for a given hour angle and date.
 DESCRIPTION:
 CATEGORY:
  Astronomy
 CALLING SEQUENCE:
 INPUTS:
 OPTIONAL INPUT PARAMETERS:
 KEYWORD INPUT PARAMETERS:
 OUTPUTS:
 KEYWORD OUTPUT PARAMETERS:
 COMMON BLOCKS:
 SIDE EFFECTS:
 RESTRICTIONS:
 PROCEDURE:
 MODIFICATION HISTORY: