; from nsx.c
; Return an empty IMG structure
;
; in nsx.c, replace
;   IMGtype IA;
; with
;   IA = IMGtype()


function imgtype

;/* IMAGE data. */
  IMGstructure = { $
     nc:0L, nr:0L, $              ;         /* number of columns and rows. */
     file: "", $                ;     /* filename */
     root:"", $                 ;     /* filename without preceding directory or .fits extension */
     utshut:'', $               ;    /* UT shutter open start time */
     object:'', $               ;    /* Object name. */
     jd:0.d, $                  ;            /* Julian Day. */
     ra:0d,dec:0d,$             ;        /* RA and DEC J2000 */
     airmass:0d, $             ;       /* Airmass from header. */
     ha:0d,az:0d,el:0d, $       ;      /* Hour angle, azimuth, elevation (degrees) */
     parang:0d,$                ;        /* Parallactic angle (degrees) (position angle) */
     rotposn:0d, $              ;       /* Rotator User Position (angle in degrees) */
     exptime:0d,$               ;       /* Exposure (integration) time in seconds (ITIME) */
     image:PTR_NEW(), $         ;        /* image data */
     varimg:PTR_NEW(), $        ;       /* variance image data */
     clnimg:PTR_NEW(), $        ;       /* image data (cleaned, removed CRs or hot pixels) */
     corimg:PTR_NEW(), $        ;       /* corrected image data (unslant and uncurve) */
     corimgNFD:PTR_NEW(), $     ;    /* corrected image data with No Flat Division (use for variance). */
     bckimg:PTR_NEW(), $        ;       /* background fit image data (corrected) */
     X:0 $                      ;             /* does image exist?  1 or 0 */
               }
  return, IMGstructure
end

;  /* IMAGE data. */
;struct IMGstructure {
;  int    nc,nr;         /* number of columns and rows. */
;  char   file[100];     /* filename */
;  char   root[100];     /* filename without preceding directory or .fits extension */
;  char   utshut[40];    /* UT shutter open start time */
;  char   object[60];    /* Object name. */
;  double jd;            /* Julian Day. */
;  double ra,dec;        /* RA and DEC J2000 */
;  double airmass;       /* Airmass from header. */
;  double ha,az,el;      /* Hour angle, azimuth, elevation (degrees) */
;  double parang;        /* Parallactic angle (degrees) (position angle) */
;  double rotposn;       /* Rotator User Position (angle in degrees) */
;  double exptime;       /* Exposure (integration) time in seconds (ITIME) */
;  float  *image;        /* image data */
;  float  *varimg;       /* variance image data */
;  float  *clnimg;       /* image data (cleaned, removed CRs or hot pixels) */
;  float  *corimg;       /* corrected image data (unslant and uncurve) */
;  float  *corimgNFD;    /* corrected image data with No Flat Division (use for variance). */
;  float  *bckimg;       /* background fit image data (corrected) */
;  int    X;             /* does image exist?  1 or 0 */
;};
;typedef struct IMGstructure IMGtype;