function icamera,jd
; This function returns a long int = 1,2,3 according as the camera that
; was taking images on the specified jdate was
;   1 = 4-shooter
;   2 = MiniCam
;   3 = KeplerCam
; If the given JD is too early or too late to be a valid Kepler Survey
; image, the routine returns -1.

ii=-1
if(jd ge 2452620.0d0 and jd le 2453233.0d0) then ii=1
if(jd gt 2453233.0d0 and jd le 2453626.0d0) then ii=2
if(jd gt 2453626.0d0 and jd le 2455000.0d0) then ii=3

return,fix(ii)
end