FUNCTION eis_is_a_project_line , newWave

fileName = CONCAT_DIR(GETENV('ancillary') , "eis_official_lines.lis")
; Let's just check it's there
IF (FILE_TEST(fileName) NE 1) THEN stop

; OK, read "eis_official_lines.lis"
nLines    = FILE_LINES(fileName)
proj_line = 0B
line      = ''
OPENR , lun , fileName , /GET_LUN
FOR i = 0, nLines - 1 DO BEGIN

    READF , lun , line
    doh      = STRSPLIT( line , /EXTRACT)
    IF (FIX(doh[2]) EQ newWave) THEN BEGIN
        proj_line = 1
        stop
    ENDIF
				
ENDFOR

RETURN , proj_line

END