adding IFU check to splitting

grisred/gris_split.pro

@@ -107,7 +107,12 @@ pro gris_split,filebase
 
     hdr=strjoin(hdr)
     hdr=string(reform(byte(hdr),80,strlen(hdr)/80))
-
+    if STRTRIM(SXPAR(hdr,"IMGSYS")) eq "IFU" then begin
+      print, "Splitting not implemented for IFU data yet."
+      print, "Skipping "+filebase
+      return
+    endif
+    stop
     ; gnerate common header, everything
     ; before the COEFI-1 kw is assumed to
     ; be the common header for all files?