Changeset 42254
- Timestamp:
- Jul 14, 2022, 3:01:13 PM (4 years ago)
- Location:
- trunk
- Files:
-
- 12 edited
-
extsrc/gpcsw/gpcsrc/fits/libfh/fh_registry.asm (modified) (1 diff)
-
ippScripts/scripts/nightly_science.pl (modified) (3 diffs)
-
ippTools/src/pztoolConfig.c (modified) (2 diffs)
-
ppViz/src/ppCoord/ppCoord.h (modified) (1 diff)
-
ppViz/src/ppCoord/ppCoordArguments.c (modified) (3 diffs)
-
ppViz/src/ppCoord/ppCoordData.c (modified) (2 diffs)
-
ppViz/src/ppCoord/ppCoordLoop.c (modified) (4 diffs)
-
psphot/src/psphotBlendFit.c (modified) (3 diffs)
-
psphot/src/psphotExtendedSourceFits.c (modified) (2 diffs)
-
psphot/src/psphotSourceFits.c (modified) (2 diffs)
-
pswarp/src/pswarpMapGrid.c (modified) (4 diffs)
-
pswarp/src/pswarpTransformReadout.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/extsrc/gpcsw/gpcsrc/fits/libfh/fh_registry.asm
r42253 r42254 1 DETCOM_ SIMPLE MACRO ARG2 COBJ "detcom:dheader 0.0 SIMPLE \"\ARG\" \"Standard FITS\""3 ENDM 4 DETCOM_ XTENSION MACRO ARG5 COBJ "detcom:dheader 0.0 XTENSION \"\ARG\" \"\""6 ENDM 7 DETCOM_ BITPIX MACRO ARG8 COBJ "detcom:dheader 1.0 BITPIX \"\ARG\" \"Bits per pixel\""9 ENDM 10 DETCOM_ NAXIS MACRO ARG11 COBJ "detcom:dheader 2.0 NAXIS \"\ARG\" \"Number of axes\""12 ENDM 13 DETCOM_ NAXIS1 MACRO ARG14 COBJ "detcom:dheader 2.1 NAXIS1 \"\ARG\" \"Number of pixel columns\""15 ENDM 16 DETCOM_ NAXIS2 MACRO ARG17 COBJ "detcom:dheader 2.2 NAXIS2 \"\ARG\" \"Number of pixel rows\""18 ENDM 19 DETCOM_ NAXIS3 MACRO ARG20 COBJ "detcom:dheader 2.3 NAXIS3 \"\ARG\" \"Number of stacked frames (cube)\""21 ENDM 22 DETCOM_ EXTEND MACRO ARG23 COBJ "detcom:dheader 3.0 EXTEND \"\ARG\" \"File contains extensions\""24 ENDM 25 DETCOM_ NEXTEND MACRO ARG26 COBJ "detcom:dheader 3.1 NEXTEND \"\ARG\" \"Number of extensions\""27 ENDM 28 DETCOM_ GROUPS MACRO ARG29 COBJ "detcom:dheader 4.0 GROUPS \"\ARG\" \"File contains random groups records\""30 ENDM 31 DETCOM_ PCOUNT MACRO ARG32 COBJ "detcom:dheader 5.0 PCOUNT \"\ARG\" \"Random parameters before each array in a group\""33 ENDM 34 DETCOM_ GCOUNT MACRO ARG35 COBJ "detcom:dheader 6.0 GCOUNT \"\ARG\" \"Number of random groups\""36 ENDM 37 DETCOM_ TFIELDS MACRO ARG38 COBJ "detcom:dheader 7.0000 TFIELDS \"\ARG\" \"Number of fields in a row\""39 ENDM 40 DETCOM_ TFORM1 MACRO ARG41 COBJ "detcom:dheader 7.0011 TFORM1 \"\ARG\" \"Table format for field 1\""42 ENDM 43 DETCOM_ TBCOL1 MACRO ARG44 COBJ "detcom:dheader 7.0012 TBCOL1 \"\ARG\" \"Start Column for field 1\""45 ENDM 46 DETCOM_ TFORM2 MACRO ARG47 COBJ "detcom:dheader 7.0021 TFORM2 \"\ARG\" \"Table format for field 2\""48 ENDM 49 DETCOM_ TBCOL2 MACRO ARG50 COBJ "detcom:dheader 7.0022 TBCOL2 \"\ARG\" \"Start Column for field 2\""51 ENDM 52 DETCOM_ TFORM3 MACRO ARG53 COBJ "detcom:dheader 7.0031 TFORM3 \"\ARG\" \"Table format for field 3\""54 ENDM 55 DETCOM_ TBCOL3 MACRO ARG56 COBJ "detcom:dheader 7.0032 TBCOL3 \"\ARG\" \"Start Column for field 3\""57 ENDM 58 DETCOM_ TFORM4 MACRO ARG59 COBJ "detcom:dheader 7.0041 TFORM4 \"\ARG\" \"Table format for field 4\""60 ENDM 61 DETCOM_ TBCOL4 MACRO ARG62 COBJ "detcom:dheader 7.0042 TBCOL4 \"\ARG\" \"Start Column for field 4\""63 ENDM 64 DETCOM_ TFORM5 MACRO ARG65 COBJ "detcom:dheader 7.0051 TFORM5 \"\ARG\" \"Table format for field 5\""66 ENDM 67 DETCOM_ TBCOL5 MACRO ARG68 COBJ "detcom:dheader 7.0052 TBCOL5 \"\ARG\" \"Start Column for field 5\""69 ENDM 70 DETCOM_ CMMTOBS MACRO ARG71 COBJ "detcom:dheader 51.0 CMMTOBS \"\ARG\" \"\""72 ENDM 73 DETCOM_ CMMTSEQ MACRO ARG74 COBJ "detcom:dheader 52.0 CMMTSEQ \"\ARG\" \"\""75 ENDM 76 DETCOM_ OBJECT MACRO ARG77 COBJ "detcom:dheader 53.0 OBJECT \"\ARG\" \"\""78 ENDM 79 DETCOM_ OBSERVER MACRO ARG80 COBJ "detcom:dheader 54.0 OBSERVER \"\ARG\" \"\""81 ENDM 82 DETCOM_ PI_NAME MACRO ARG83 COBJ "detcom:dheader 5 5.0 PI_NAME \"\ARG\" \"\""84 ENDM 85 DETCOM_ RUNID MACRO ARG86 COBJ "detcom:dheader 56.0 RUNID \"\ARG\" \"\""87 ENDM 88 DETCOM_ FILENAME MACRO ARG89 COBJ "detcom:dheader 71.00 FILENAME \"\ARG\" \"Base filename at acquisition\""90 ENDM 91 DETCOM_ PATHNAME MACRO ARG92 COBJ "detcom:dheader 71.01 PATHNAME \"\ARG\" \"Original directory name at acquisition\""93 ENDM 94 DETCOM_E XTNAMEMACRO ARG95 COBJ "detcom:dheader 71.10 EXTNAME \"\ARG\" \"Extension name\""96 ENDM 97 DETCOM_ EXTVER MACRO ARG98 COBJ "detcom:dheader 71.20 EXTVER \"\ARG\" \"Extension version\""99 ENDM 100 DETCOM_ DATE MACRO ARG101 COBJ "detcom:dheader 74.00 DATE \"\ARG\" \"UTC Date of file creation\""102 ENDM 103 DETCOM_ HSTTIME MACRO ARG104 COBJ "detcom:dheader 74.10 HSTTIME \"\ARG\" \"Local time in Hawaii\""105 ENDM 106 DETCOM_ IMAGESWV MACRO ARG107 COBJ "detcom:dheader 7 7.00 IMAGESWV \"\ARG\" \"Image creation software version\""108 ENDM 109 DETCOM_ DETECTOR MACRO ARG110 COBJ "detcom:dheader 91.0 DETECTOR \"\ARG\" \"Science Detector\""111 ENDM 112 DETCOM_ INSTRUME MACRO ARG113 COBJ "detcom:dheader 92.0 INSTRUME \"\ARG\" \"Instrument Name\""114 ENDM 115 DETCOM_ INSTMODE MACRO ARG116 COBJ "detcom:dheader 92.1 INSTMODE \"\ARG\" \"Instrument Mode\""117 ENDM 118 DETCOM_ DETSIZE MACRO ARG119 COBJ "detcom:dheader 102.0 DETSIZE \"\ARG\" \"Total data pixels in full mosaic\""120 ENDM 121 DETCOM_R ASTERMACRO ARG122 COBJ "detcom:dheader 103.0 RASTER \"\ARG\" \"\""123 ENDM 124 DETCOM_ CCDSUM MACRO ARG125 COBJ "detcom:dheader 105.0 CCDSUM \"\ARG\" \"Binning factors\""126 ENDM 127 DETCOM_ CCDBIN1 MACRO ARG128 COBJ "detcom:dheader 105.1 CCDBIN1 \"\ARG\" \"Binning factor along first axis\""129 ENDM 130 DETCOM_ CCDBIN2 MACRO ARG131 COBJ "detcom:dheader 105.2 CCDBIN2 \"\ARG\" \"Binning factor along second axis\""132 ENDM 133 DETCOM_ PIXSIZEMACRO ARG134 COBJ "detcom:dheader 110.0 PIXSIZE\"\ARG\" \"Pixel size for both axes (microns)\""135 ENDM 136 DETCOM_ PIXSIZE1MACRO ARG137 COBJ "detcom:dheader 1 11.1 PIXSIZE1\"\ARG\" \"Pixel size for axis 1 (microns)\""138 ENDM 139 DETCOM_ PIXSIZE2MACRO ARG140 COBJ "detcom:dheader 1 11.2 PIXSIZE2\"\ARG\" \"Pixel size for axis 2 (microns)\""141 ENDM 142 DETCOM_ PIXSCAL1MACRO ARG143 COBJ "detcom:dheader 112.1 PIXSCAL1\"\ARG\" \"Pixel scale for axis 1 (arcsec/pixel)\""144 ENDM 145 DETCOM_ PIXSCAL2MACRO ARG146 COBJ "detcom:dheader 112.2 PIXSCAL2\"\ARG\" \"Pixel scale for axis 2 (arcsec/pixel)\""147 ENDM 148 DETCOM_ AMPLIST MACRO ARG149 COBJ "detcom:dheader 130.0 AMPLIST \"\ARG\" \"List of amplifiers for this image\""150 ENDM 151 DETCOM_ AMPNAME MACRO ARG152 COBJ "detcom:dheader 1 31.0 AMPNAME \"\ARG\" \"Amplifier name\""153 ENDM 154 DETCOM_ CCDSIZE MACRO ARG155 COBJ "detcom:dheader 140.0 CCDSIZE \"\ARG\" \"Detector imaging area size\""156 ENDM 157 DETCOM_ DETSEC MACRO ARG158 COBJ "detcom:dheader 140.1 DETSEC \"\ARG\" \"Mosaic area of the detector\""159 ENDM 160 DETCOM_ DETSECA MACRO ARG161 COBJ "detcom:dheader 140.11 DETSECA \"\ARG\" \"Mosaic area of the detector from Amp A\""162 ENDM 163 DETCOM_ DETSECB MACRO ARG164 COBJ "detcom:dheader 140.12 DETSECB \"\ARG\" \"Mosaic area of the detector from Amp B\""165 ENDM 166 DETCOM_ DETSECC MACRO ARG167 COBJ "detcom:dheader 140.13 DETSECC \"\ARG\" \"Mosaic area of the detector from Amp C\""168 ENDM 169 DETCOM_D ETSECDMACRO ARG170 COBJ "detcom:dheader 140.14 DETSECD \"\ARG\" \"Mosaic area of the detector from Amp D\""171 ENDM 172 DETCOM_ DATASEC MACRO ARG173 COBJ "detcom:dheader 140.2 DATASEC \"\ARG\" \"Imaging area of the detector\""174 ENDM 175 DETCOM_ BIASSEC MACRO ARG176 COBJ "detcom:dheader 140.3 BIASSEC \"\ARG\" \"Overscan (bias) area of the detector\""177 ENDM 178 DETCOM_A SECAMACRO ARG179 COBJ "detcom:dheader 1 41.11 ASECA \"\ARG\" \"Section from Amp A (non-contig. bias excluded)\""180 ENDM 181 DETCOM_ ASECB MACRO ARG182 COBJ "detcom:dheader 1 41.12 ASECB \"\ARG\" \"Section from Amp B (non-contig. bias excluded)\""183 ENDM 184 DETCOM_ ASECC MACRO ARG185 COBJ "detcom:dheader 1 41.13 ASECC \"\ARG\" \"Section from Amp C (non-contig. bias excluded)\""186 ENDM 187 DETCOM_ ASECD MACRO ARG188 COBJ "detcom:dheader 1 41.14 ASECD \"\ARG\" \"Section from Amp D (non-contig. bias excluded)\""189 ENDM 190 DETCOM_ BSECA MACRO ARG191 COBJ "detcom:dheader 1 41.21 BSECA \"\ARG\" \"Overscan (bias) area from Amp A\""192 ENDM 193 DETCOM_B SECBMACRO ARG194 COBJ "detcom:dheader 1 41.22 BSECB \"\ARG\" \"Overscan (bias) area from Amp B\""195 ENDM 196 DETCOM_ BSECC MACRO ARG197 COBJ "detcom:dheader 1 41.23 BSECC \"\ARG\" \"Overscan (bias) area from Amp C\""198 ENDM 199 DETCOM_ BSECD MACRO ARG200 COBJ "detcom:dheader 1 41.24 BSECD \"\ARG\" \"Overscan (bias) area from Amp D\""201 ENDM 202 DETCOM_ CSECA MACRO ARG203 COBJ "detcom:dheader 1 41.31 CSECA \"\ARG\" \"Section in full CCD for DSECA\""204 ENDM 205 DETCOM_ CSECB MACRO ARG206 COBJ "detcom:dheader 1 41.32 CSECB \"\ARG\" \"Section in full CCD for DSECB\""207 ENDM 208 DETCOM_C SECCMACRO ARG209 COBJ "detcom:dheader 1 41.33 CSECC \"\ARG\" \"Section in full CCD for DSECC\""210 ENDM 211 DETCOM_ CSECD MACRO ARG212 COBJ "detcom:dheader 1 41.34 CSECD \"\ARG\" \"Section in full CCD for DSECD\""213 ENDM 214 DETCOM_ DSECA MACRO ARG215 COBJ "detcom:dheader 1 41.41 DSECA \"\ARG\" \"Imaging area from Amp A\""216 ENDM 217 DETCOM_ DSECB MACRO ARG218 COBJ "detcom:dheader 1 41.42 DSECB \"\ARG\" \"Imaging area from Amp B\""219 ENDM 220 DETCOM_ DSECC MACRO ARG221 COBJ "detcom:dheader 1 41.43 DSECC \"\ARG\" \"Imaging area from Amp C\""222 ENDM 223 DETCOM_D SECDMACRO ARG224 COBJ "detcom:dheader 1 41.44 DSECD \"\ARG\" \"Imaging area from Amp D\""225 ENDM 226 DETCOM_ TSECA MACRO ARG227 COBJ "detcom:dheader 1 41.51 TSECA \"\ARG\" \"Trim section for Amp A\""228 ENDM 229 DETCOM_ TSECB MACRO ARG230 COBJ "detcom:dheader 1 41.52 TSECB \"\ARG\" \"Trim section for Amp B\""231 ENDM 232 DETCOM_ TSECC MACRO ARG233 COBJ "detcom:dheader 1 41.53 TSECC \"\ARG\" \"Trim section for Amp C\""234 ENDM 235 DETCOM_ TSECD MACRO ARG236 COBJ "detcom:dheader 1 41.54 TSECD \"\ARG\" \"Trim section for Amp D\""237 ENDM 238 DETCOM_ CCDNAME MACRO ARG239 COBJ "detcom:dheader 150.1 CCDNAME \"\ARG\" \"Name of the CCD (manufacturer reference)\""240 ENDM 241 DETCOM_ CCDNICK MACRO ARG242 COBJ "detcom:dheader 150.2 CCDNICK \"\ARG\" \"Nickname of the CCD\""243 ENDM 244 DETCOM_ MAXLIN MACRO ARG245 COBJ "detcom:dheader 152.0 MAXLIN \"\ARG\" \"Maximum linearity value (ADU)\""246 ENDM 247 DETCOM_ MAXLINA MACRO ARG248 COBJ "detcom:dheader 152.01 MAXLINA \"\ARG\" \"Maximum linearity value for Amp A (ADU)\""249 ENDM 250 DETCOM_ MAXLINB MACRO ARG251 COBJ "detcom:dheader 152.02 MAXLINB \"\ARG\" \"Maximum linearity value for Amp B (ADU)\""252 ENDM 253 DETCOM_ MAXLINC MACRO ARG254 COBJ "detcom:dheader 152.03 MAXLINC \"\ARG\" \"Maximum linearity value for Amp C (ADU)\""255 ENDM 256 DETCOM_ MAXLIND MACRO ARG257 COBJ "detcom:dheader 152.04 MAXLIND \"\ARG\" \"Maximum linearity value for Amp D (ADU)\""258 ENDM 259 DETCOM_ SATURATE MACRO ARG260 COBJ "detcom:dheader 152.1 SATURATE \"\ARG\" \"Saturation value (ADU)\""261 ENDM 262 DETCOM_ GAINMACRO ARG263 COBJ "detcom:dheader 155.0 GAIN\"\ARG\" \"Amplifier gain (electrons/ADU)\""264 ENDM 265 DETCOM_ GAINAMACRO ARG266 COBJ "detcom:dheader 155.01 GAINA\"\ARG\" \"Amp A gain (electrons/ADU)\""267 ENDM 268 DETCOM_ GAINBMACRO ARG269 COBJ "detcom:dheader 155.02 GAINB\"\ARG\" \"Amp B gain (electrons/ADU)\""270 ENDM 271 DETCOM_ GAINCMACRO ARG272 COBJ "detcom:dheader 155.03 GAINC\"\ARG\" \"Amp C gain (electrons/ADU)\""273 ENDM 274 DETCOM_ GAINDMACRO ARG275 COBJ "detcom:dheader 155.04 GAIND\"\ARG\" \"Amp D gain (electrons/ADU)\""276 ENDM 277 DETCOM_ RDNOISEMACRO ARG278 COBJ "detcom:dheader 156.0 RDNOISE\"\ARG\" \"Read noise (electrons)\""279 ENDM 280 DETCOM_ RDNOISEAMACRO ARG281 COBJ "detcom:dheader 156.01 RDNOISEA\"\ARG\" \"Amp A read noise (electrons)\""282 ENDM 283 DETCOM_ RDNOISEBMACRO ARG284 COBJ "detcom:dheader 156.02 RDNOISEB\"\ARG\" \"Amp B read noise (electrons)\""285 ENDM 286 DETCOM_ RDNOISECMACRO ARG287 COBJ "detcom:dheader 156.03 RDNOISEC\"\ARG\" \"Amp C read noise (electrons)\""288 ENDM 289 DETCOM_ RDNOISEDMACRO ARG290 COBJ "detcom:dheader 156.04 RDNOISED\"\ARG\" \"Amp D read noise (electrons)\""291 ENDM 292 DETCOM_ DCURRENTMACRO ARG293 COBJ "detcom:dheader 157.0 DCURRENT\"\ARG\" \"Dark current (ADU/pixel/second)\""294 ENDM 295 DETCOM_ DARKCURMACRO ARG296 COBJ "detcom:dheader 157.1 DARKCUR\"\ARG\" \"Dark current (e-/pixel/hour)\""297 ENDM 298 DETCOM_ QEPOINTS MACRO ARG299 COBJ "detcom:dheader 158.0 QEPOINTS \"\ARG\" \"QE%@wavelength in nm\""300 ENDM 301 DETCOM_ CONSWV MACRO ARG302 COBJ "detcom:dheader 170.0 CONSWV \"\ARG\" \"Controller software DSPID and SERNO versions\""303 ENDM 304 DETCOM_ DETSTAT MACRO ARG305 COBJ "detcom:dheader 180.0 DETSTAT \"\ARG\" \"Detector status\""306 ENDM 307 DETCOM_ DETTEMMACRO ARG308 COBJ "detcom:dheader 190.0 DETTEM\"\ARG\" \"Detector temperature\""309 ENDM 310 DETCOM_ TELESCOP MACRO ARG311 COBJ "detcom:dheader 501.1 TELESCOP \"\ARG\" \"\""312 ENDM 313 DETCOM_ ORIGIN MACRO ARG314 COBJ "detcom:dheader 501.2 ORIGIN \"\ARG\" \"Canada-France-Hawaii Telescope\""315 ENDM 316 DETCOM_T ELSTATMACRO ARG317 COBJ "detcom:dheader 503.0 TELSTAT \"\ARG\" \"Telescope Control System status\""318 ENDM 319 DETCOM_ TIMESYS MACRO ARG320 COBJ "detcom:dheader 510.0 TIMESYS \"\ARG\" \"Time System for DATExxxx\""321 ENDM 322 DETCOM_ UTIME MACRO ARG323 COBJ "detcom:dheader 512.0 UTIME \"\ARG\" \"Time at start of observation (UT)\""324 ENDM 325 DETCOM_ SIDTIME MACRO ARG326 COBJ "detcom:dheader 514.0 SIDTIME \"\ARG\" \"Sidereal time at start of observation\""327 ENDM 328 DETCOM_ EPOCH MACRO ARG329 COBJ "detcom:dheader 521.0 EPOCH \"\ARG\" \"Equinox of coordinates\""330 ENDM 331 DETCOM_ EQUINOX MACRO ARG332 COBJ "detcom:dheader 521.1 EQUINOX \"\ARG\" \"Equinox of coordinates\""333 ENDM 334 DETCOM_ RADECSYS MACRO ARG335 COBJ "detcom:dheader 522.0 RADECSYS \"\ARG\" \"Coordinate system for equinox (FK4/FK5/GAPPT)\""336 ENDM 337 DETCOM_ RA MACRO ARG338 COBJ "detcom:dheader 522.1 RA \"\ARG\" \"Object right ascension\""339 ENDM 340 DETCOM_ DEC MACRO ARG341 COBJ "detcom:dheader 522.2 DEC \"\ARG\" \"Object declination\""342 ENDM 343 DETCOM_ CTYPE1 MACRO ARG344 COBJ "detcom:dheader 5 25.211 CTYPE1 \"\ARG\" \"WCS Coordinate type\""345 ENDM 346 DETCOM_ CTYPE2 MACRO ARG347 COBJ "detcom:dheader 5 25.212 CTYPE2 \"\ARG\" \"WCS Coordinate type\""348 ENDM 349 DETCOM_ CD1_1MACRO ARG350 COBJ "detcom:dheader 5 25.411 CD1_1\"\ARG\" \"WCS Coordinate scale matrix\""351 ENDM 352 DETCOM_ CD1_2MACRO ARG353 COBJ "detcom:dheader 5 25.412 CD1_2\"\ARG\" \"WCS Coordinate scale matrix\""354 ENDM 355 DETCOM_ CD2_1MACRO ARG356 COBJ "detcom:dheader 5 25.421 CD2_1\"\ARG\" \"WCS Coordinate scale matrix\""357 ENDM 358 DETCOM_ CD2_2MACRO ARG359 COBJ "detcom:dheader 5 25.422 CD2_2\"\ARG\" \"WCS Coordinate scale matrix\""360 ENDM 361 DETCOM_ NGUIDER MACRO ARG362 COBJ "detcom:dheader 530.0 NGUIDER \"\ARG\" \"TCS Number of guiders\""363 ENDM 364 DETCOM_ NGUISTAR MACRO ARG365 COBJ "detcom:dheader 530.01 NGUISTAR \"\ARG\" \"TCS number of guide stars/probes in use\""366 ENDM 367 DETCOM_ GUINAME MACRO ARG368 COBJ "detcom:dheader 530.1 GUINAME \"\ARG\" \"TCS guider name\""369 ENDM 370 DETCOM_ GUIEQUIN MACRO ARG371 COBJ "detcom:dheader 530.21 GUIEQUIN \"\ARG\" \"TCS guider equinox\""372 ENDM 373 DETCOM_ GUIRADEC MACRO ARG374 COBJ "detcom:dheader 530.22 GUIRADEC \"\ARG\" \"TCS guider system for equinox\""375 ENDM 376 DETCOM_ GUIRA MACRO ARG377 COBJ "detcom:dheader 530.23 GUIRA \"\ARG\" \"TCS guider right ascension\""378 ENDM 379 DETCOM_ GUIDEC MACRO ARG380 COBJ "detcom:dheader 530.24 GUIDEC \"\ARG\" \"TCS guider declination\""381 ENDM 382 DETCOM_ GUIOBJN MACRO ARG383 COBJ "detcom:dheader 530.3 GUIOBJN \"\ARG\" \"TCS guider object name\""384 ENDM 385 DETCOM_ GUIFLUX MACRO ARG386 COBJ "detcom:dheader 530.6 GUIFLUX \"\ARG\" \"TCS guider flux\""387 ENDM 388 DETCOM_ SKYFLUX MACRO ARG389 COBJ "detcom:dheader 530.8 SKYFLUX \"\ARG\" \"TCS total sky flux\""390 ENDM 391 DETCOM_ GUINAME1 MACRO ARG392 COBJ "detcom:dheader 531.1 GUINAME1 \"\ARG\" \"TCS guider #1 identification\""393 ENDM 394 DETCOM_ GUIEQUI1 MACRO ARG395 COBJ "detcom:dheader 531.21 GUIEQUI1 \"\ARG\" \"TCS guider #1 equinox\""396 ENDM 397 DETCOM_ GUIRADE1 MACRO ARG398 COBJ "detcom:dheader 531.22 GUIRADE1 \"\ARG\" \"TCS guider #1 system for equinox\""399 ENDM 400 DETCOM_ GUIRA1 MACRO ARG401 COBJ "detcom:dheader 531.23 GUIRA1 \"\ARG\" \"TCS guider #1 right ascension\""402 ENDM 403 DETCOM_ GUIDEC1 MACRO ARG404 COBJ "detcom:dheader 531.24 GUIDEC1 \"\ARG\" \"TCS guider #1 declination\""405 ENDM 406 DETCOM_ GUIOBJN1 MACRO ARG407 COBJ "detcom:dheader 531.3 GUIOBJN1 \"\ARG\" \"TCS guider #1 object name\""408 ENDM 409 DETCOM_ GUIFLUX1 MACRO ARG410 COBJ "detcom:dheader 531.6 GUIFLUX1 \"\ARG\" \"TCS guider #1 flux\""411 ENDM 412 DETCOM_ GUINAME2 MACRO ARG413 COBJ "detcom:dheader 532.1 GUINAME2 \"\ARG\" \"TCS guider #2 identification\""414 ENDM 415 DETCOM_ GUIEQUI2 MACRO ARG416 COBJ "detcom:dheader 532.21 GUIEQUI2 \"\ARG\" \"TCS guider #2 equinox\""417 ENDM 418 DETCOM_ GUIRADE2 MACRO ARG419 COBJ "detcom:dheader 532.22 GUIRADE2 \"\ARG\" \"TCS guider #2 system for equinox\""420 ENDM 421 DETCOM_ GUIRA2 MACRO ARG422 COBJ "detcom:dheader 532.23 GUIRA2 \"\ARG\" \"TCS guider #2 right ascension\""423 ENDM 424 DETCOM_ GUIDEC2 MACRO ARG425 COBJ "detcom:dheader 532.24 GUIDEC2 \"\ARG\" \"TCS guider #2 declination\""426 ENDM 427 DETCOM_ GUIOBJN2 MACRO ARG428 COBJ "detcom:dheader 532.3 GUIOBJN2 \"\ARG\" \"TCS guider #2 object name\""429 ENDM 430 DETCOM_ GUIFLUX2 MACRO ARG431 COBJ "detcom:dheader 532.6 GUIFLUX2 \"\ARG\" \"TCS guider #2 flux\""432 ENDM 433 DETCOM_ GUINAME3 MACRO ARG434 COBJ "detcom:dheader 533.1 GUINAME3 \"\ARG\" \"TCS guider #3 identification\""435 ENDM 436 DETCOM_ GUIEQUI3 MACRO ARG437 COBJ "detcom:dheader 533.21 GUIEQUI3 \"\ARG\" \"TCS guider #3 equinox\""438 ENDM 439 DETCOM_ GUIRADE3 MACRO ARG440 COBJ "detcom:dheader 533.22 GUIRADE3 \"\ARG\" \"TCS guider #3 system for equinox\""441 ENDM 442 DETCOM_ GUIRA3 MACRO ARG443 COBJ "detcom:dheader 533.23 GUIRA3 \"\ARG\" \"TCS guider #3 right ascension\""444 ENDM 445 DETCOM_ GUIDEC3 MACRO ARG446 COBJ "detcom:dheader 533.24 GUIDEC3 \"\ARG\" \"TCS guider #3 declination\""447 ENDM 448 DETCOM_ GUIOBJN3 MACRO ARG449 COBJ "detcom:dheader 533.3 GUIOBJN3 \"\ARG\" \"TCS guider #3 object name\""450 ENDM 451 DETCOM_ GUIFLUX3 MACRO ARG452 COBJ "detcom:dheader 533.6 GUIFLUX3 \"\ARG\" \"TCS guider #3 flux\""453 ENDM 454 DETCOM_ GUINAME4 MACRO ARG455 COBJ "detcom:dheader 534.1 GUINAME4 \"\ARG\" \"TCS guider #4 identification\""456 ENDM 457 DETCOM_ GUIEQUI4 MACRO ARG458 COBJ "detcom:dheader 534.21 GUIEQUI4 \"\ARG\" \"TCS guider #4 equinox\""459 ENDM 460 DETCOM_ GUIRADE4 MACRO ARG461 COBJ "detcom:dheader 534.22 GUIRADE4 \"\ARG\" \"TCS guider #4 system for equinox\""462 ENDM 463 DETCOM_ GUIRA4 MACRO ARG464 COBJ "detcom:dheader 534.23 GUIRA4 \"\ARG\" \"TCS guider #4 right ascension\""465 ENDM 466 DETCOM_ GUIDEC4 MACRO ARG467 COBJ "detcom:dheader 534.24 GUIDEC4 \"\ARG\" \"TCS guider #4 declination\""468 ENDM 469 DETCOM_ GUIOBJN4 MACRO ARG470 COBJ "detcom:dheader 534.3 GUIOBJN4 \"\ARG\" \"TCS guider #4 object name\""471 ENDM 472 DETCOM_ GUIFLUX4 MACRO ARG473 COBJ "detcom:dheader 534.6 GUIFLUX4 \"\ARG\" \"TCS guider #4 flux\""474 ENDM 475 DETCOM_ FOCUSID MACRO ARG476 COBJ "detcom:dheader 550.0 FOCUSID \"\ARG\" \"Telescope focus in use\""477 ENDM 478 DETCOM_ TELCONF MACRO ARG479 COBJ "detcom:dheader 550.1 TELCONF \"\ARG\" \"Telescope focus in use\""480 ENDM 481 DETCOM_ FOCUSPOS MACRO ARG482 COBJ "detcom:dheader 551.0 FOCUSPOS \"\ARG\" \"Telescope focus encoder readout\""483 ENDM 484 DETCOM_ TELFOCUS MACRO ARG485 COBJ "detcom:dheader 551.1 TELFOCUS \"\ARG\" \"Telescope focus encoder readout\""486 ENDM 487 DETCOM_ ISUSTATE MACRO ARG488 COBJ "detcom:dheader 560.4 ISUSTATE \"\ARG\" \"ISU control state (Off/Only/TCS/Full/Frozen)\""489 ENDM 490 DETCOM_ FSASTATE MACRO ARG491 COBJ "detcom:dheader 570.4 FSASTATE \"\ARG\" \"FSA control state (Off/On/Paused)\""492 ENDM 493 DETCOM_ FSANMOVE MACRO ARG494 COBJ "detcom:dheader 570.5 FSANMOVE \"\ARG\" \"FSA number of actual moves in last 10 minutes\""495 ENDM 496 DETCOM_ TCSGPSBC MACRO ARG497 COBJ "detcom:dheader 580.11 TCSGPSBC \"\ARG\" \"TCS GPS read out in BCD\""498 ENDM 499 DETCOM_ TCSRBUSS MACRO ARG500 COBJ "detcom:dheader 580.13 TCSRBUSS \"\ARG\" \"TCS RBUSS clock time\""501 ENDM 502 DETCOM_ TCSEPICS MACRO ARG503 COBJ "detcom:dheader 580.14 TCSEPICS \"\ARG\" \"TCS EPICS clock time\""504 ENDM 505 DETCOM_ TCSAMODE MACRO ARG506 COBJ "detcom:dheader 580.15 TCSAMODE \"\ARG\" \"TCS acquisition mode - T/O/G/g for t/o/g coords\""507 ENDM 508 DETCOM_ TCSENHA MACRO ARG509 COBJ "detcom:dheader 580.51 TCSENHA \"\ARG\" \"TCS hour angle encoder bits reading\""510 ENDM 511 DETCOM_ TCSENDEC MACRO ARG512 COBJ "detcom:dheader 580.52 TCSENDEC \"\ARG\" \"TCS declination encoder bits reading\""513 ENDM 514 DETCOM_ AOBLOOP MACRO ARG515 COBJ "detcom:dheader 711.0 AOBLOOP \"\ARG\" \"AOB closed loop Open/Closed\""516 ENDM 517 DETCOM_ LOOPNES MACRO ARG518 COBJ "detcom:dheader 713.0 LOOPNES \"\ARG\" \"Loop type \"Nested\"/\"Tip/Tilt\"/\"Single\"\""519 ENDM 520 DETCOM_ LOOPOPT MACRO ARG521 COBJ "detcom:dheader 715.0 LOOPOPT \"\ARG\" \"Optimized loop control True/False\""522 ENDM 523 DETCOM_ WFSGOPT MACRO ARG524 COBJ "detcom:dheader 716.0 WFSGOPT \"\ARG\" \"WFS optical gain\""525 ENDM 526 DETCOM_ WFSCOUNT MACRO ARG527 COBJ "detcom:dheader 722.0 WFSCOUNT \"\ARG\" \"Total flux count on WFS\""528 ENDM 529 DETCOM_ ADCPOS MACRO ARG530 COBJ "detcom:dheader 751.0 ADCPOS \"\ARG\" \"AOB ADC position In/Out\""531 ENDM 532 DETCOM_ BEAMSPID MACRO ARG533 COBJ "detcom:dheader 754.0 BEAMSPID \"\ARG\" \"Beam splitter ID\""534 ENDM 535 DETCOM_ BEAMSP MACRO ARG536 COBJ "detcom:dheader 755.0 BEAMSP \"\ARG\" \"Beam splitter description\""537 ENDM 538 DETCOM_ MIRSLIDE MACRO ARG539 COBJ "detcom:dheader 756.0 MIRSLIDE \"\ARG\" \"AOB mirror slide \"F/20\"/\"F/8\"\""540 ENDM 541 DETCOM_ WFSNDID MACRO ARG542 COBJ "detcom:dheader 7 57.0 WFSNDID \"\ARG\" \"WFS ND filter position\""543 ENDM 544 DETCOM_ FFLAMPON MACRO ARG545 COBJ "detcom:dheader 910.0 FFLAMPON \"\ARG\" \"flatfield lamp status ON/OFF\""546 ENDM 547 DETCOM_ FFLAMP MACRO ARG548 COBJ "detcom:dheader 911.0 FFLAMP \"\ARG\" \"flatfield lamp intensity\""549 ENDM 550 DETCOM_ CLAMP0ON MACRO ARG551 COBJ "detcom:dheader 920.0 CLAMP0ON \"\ARG\" \"comparison lamp 0 status ON/OFF\""552 ENDM 553 DETCOM_ CLAMP0 MACRO ARG554 COBJ "detcom:dheader 920.1 CLAMP0 \"\ARG\" \"comparison lamp 0 description\""555 ENDM 556 DETCOM_ CLAMP1ON MACRO ARG557 COBJ "detcom:dheader 921.0 CLAMP1ON \"\ARG\" \"comparison lamp 1 status ON/OFF\""558 ENDM 559 DETCOM_ CLAMP1 MACRO ARG560 COBJ "detcom:dheader 921.1 CLAMP1 \"\ARG\" \"comparison lamp 1 description\""561 ENDM 562 DETCOM_ CLAMP2ON MACRO ARG563 COBJ "detcom:dheader 922.0 CLAMP2ON \"\ARG\" \"comparison lamp 2 status ON/OFF\""564 ENDM 565 DETCOM_ CLAMP2 MACRO ARG566 COBJ "detcom:dheader 922.1 CLAMP2 \"\ARG\" \"comparison lamp 2 description\""567 ENDM 568 DETCOM_ CLAMP3ON MACRO ARG569 COBJ "detcom:dheader 923.0 CLAMP3ON \"\ARG\" \"comparison lamp 3 status ON/OFF\""570 ENDM 571 DETCOM_ CLAMP3 MACRO ARG572 COBJ "detcom:dheader 923.1 CLAMP3 \"\ARG\" \"comparison lamp 3 description\""573 ENDM 574 DETCOM_ CALIBL0 MACRO ARG575 COBJ "detcom:dheader 930.0 CALIBL0 \"\ARG\" \"lamp 0 ON/OFF\""576 ENDM 577 DETCOM_ CALIBL1 MACRO ARG578 COBJ "detcom:dheader 931.0 CALIBL1 \"\ARG\" \"lamp 1 ON/OFF\""579 ENDM 580 DETCOM_ CALIBL2 MACRO ARG581 COBJ "detcom:dheader 932.0 CALIBL2 \"\ARG\" \"lamp 2 ON/OFF\""582 ENDM 583 DETCOM_ CALIBL3 MACRO ARG584 COBJ "detcom:dheader 933.0 CALIBL3 \"\ARG\" \"lamp 3 ON/OFF\""585 ENDM 586 DETCOM_ CALIBL4 MACRO ARG587 COBJ "detcom:dheader 934.0 CALIBL4 \"\ARG\" \"lamp 4 ON/OFF\""588 ENDM 589 DETCOM_ CALIBL5 MACRO ARG590 COBJ "detcom:dheader 935.0 CALIBL5 \"\ARG\" \"lamp 5 ON/OFF\""591 ENDM 592 DETCOM_ CALIBL6 MACRO ARG593 COBJ "detcom:dheader 936.0 CALIBL6 \"\ARG\" \"lamp 6 ON/OFF\""594 ENDM 595 DETCOM_ CALIBL7 MACRO ARG596 COBJ "detcom:dheader 937.0 CALIBL7 \"\ARG\" \"lamp 7 ON/OFF\""597 ENDM 598 DETCOM_ CALIBL8 MACRO ARG599 COBJ "detcom:dheader 938.0 CALIBL8 \"\ARG\" \"lamp 8 ON/OFF\""600 ENDM 601 DETCOM_ CALIBL9 MACRO ARG602 COBJ "detcom:dheader 9 39.0 CALIBL9 \"\ARG\" \"lamp 9 ON/OFF\""603 ENDM 604 DETCOM_ FILTERID MACRO ARG605 COBJ "detcom:dheader 1010.1 FILTERID \"\ARG\" \"wheel position\""606 ENDM 607 DETCOM_ FILTER MACRO ARG608 COBJ "detcom:dheader 1010.2 FILTER \"\ARG\" \"description of filter\""609 ENDM 610 DETCOM_ FILTERBWMACRO ARG611 COBJ "detcom:dheader 1010.3 FILTERBW\"\ARG\" \"filter bandwidth\""612 ENDM 613 DETCOM_ FILTERWLMACRO ARG614 COBJ "detcom:dheader 1010.4 FILTERWL\"\ARG\" \"filter wavelength\""615 ENDM 616 DETCOM_ FILTERLBMACRO ARG617 COBJ "detcom:dheader 1010.5 FILTERLB\"\ARG\" \"lower bound of filter (units/%?)\""618 ENDM 619 DETCOM_ FILTERUBMACRO ARG620 COBJ "detcom:dheader 1010.6 FILTERUB\"\ARG\" \"upper bound of filter (units/%?)\""621 ENDM 622 DETCOM_ FILTSLID MACRO ARG623 COBJ "detcom:dheader 1010.7 FILTSLID \"\ARG\" \"filter drawer number\""624 ENDM 625 DETCOM_ WHEELAID MACRO ARG626 COBJ "detcom:dheader 1020.1 WHEELAID \"\ARG\" \"'wheel' A position\""627 ENDM 628 DETCOM_ WHEELADE MACRO ARG629 COBJ "detcom:dheader 1020.2 WHEELADE \"\ARG\" \"description of filter\""630 ENDM 631 DETCOM_ WHEELALBMACRO ARG632 COBJ "detcom:dheader 1020.5 WHEELALB\"\ARG\" \"lower bound of filter A (units/%?)\""633 ENDM 634 DETCOM_ WHEELAUBMACRO ARG635 COBJ "detcom:dheader 1020.6 WHEELAUB\"\ARG\" \"upper bound of filter A (units/%?)\""636 ENDM 637 DETCOM_ WHEELBID MACRO ARG638 COBJ "detcom:dheader 1030.1 WHEELBID \"\ARG\" \"'wheel' B position\""639 ENDM 640 DETCOM_ WHEELBDE MACRO ARG641 COBJ "detcom:dheader 1030.2 WHEELBDE \"\ARG\" \"description of filter\""642 ENDM 643 DETCOM_ WHEELBLBMACRO ARG644 COBJ "detcom:dheader 1030.5 WHEELBLB\"\ARG\" \"lower bound of filter B (units/%?)\""645 ENDM 646 DETCOM_ WHEELBUBMACRO ARG647 COBJ "detcom:dheader 1030.6 WHEELBUB\"\ARG\" \"upper bound of filter B (units/%?)\""648 ENDM 649 DETCOM_ INSTFOCMACRO ARG650 COBJ "detcom:dheader 1 101.0 INSTFOC\"\ARG\" \"internal instrument focus value\""651 ENDM 652 DETCOM_ GRISMID MACRO ARG653 COBJ "detcom:dheader 4101.0 GRISMID \"\ARG\" \"grism position\""654 ENDM 655 DETCOM_ GRISM MACRO ARG656 COBJ "detcom:dheader 4102.0 GRISM \"\ARG\" \"grism description\""657 ENDM 658 DETCOM_ GRISSLID MACRO ARG659 COBJ "detcom:dheader 4103.0 GRISSLID \"\ARG\" \"grism drawer number\""660 ENDM 661 DETCOM_ MASKID MACRO ARG662 COBJ "detcom:dheader 4111.0 MASKID \"\ARG\" \"mask position\""663 ENDM 664 DETCOM_ MASK MACRO ARG665 COBJ "detcom:dheader 4112.0 MASK \"\ARG\" \"mask description\""666 ENDM 667 DETCOM_ MASKSLID MACRO ARG668 COBJ "detcom:dheader 4113.0 MASKSLID \"\ARG\" \"mask slider number\""669 ENDM 670 DETCOM_ DISPEL MACRO ARG671 COBJ "detcom:dheader 4201.0 DISPEL \"\ARG\" \"grating description\""672 ENDM 673 DETCOM_ DISPAXIS MACRO ARG674 COBJ "detcom:dheader 4202.0 DISPAXIS \"\ARG\" \"dispersion axis (1 or 2)\""675 ENDM 676 DETCOM_ DISPANGMACRO ARG677 COBJ "detcom:dheader 4203.0 DISPANG\"\ARG\" \"grating angle in degrees\""678 ENDM 679 DETCOM_ WAVELENGMACRO ARG680 COBJ "detcom:dheader 4 204.0 WAVELENG\"\ARG\" \"central wavelength in angstroms\""681 ENDM 682 DETCOM_ ORDER MACRO ARG683 COBJ "detcom:dheader 4205.0 ORDER \"\ARG\" \"spectral order\""684 ENDM 685 DETCOM_ GRSETUPMACRO ARG686 COBJ "detcom:dheader 4206.0 GRSETUP\"\ARG\" \"grating setup constant in degrees\""687 ENDM 688 DETCOM_ OPENANG2MACRO ARG689 COBJ "detcom:dheader 4207.0 OPENANG2\"\ARG\" \"setup const in degrees (opening angle / 2)\""690 ENDM 691 DETCOM_ GRISMANGMACRO ARG692 COBJ "detcom:dheader 4208.0 GRISMANG\"\ARG\" \"rel.angle between prisms in degrees\""693 ENDM 694 DETCOM_ SLICER MACRO ARG695 COBJ "detcom:dheader 4210.0 SLICER \"\ARG\" \"image slicer in place\""696 ENDM 697 DETCOM_ HART1A MACRO ARG698 COBJ "detcom:dheader 4221.0 HART1A \"\ARG\" \"hartman mask 1a position OPEN/CLOSED\""699 ENDM 700 DETCOM_ HART1B MACRO ARG701 COBJ "detcom:dheader 4221.1 HART1B \"\ARG\" \"hartman mask 1b position OPEN/CLOSED\""702 ENDM 703 DETCOM_ HART2 MACRO ARG704 COBJ "detcom:dheader 4222.0 HART2 \"\ARG\" \"hartman mask 2 position OPEN/CLOSED\""705 ENDM 706 DETCOM_ HART3 MACRO ARG707 COBJ "detcom:dheader 4223.0 HART3 \"\ARG\" \"hartman mask 3 position OPEN/CLOSED\""708 ENDM 709 DETCOM_ HART4 MACRO ARG710 COBJ "detcom:dheader 4 224.0 HART4 \"\ARG\" \"hartman mask 4 position OPEN/CLOSED\""711 ENDM 712 DETCOM_ COUDETRN MACRO ARG713 COBJ "detcom:dheader 4230.0 COUDETRN \"\ARG\" \"coude train color UV/RED/CAFE\""714 ENDM 715 DETCOM_ EMFILTER MACRO ARG716 COBJ "detcom:dheader 4240.0 EMFILTER \"\ARG\" \"exposure meter filter description\""717 ENDM 718 DETCOM_ EMCNTS MACRO ARG719 COBJ "detcom:dheader 4241.0 EMCNTS \"\ARG\" \"exposure meter counts at end\""720 ENDM 721 DETCOM_M IDEXPTMMACRO ARG722 COBJ "detcom:dheader 4242.0 MIDEXPTM \"\ARG\" \"mid-exposure time (seconds)\""723 ENDM 724 DETCOM_ CAFE MACRO ARG725 COBJ "detcom:dheader 4290.0 CAFE \"\ARG\" \"CAFE is being used Null/INUSE\""726 ENDM 727 DETCOM_ AUXINST MACRO ARG728 COBJ "detcom:dheader 4301.0 AUXINST \"\ARG\" \"fabry perot etalon description\""729 ENDM 730 DETCOM_N UMCHANMACRO ARG731 COBJ "detcom:dheader 4303.0 NUMCHAN \"\ARG\" \"number of channels per scan\""732 ENDM 733 DETCOM_ CURCHAN MACRO ARG734 COBJ "detcom:dheader 4 304.0 CURCHAN \"\ARG\" \"current channel\""735 ENDM 736 DETCOM_ BINVAL MACRO ARG737 COBJ "detcom:dheader 4305.0 BINVAL \"\ARG\" \"binary control value\""738 ENDM 739 DETCOM_ GRFPPOS MACRO ARG740 COBJ "detcom:dheader 4320.0 GRFPPOS \"\ARG\" \"GriF position of FP carriage - In/Out\""741 ENDM 742 DETCOM_ GRWAVORDMACRO ARG743 COBJ "detcom:dheader 4321.1 GRWAVORD\"\ARG\" \"GriF wavelength of order used to scan\""744 ENDM 745 DETCOM_ GRWAVCALMACRO ARG746 COBJ "detcom:dheader 4321.2 GRWAVCAL\"\ARG\" \"GriF wavelength of calibration spectral line\""747 ENDM 748 DETCOM_ GRBCVCALMACRO ARG749 COBJ "detcom:dheader 4321.3 GRBCVCAL\"\ARG\" \"GriF BCV at calibration line\""750 ENDM 751 DETCOM_ GRSCANTY MACRO ARG752 COBJ "detcom:dheader 4322.0 GRSCANTY \"\ARG\" \"GriF type of scan - bcv, wave, velocity\""753 ENDM 754 DETCOM_ GRWAVBEGMACRO ARG755 COBJ "detcom:dheader 4323.1 GRWAVBEG\"\ARG\" \"GriF wavelength at beginning of scan\""756 ENDM 757 DETCOM_ GRWAVSTPMACRO ARG758 COBJ "detcom:dheader 4323.2 GRWAVSTP\"\ARG\" \"GriF wavelength step\""759 ENDM 760 DETCOM_ GRWAVCURMACRO ARG761 COBJ "detcom:dheader 4323.3 GRWAVCUR\"\ARG\" \"GriF current observed wavelength\""762 ENDM 763 DETCOM_ GRBCVBEGMACRO ARG764 COBJ "detcom:dheader 4 324.1 GRBCVBEG\"\ARG\" \"GriF Binary Contol Value at beginning of scan\""765 ENDM 766 DETCOM_ GRBCVSTPMACRO ARG767 COBJ "detcom:dheader 4 324.2 GRBCVSTP\"\ARG\" \"GriF BCV step\""768 ENDM 769 DETCOM_ GRBCVCUR MACRO ARG770 COBJ "detcom:dheader 4 324.3 GRBCVCUR \"\ARG\" \"GriF applied BCV\""771 ENDM 772 DETCOM_ GRNBCHAN MACRO ARG773 COBJ "detcom:dheader 4325.1 GRNBCHAN \"\ARG\" \"GriF number of channels in scan\""774 ENDM 775 DETCOM_ GRCURRCH MACRO ARG776 COBJ "detcom:dheader 4325.2 GRCURRCH \"\ARG\" \"GriF current channel\""777 ENDM 778 DETCOM_ GRBCV_X MACRO ARG779 COBJ "detcom:dheader 4326.1 GRBCV_X \"\ARG\" \"GriF X Binary Control Value FP\""780 ENDM 781 DETCOM_ GRBCV_Y MACRO ARG782 COBJ "detcom:dheader 4326.2 GRBCV_Y \"\ARG\" \"GriF Y Binary Control Value FP\""783 ENDM 784 DETCOM_ CRUNID MACRO ARG785 COBJ "detcom:dheader 1 5101.0 CRUNID \"\ARG\" \"Elixir camera run ID\""786 ENDM 1 DETCOM_E MACRO ARG 2 COBJ "detcom:dheader 0.0 E \"\ARG\" \"Standard FITS\"" 3 ENDM 4 DETCOM_N MACRO ARG 5 COBJ "detcom:dheader 0.0 N \"\ARG\" \"\"" 6 ENDM 7 DETCOM_X MACRO ARG 8 COBJ "detcom:dheader 1.0 X \"\ARG\" \"Bits per pixel\"" 9 ENDM 10 DETCOM_S MACRO ARG 11 COBJ "detcom:dheader 2.0 S \"\ARG\" \"Number of axes\"" 12 ENDM 13 DETCOM_1 MACRO ARG 14 COBJ "detcom:dheader 2.1 1 \"\ARG\" \"Number of pixel columns\"" 15 ENDM 16 DETCOM_2 MACRO ARG 17 COBJ "detcom:dheader 2.2 2 \"\ARG\" \"Number of pixel rows\"" 18 ENDM 19 DETCOM_3 MACRO ARG 20 COBJ "detcom:dheader 2.3 3 \"\ARG\" \"Number of stacked frames (cube)\"" 21 ENDM 22 DETCOM_D MACRO ARG 23 COBJ "detcom:dheader 3.0 D \"\ARG\" \"File contains extensions\"" 24 ENDM 25 DETCOM_D MACRO ARG 26 COBJ "detcom:dheader 3.1 D \"\ARG\" \"Number of extensions\"" 27 ENDM 28 DETCOM_S MACRO ARG 29 COBJ "detcom:dheader 4.0 S \"\ARG\" \"File contains random groups records\"" 30 ENDM 31 DETCOM_T MACRO ARG 32 COBJ "detcom:dheader 5.0 T \"\ARG\" \"Random parameters before each array in a group\"" 33 ENDM 34 DETCOM_T MACRO ARG 35 COBJ "detcom:dheader 6.0 T \"\ARG\" \"Number of random groups\"" 36 ENDM 37 DETCOM_S MACRO ARG 38 COBJ "detcom:dheader 7.0000 S \"\ARG\" \"Number of fields in a row\"" 39 ENDM 40 DETCOM_1 MACRO ARG 41 COBJ "detcom:dheader 7.0011 1 \"\ARG\" \"Table format for field 1\"" 42 ENDM 43 DETCOM_1 MACRO ARG 44 COBJ "detcom:dheader 7.0012 1 \"\ARG\" \"Start Column for field 1\"" 45 ENDM 46 DETCOM_2 MACRO ARG 47 COBJ "detcom:dheader 7.0021 2 \"\ARG\" \"Table format for field 2\"" 48 ENDM 49 DETCOM_2 MACRO ARG 50 COBJ "detcom:dheader 7.0022 2 \"\ARG\" \"Start Column for field 2\"" 51 ENDM 52 DETCOM_3 MACRO ARG 53 COBJ "detcom:dheader 7.0031 3 \"\ARG\" \"Table format for field 3\"" 54 ENDM 55 DETCOM_3 MACRO ARG 56 COBJ "detcom:dheader 7.0032 3 \"\ARG\" \"Start Column for field 3\"" 57 ENDM 58 DETCOM_4 MACRO ARG 59 COBJ "detcom:dheader 7.0041 4 \"\ARG\" \"Table format for field 4\"" 60 ENDM 61 DETCOM_4 MACRO ARG 62 COBJ "detcom:dheader 7.0042 4 \"\ARG\" \"Start Column for field 4\"" 63 ENDM 64 DETCOM_5 MACRO ARG 65 COBJ "detcom:dheader 7.0051 5 \"\ARG\" \"Table format for field 5\"" 66 ENDM 67 DETCOM_5 MACRO ARG 68 COBJ "detcom:dheader 7.0052 5 \"\ARG\" \"Start Column for field 5\"" 69 ENDM 70 DETCOM_S MACRO ARG 71 COBJ "detcom:dheader 1.0 S \"\ARG\" \"\"" 72 ENDM 73 DETCOM_Q MACRO ARG 74 COBJ "detcom:dheader 2.0 Q \"\ARG\" \"\"" 75 ENDM 76 DETCOM_T MACRO ARG 77 COBJ "detcom:dheader 3.0 T \"\ARG\" \"\"" 78 ENDM 79 DETCOM_R MACRO ARG 80 COBJ "detcom:dheader 4.0 R \"\ARG\" \"\"" 81 ENDM 82 DETCOM_E MACRO ARG 83 COBJ "detcom:dheader 5.0 E \"\ARG\" \"\"" 84 ENDM 85 DETCOM_D MACRO ARG 86 COBJ "detcom:dheader 6.0 D \"\ARG\" \"\"" 87 ENDM 88 DETCOM_E MACRO ARG 89 COBJ "detcom:dheader 1.00 E \"\ARG\" \"Base filename at acquisition\"" 90 ENDM 91 DETCOM_E MACRO ARG 92 COBJ "detcom:dheader 1.01 E \"\ARG\" \"Original directory name at acquisition\"" 93 ENDM 94 DETCOM_E MACRO ARG 95 COBJ "detcom:dheader 1.10 E \"\ARG\" \"Extension name\"" 96 ENDM 97 DETCOM_R MACRO ARG 98 COBJ "detcom:dheader 1.20 R \"\ARG\" \"Extension version\"" 99 ENDM 100 DETCOM_E MACRO ARG 101 COBJ "detcom:dheader 4.00 E \"\ARG\" \"UTC Date of file creation\"" 102 ENDM 103 DETCOM_E MACRO ARG 104 COBJ "detcom:dheader 4.10 E \"\ARG\" \"Local time in Hawaii\"" 105 ENDM 106 DETCOM_V MACRO ARG 107 COBJ "detcom:dheader 7.00 V \"\ARG\" \"Image creation software version\"" 108 ENDM 109 DETCOM_R MACRO ARG 110 COBJ "detcom:dheader 1.0 R \"\ARG\" \"Science Detector\"" 111 ENDM 112 DETCOM_E MACRO ARG 113 COBJ "detcom:dheader 2.0 E \"\ARG\" \"Instrument Name\"" 114 ENDM 115 DETCOM_E MACRO ARG 116 COBJ "detcom:dheader 2.1 E \"\ARG\" \"Instrument Mode\"" 117 ENDM 118 DETCOM_E MACRO ARG 119 COBJ "detcom:dheader 2.0 E \"\ARG\" \"Total data pixels in full mosaic\"" 120 ENDM 121 DETCOM_R MACRO ARG 122 COBJ "detcom:dheader 3.0 R \"\ARG\" \"\"" 123 ENDM 124 DETCOM_M MACRO ARG 125 COBJ "detcom:dheader 5.0 M \"\ARG\" \"Binning factors\"" 126 ENDM 127 DETCOM_1 MACRO ARG 128 COBJ "detcom:dheader 5.1 1 \"\ARG\" \"Binning factor along first axis\"" 129 ENDM 130 DETCOM_2 MACRO ARG 131 COBJ "detcom:dheader 5.2 2 \"\ARG\" \"Binning factor along second axis\"" 132 ENDM 133 DETCOM_3 MACRO ARG 134 COBJ "detcom:dheader 0.0 3 \"\ARG\" \"Pixel size for both axes (microns)\"" 135 ENDM 136 DETCOM_3 MACRO ARG 137 COBJ "detcom:dheader 1.1 3 \"\ARG\" \"Pixel size for axis 1 (microns)\"" 138 ENDM 139 DETCOM_3 MACRO ARG 140 COBJ "detcom:dheader 1.2 3 \"\ARG\" \"Pixel size for axis 2 (microns)\"" 141 ENDM 142 DETCOM_4 MACRO ARG 143 COBJ "detcom:dheader 2.1 4 \"\ARG\" \"Pixel scale for axis 1 (arcsec/pixel)\"" 144 ENDM 145 DETCOM_4 MACRO ARG 146 COBJ "detcom:dheader 2.2 4 \"\ARG\" \"Pixel scale for axis 2 (arcsec/pixel)\"" 147 ENDM 148 DETCOM_T MACRO ARG 149 COBJ "detcom:dheader 0.0 T \"\ARG\" \"List of amplifiers for this image\"" 150 ENDM 151 DETCOM_E MACRO ARG 152 COBJ "detcom:dheader 1.0 E \"\ARG\" \"Amplifier name\"" 153 ENDM 154 DETCOM_E MACRO ARG 155 COBJ "detcom:dheader 0.0 E \"\ARG\" \"Detector imaging area size\"" 156 ENDM 157 DETCOM_C MACRO ARG 158 COBJ "detcom:dheader 0.1 C \"\ARG\" \"Mosaic area of the detector\"" 159 ENDM 160 DETCOM_A MACRO ARG 161 COBJ "detcom:dheader 0.11 A \"\ARG\" \"Mosaic area of the detector from Amp A\"" 162 ENDM 163 DETCOM_B MACRO ARG 164 COBJ "detcom:dheader 0.12 B \"\ARG\" \"Mosaic area of the detector from Amp B\"" 165 ENDM 166 DETCOM_C MACRO ARG 167 COBJ "detcom:dheader 0.13 C \"\ARG\" \"Mosaic area of the detector from Amp C\"" 168 ENDM 169 DETCOM_D MACRO ARG 170 COBJ "detcom:dheader 0.14 D \"\ARG\" \"Mosaic area of the detector from Amp D\"" 171 ENDM 172 DETCOM_C MACRO ARG 173 COBJ "detcom:dheader 0.2 C \"\ARG\" \"Imaging area of the detector\"" 174 ENDM 175 DETCOM_C MACRO ARG 176 COBJ "detcom:dheader 0.3 C \"\ARG\" \"Overscan (bias) area of the detector\"" 177 ENDM 178 DETCOM_A MACRO ARG 179 COBJ "detcom:dheader 1.11 A \"\ARG\" \"Section from Amp A (non-contig. bias excluded)\"" 180 ENDM 181 DETCOM_B MACRO ARG 182 COBJ "detcom:dheader 1.12 B \"\ARG\" \"Section from Amp B (non-contig. bias excluded)\"" 183 ENDM 184 DETCOM_C MACRO ARG 185 COBJ "detcom:dheader 1.13 C \"\ARG\" \"Section from Amp C (non-contig. bias excluded)\"" 186 ENDM 187 DETCOM_D MACRO ARG 188 COBJ "detcom:dheader 1.14 D \"\ARG\" \"Section from Amp D (non-contig. bias excluded)\"" 189 ENDM 190 DETCOM_A MACRO ARG 191 COBJ "detcom:dheader 1.21 A \"\ARG\" \"Overscan (bias) area from Amp A\"" 192 ENDM 193 DETCOM_B MACRO ARG 194 COBJ "detcom:dheader 1.22 B \"\ARG\" \"Overscan (bias) area from Amp B\"" 195 ENDM 196 DETCOM_C MACRO ARG 197 COBJ "detcom:dheader 1.23 C \"\ARG\" \"Overscan (bias) area from Amp C\"" 198 ENDM 199 DETCOM_D MACRO ARG 200 COBJ "detcom:dheader 1.24 D \"\ARG\" \"Overscan (bias) area from Amp D\"" 201 ENDM 202 DETCOM_A MACRO ARG 203 COBJ "detcom:dheader 1.31 A \"\ARG\" \"Section in full CCD for DSECA\"" 204 ENDM 205 DETCOM_B MACRO ARG 206 COBJ "detcom:dheader 1.32 B \"\ARG\" \"Section in full CCD for DSECB\"" 207 ENDM 208 DETCOM_C MACRO ARG 209 COBJ "detcom:dheader 1.33 C \"\ARG\" \"Section in full CCD for DSECC\"" 210 ENDM 211 DETCOM_D MACRO ARG 212 COBJ "detcom:dheader 1.34 D \"\ARG\" \"Section in full CCD for DSECD\"" 213 ENDM 214 DETCOM_A MACRO ARG 215 COBJ "detcom:dheader 1.41 A \"\ARG\" \"Imaging area from Amp A\"" 216 ENDM 217 DETCOM_B MACRO ARG 218 COBJ "detcom:dheader 1.42 B \"\ARG\" \"Imaging area from Amp B\"" 219 ENDM 220 DETCOM_C MACRO ARG 221 COBJ "detcom:dheader 1.43 C \"\ARG\" \"Imaging area from Amp C\"" 222 ENDM 223 DETCOM_D MACRO ARG 224 COBJ "detcom:dheader 1.44 D \"\ARG\" \"Imaging area from Amp D\"" 225 ENDM 226 DETCOM_A MACRO ARG 227 COBJ "detcom:dheader 1.51 A \"\ARG\" \"Trim section for Amp A\"" 228 ENDM 229 DETCOM_B MACRO ARG 230 COBJ "detcom:dheader 1.52 B \"\ARG\" \"Trim section for Amp B\"" 231 ENDM 232 DETCOM_C MACRO ARG 233 COBJ "detcom:dheader 1.53 C \"\ARG\" \"Trim section for Amp C\"" 234 ENDM 235 DETCOM_D MACRO ARG 236 COBJ "detcom:dheader 1.54 D \"\ARG\" \"Trim section for Amp D\"" 237 ENDM 238 DETCOM_E MACRO ARG 239 COBJ "detcom:dheader 0.1 E \"\ARG\" \"Name of the CCD (manufacturer reference)\"" 240 ENDM 241 DETCOM_K MACRO ARG 242 COBJ "detcom:dheader 0.2 K \"\ARG\" \"Nickname of the CCD\"" 243 ENDM 244 DETCOM_N MACRO ARG 245 COBJ "detcom:dheader 2.0 N \"\ARG\" \"Maximum linearity value (ADU)\"" 246 ENDM 247 DETCOM_A MACRO ARG 248 COBJ "detcom:dheader 2.01 A \"\ARG\" \"Maximum linearity value for Amp A (ADU)\"" 249 ENDM 250 DETCOM_B MACRO ARG 251 COBJ "detcom:dheader 2.02 B \"\ARG\" \"Maximum linearity value for Amp B (ADU)\"" 252 ENDM 253 DETCOM_C MACRO ARG 254 COBJ "detcom:dheader 2.03 C \"\ARG\" \"Maximum linearity value for Amp C (ADU)\"" 255 ENDM 256 DETCOM_D MACRO ARG 257 COBJ "detcom:dheader 2.04 D \"\ARG\" \"Maximum linearity value for Amp D (ADU)\"" 258 ENDM 259 DETCOM_E MACRO ARG 260 COBJ "detcom:dheader 2.1 E \"\ARG\" \"Saturation value (ADU)\"" 261 ENDM 262 DETCOM_3 MACRO ARG 263 COBJ "detcom:dheader 5.0 3 \"\ARG\" \"Amplifier gain (electrons/ADU)\"" 264 ENDM 265 DETCOM_3 MACRO ARG 266 COBJ "detcom:dheader 5.01 3 \"\ARG\" \"Amp A gain (electrons/ADU)\"" 267 ENDM 268 DETCOM_3 MACRO ARG 269 COBJ "detcom:dheader 5.02 3 \"\ARG\" \"Amp B gain (electrons/ADU)\"" 270 ENDM 271 DETCOM_3 MACRO ARG 272 COBJ "detcom:dheader 5.03 3 \"\ARG\" \"Amp C gain (electrons/ADU)\"" 273 ENDM 274 DETCOM_3 MACRO ARG 275 COBJ "detcom:dheader 5.04 3 \"\ARG\" \"Amp D gain (electrons/ADU)\"" 276 ENDM 277 DETCOM_3 MACRO ARG 278 COBJ "detcom:dheader 6.0 3 \"\ARG\" \"Read noise (electrons)\"" 279 ENDM 280 DETCOM_3 MACRO ARG 281 COBJ "detcom:dheader 6.01 3 \"\ARG\" \"Amp A read noise (electrons)\"" 282 ENDM 283 DETCOM_3 MACRO ARG 284 COBJ "detcom:dheader 6.02 3 \"\ARG\" \"Amp B read noise (electrons)\"" 285 ENDM 286 DETCOM_3 MACRO ARG 287 COBJ "detcom:dheader 6.03 3 \"\ARG\" \"Amp C read noise (electrons)\"" 288 ENDM 289 DETCOM_3 MACRO ARG 290 COBJ "detcom:dheader 6.04 3 \"\ARG\" \"Amp D read noise (electrons)\"" 291 ENDM 292 DETCOM_5 MACRO ARG 293 COBJ "detcom:dheader 7.0 5 \"\ARG\" \"Dark current (ADU/pixel/second)\"" 294 ENDM 295 DETCOM_5 MACRO ARG 296 COBJ "detcom:dheader 7.1 5 \"\ARG\" \"Dark current (e-/pixel/hour)\"" 297 ENDM 298 DETCOM_S MACRO ARG 299 COBJ "detcom:dheader 8.0 S \"\ARG\" \"QE%@wavelength in nm\"" 300 ENDM 301 DETCOM_V MACRO ARG 302 COBJ "detcom:dheader 0.0 V \"\ARG\" \"Controller software DSPID and SERNO versions\"" 303 ENDM 304 DETCOM_T MACRO ARG 305 COBJ "detcom:dheader 0.0 T \"\ARG\" \"Detector status\"" 306 ENDM 307 DETCOM_3 MACRO ARG 308 COBJ "detcom:dheader 0.0 3 \"\ARG\" \"Detector temperature\"" 309 ENDM 310 DETCOM_P MACRO ARG 311 COBJ "detcom:dheader 1.1 P \"\ARG\" \"\"" 312 ENDM 313 DETCOM_N MACRO ARG 314 COBJ "detcom:dheader 1.2 N \"\ARG\" \"Canada-France-Hawaii Telescope\"" 315 ENDM 316 DETCOM_T MACRO ARG 317 COBJ "detcom:dheader 3.0 T \"\ARG\" \"Telescope Control System status\"" 318 ENDM 319 DETCOM_S MACRO ARG 320 COBJ "detcom:dheader 0.0 S \"\ARG\" \"Time System for DATExxxx\"" 321 ENDM 322 DETCOM_E MACRO ARG 323 COBJ "detcom:dheader 2.0 E \"\ARG\" \"Time at start of observation (UT)\"" 324 ENDM 325 DETCOM_E MACRO ARG 326 COBJ "detcom:dheader 4.0 E \"\ARG\" \"Sidereal time at start of observation\"" 327 ENDM 328 DETCOM_H MACRO ARG 329 COBJ "detcom:dheader 1.0 H \"\ARG\" \"Equinox of coordinates\"" 330 ENDM 331 DETCOM_X MACRO ARG 332 COBJ "detcom:dheader 1.1 X \"\ARG\" \"Equinox of coordinates\"" 333 ENDM 334 DETCOM_S MACRO ARG 335 COBJ "detcom:dheader 2.0 S \"\ARG\" \"Coordinate system for equinox (FK4/FK5/GAPPT)\"" 336 ENDM 337 DETCOM_A MACRO ARG 338 COBJ "detcom:dheader 2.1 A \"\ARG\" \"Object right ascension\"" 339 ENDM 340 DETCOM_C MACRO ARG 341 COBJ "detcom:dheader 2.2 C \"\ARG\" \"Object declination\"" 342 ENDM 343 DETCOM_1 MACRO ARG 344 COBJ "detcom:dheader 5.211 1 \"\ARG\" \"WCS Coordinate type\"" 345 ENDM 346 DETCOM_2 MACRO ARG 347 COBJ "detcom:dheader 5.212 2 \"\ARG\" \"WCS Coordinate type\"" 348 ENDM 349 DETCOM_6 MACRO ARG 350 COBJ "detcom:dheader 5.411 6 \"\ARG\" \"WCS Coordinate scale matrix\"" 351 ENDM 352 DETCOM_6 MACRO ARG 353 COBJ "detcom:dheader 5.412 6 \"\ARG\" \"WCS Coordinate scale matrix\"" 354 ENDM 355 DETCOM_6 MACRO ARG 356 COBJ "detcom:dheader 5.421 6 \"\ARG\" \"WCS Coordinate scale matrix\"" 357 ENDM 358 DETCOM_6 MACRO ARG 359 COBJ "detcom:dheader 5.422 6 \"\ARG\" \"WCS Coordinate scale matrix\"" 360 ENDM 361 DETCOM_R MACRO ARG 362 COBJ "detcom:dheader 0.0 R \"\ARG\" \"TCS Number of guiders\"" 363 ENDM 364 DETCOM_R MACRO ARG 365 COBJ "detcom:dheader 0.01 R \"\ARG\" \"TCS number of guide stars/probes in use\"" 366 ENDM 367 DETCOM_E MACRO ARG 368 COBJ "detcom:dheader 0.1 E \"\ARG\" \"TCS guider name\"" 369 ENDM 370 DETCOM_N MACRO ARG 371 COBJ "detcom:dheader 0.21 N \"\ARG\" \"TCS guider equinox\"" 372 ENDM 373 DETCOM_C MACRO ARG 374 COBJ "detcom:dheader 0.22 C \"\ARG\" \"TCS guider system for equinox\"" 375 ENDM 376 DETCOM_A MACRO ARG 377 COBJ "detcom:dheader 0.23 A \"\ARG\" \"TCS guider right ascension\"" 378 ENDM 379 DETCOM_C MACRO ARG 380 COBJ "detcom:dheader 0.24 C \"\ARG\" \"TCS guider declination\"" 381 ENDM 382 DETCOM_N MACRO ARG 383 COBJ "detcom:dheader 0.3 N \"\ARG\" \"TCS guider object name\"" 384 ENDM 385 DETCOM_X MACRO ARG 386 COBJ "detcom:dheader 0.6 X \"\ARG\" \"TCS guider flux\"" 387 ENDM 388 DETCOM_X MACRO ARG 389 COBJ "detcom:dheader 0.8 X \"\ARG\" \"TCS total sky flux\"" 390 ENDM 391 DETCOM_1 MACRO ARG 392 COBJ "detcom:dheader 1.1 1 \"\ARG\" \"TCS guider #1 identification\"" 393 ENDM 394 DETCOM_1 MACRO ARG 395 COBJ "detcom:dheader 1.21 1 \"\ARG\" \"TCS guider #1 equinox\"" 396 ENDM 397 DETCOM_1 MACRO ARG 398 COBJ "detcom:dheader 1.22 1 \"\ARG\" \"TCS guider #1 system for equinox\"" 399 ENDM 400 DETCOM_1 MACRO ARG 401 COBJ "detcom:dheader 1.23 1 \"\ARG\" \"TCS guider #1 right ascension\"" 402 ENDM 403 DETCOM_1 MACRO ARG 404 COBJ "detcom:dheader 1.24 1 \"\ARG\" \"TCS guider #1 declination\"" 405 ENDM 406 DETCOM_1 MACRO ARG 407 COBJ "detcom:dheader 1.3 1 \"\ARG\" \"TCS guider #1 object name\"" 408 ENDM 409 DETCOM_1 MACRO ARG 410 COBJ "detcom:dheader 1.6 1 \"\ARG\" \"TCS guider #1 flux\"" 411 ENDM 412 DETCOM_2 MACRO ARG 413 COBJ "detcom:dheader 2.1 2 \"\ARG\" \"TCS guider #2 identification\"" 414 ENDM 415 DETCOM_2 MACRO ARG 416 COBJ "detcom:dheader 2.21 2 \"\ARG\" \"TCS guider #2 equinox\"" 417 ENDM 418 DETCOM_2 MACRO ARG 419 COBJ "detcom:dheader 2.22 2 \"\ARG\" \"TCS guider #2 system for equinox\"" 420 ENDM 421 DETCOM_2 MACRO ARG 422 COBJ "detcom:dheader 2.23 2 \"\ARG\" \"TCS guider #2 right ascension\"" 423 ENDM 424 DETCOM_2 MACRO ARG 425 COBJ "detcom:dheader 2.24 2 \"\ARG\" \"TCS guider #2 declination\"" 426 ENDM 427 DETCOM_2 MACRO ARG 428 COBJ "detcom:dheader 2.3 2 \"\ARG\" \"TCS guider #2 object name\"" 429 ENDM 430 DETCOM_2 MACRO ARG 431 COBJ "detcom:dheader 2.6 2 \"\ARG\" \"TCS guider #2 flux\"" 432 ENDM 433 DETCOM_3 MACRO ARG 434 COBJ "detcom:dheader 3.1 3 \"\ARG\" \"TCS guider #3 identification\"" 435 ENDM 436 DETCOM_3 MACRO ARG 437 COBJ "detcom:dheader 3.21 3 \"\ARG\" \"TCS guider #3 equinox\"" 438 ENDM 439 DETCOM_3 MACRO ARG 440 COBJ "detcom:dheader 3.22 3 \"\ARG\" \"TCS guider #3 system for equinox\"" 441 ENDM 442 DETCOM_3 MACRO ARG 443 COBJ "detcom:dheader 3.23 3 \"\ARG\" \"TCS guider #3 right ascension\"" 444 ENDM 445 DETCOM_3 MACRO ARG 446 COBJ "detcom:dheader 3.24 3 \"\ARG\" \"TCS guider #3 declination\"" 447 ENDM 448 DETCOM_3 MACRO ARG 449 COBJ "detcom:dheader 3.3 3 \"\ARG\" \"TCS guider #3 object name\"" 450 ENDM 451 DETCOM_3 MACRO ARG 452 COBJ "detcom:dheader 3.6 3 \"\ARG\" \"TCS guider #3 flux\"" 453 ENDM 454 DETCOM_4 MACRO ARG 455 COBJ "detcom:dheader 4.1 4 \"\ARG\" \"TCS guider #4 identification\"" 456 ENDM 457 DETCOM_4 MACRO ARG 458 COBJ "detcom:dheader 4.21 4 \"\ARG\" \"TCS guider #4 equinox\"" 459 ENDM 460 DETCOM_4 MACRO ARG 461 COBJ "detcom:dheader 4.22 4 \"\ARG\" \"TCS guider #4 system for equinox\"" 462 ENDM 463 DETCOM_4 MACRO ARG 464 COBJ "detcom:dheader 4.23 4 \"\ARG\" \"TCS guider #4 right ascension\"" 465 ENDM 466 DETCOM_4 MACRO ARG 467 COBJ "detcom:dheader 4.24 4 \"\ARG\" \"TCS guider #4 declination\"" 468 ENDM 469 DETCOM_4 MACRO ARG 470 COBJ "detcom:dheader 4.3 4 \"\ARG\" \"TCS guider #4 object name\"" 471 ENDM 472 DETCOM_4 MACRO ARG 473 COBJ "detcom:dheader 4.6 4 \"\ARG\" \"TCS guider #4 flux\"" 474 ENDM 475 DETCOM_D MACRO ARG 476 COBJ "detcom:dheader 0.0 D \"\ARG\" \"Telescope focus in use\"" 477 ENDM 478 DETCOM_F MACRO ARG 479 COBJ "detcom:dheader 0.1 F \"\ARG\" \"Telescope focus in use\"" 480 ENDM 481 DETCOM_S MACRO ARG 482 COBJ "detcom:dheader 1.0 S \"\ARG\" \"Telescope focus encoder readout\"" 483 ENDM 484 DETCOM_S MACRO ARG 485 COBJ "detcom:dheader 1.1 S \"\ARG\" \"Telescope focus encoder readout\"" 486 ENDM 487 DETCOM_E MACRO ARG 488 COBJ "detcom:dheader 0.4 E \"\ARG\" \"ISU control state (Off/Only/TCS/Full/Frozen)\"" 489 ENDM 490 DETCOM_E MACRO ARG 491 COBJ "detcom:dheader 0.4 E \"\ARG\" \"FSA control state (Off/On/Paused)\"" 492 ENDM 493 DETCOM_E MACRO ARG 494 COBJ "detcom:dheader 0.5 E \"\ARG\" \"FSA number of actual moves in last 10 minutes\"" 495 ENDM 496 DETCOM_C MACRO ARG 497 COBJ "detcom:dheader 0.11 C \"\ARG\" \"TCS GPS read out in BCD\"" 498 ENDM 499 DETCOM_S MACRO ARG 500 COBJ "detcom:dheader 0.13 S \"\ARG\" \"TCS RBUSS clock time\"" 501 ENDM 502 DETCOM_S MACRO ARG 503 COBJ "detcom:dheader 0.14 S \"\ARG\" \"TCS EPICS clock time\"" 504 ENDM 505 DETCOM_E MACRO ARG 506 COBJ "detcom:dheader 0.15 E \"\ARG\" \"TCS acquisition mode - T/O/G/g for t/o/g coords\"" 507 ENDM 508 DETCOM_A MACRO ARG 509 COBJ "detcom:dheader 0.51 A \"\ARG\" \"TCS hour angle encoder bits reading\"" 510 ENDM 511 DETCOM_C MACRO ARG 512 COBJ "detcom:dheader 0.52 C \"\ARG\" \"TCS declination encoder bits reading\"" 513 ENDM 514 DETCOM_P MACRO ARG 515 COBJ "detcom:dheader 1.0 P \"\ARG\" \"AOB closed loop Open/Closed\"" 516 ENDM 517 DETCOM_S MACRO ARG 518 COBJ "detcom:dheader 3.0 S \"\ARG\" \"Loop type \"Nested\"/\"Tip/Tilt\"/\"Single\"\"" 519 ENDM 520 DETCOM_T MACRO ARG 521 COBJ "detcom:dheader 5.0 T \"\ARG\" \"Optimized loop control True/False\"" 522 ENDM 523 DETCOM_T MACRO ARG 524 COBJ "detcom:dheader 6.0 T \"\ARG\" \"WFS optical gain\"" 525 ENDM 526 DETCOM_T MACRO ARG 527 COBJ "detcom:dheader 2.0 T \"\ARG\" \"Total flux count on WFS\"" 528 ENDM 529 DETCOM_S MACRO ARG 530 COBJ "detcom:dheader 1.0 S \"\ARG\" \"AOB ADC position In/Out\"" 531 ENDM 532 DETCOM_D MACRO ARG 533 COBJ "detcom:dheader 4.0 D \"\ARG\" \"Beam splitter ID\"" 534 ENDM 535 DETCOM_P MACRO ARG 536 COBJ "detcom:dheader 5.0 P \"\ARG\" \"Beam splitter description\"" 537 ENDM 538 DETCOM_E MACRO ARG 539 COBJ "detcom:dheader 6.0 E \"\ARG\" \"AOB mirror slide \"F/20\"/\"F/8\"\"" 540 ENDM 541 DETCOM_D MACRO ARG 542 COBJ "detcom:dheader 7.0 D \"\ARG\" \"WFS ND filter position\"" 543 ENDM 544 DETCOM_N MACRO ARG 545 COBJ "detcom:dheader 0.0 N \"\ARG\" \"flatfield lamp status ON/OFF\"" 546 ENDM 547 DETCOM_P MACRO ARG 548 COBJ "detcom:dheader 1.0 P \"\ARG\" \"flatfield lamp intensity\"" 549 ENDM 550 DETCOM_N MACRO ARG 551 COBJ "detcom:dheader 0.0 N \"\ARG\" \"comparison lamp 0 status ON/OFF\"" 552 ENDM 553 DETCOM_0 MACRO ARG 554 COBJ "detcom:dheader 0.1 0 \"\ARG\" \"comparison lamp 0 description\"" 555 ENDM 556 DETCOM_N MACRO ARG 557 COBJ "detcom:dheader 1.0 N \"\ARG\" \"comparison lamp 1 status ON/OFF\"" 558 ENDM 559 DETCOM_1 MACRO ARG 560 COBJ "detcom:dheader 1.1 1 \"\ARG\" \"comparison lamp 1 description\"" 561 ENDM 562 DETCOM_N MACRO ARG 563 COBJ "detcom:dheader 2.0 N \"\ARG\" \"comparison lamp 2 status ON/OFF\"" 564 ENDM 565 DETCOM_2 MACRO ARG 566 COBJ "detcom:dheader 2.1 2 \"\ARG\" \"comparison lamp 2 description\"" 567 ENDM 568 DETCOM_N MACRO ARG 569 COBJ "detcom:dheader 3.0 N \"\ARG\" \"comparison lamp 3 status ON/OFF\"" 570 ENDM 571 DETCOM_3 MACRO ARG 572 COBJ "detcom:dheader 3.1 3 \"\ARG\" \"comparison lamp 3 description\"" 573 ENDM 574 DETCOM_0 MACRO ARG 575 COBJ "detcom:dheader 0.0 0 \"\ARG\" \"lamp 0 ON/OFF\"" 576 ENDM 577 DETCOM_1 MACRO ARG 578 COBJ "detcom:dheader 1.0 1 \"\ARG\" \"lamp 1 ON/OFF\"" 579 ENDM 580 DETCOM_2 MACRO ARG 581 COBJ "detcom:dheader 2.0 2 \"\ARG\" \"lamp 2 ON/OFF\"" 582 ENDM 583 DETCOM_3 MACRO ARG 584 COBJ "detcom:dheader 3.0 3 \"\ARG\" \"lamp 3 ON/OFF\"" 585 ENDM 586 DETCOM_4 MACRO ARG 587 COBJ "detcom:dheader 4.0 4 \"\ARG\" \"lamp 4 ON/OFF\"" 588 ENDM 589 DETCOM_5 MACRO ARG 590 COBJ "detcom:dheader 5.0 5 \"\ARG\" \"lamp 5 ON/OFF\"" 591 ENDM 592 DETCOM_6 MACRO ARG 593 COBJ "detcom:dheader 6.0 6 \"\ARG\" \"lamp 6 ON/OFF\"" 594 ENDM 595 DETCOM_7 MACRO ARG 596 COBJ "detcom:dheader 7.0 7 \"\ARG\" \"lamp 7 ON/OFF\"" 597 ENDM 598 DETCOM_8 MACRO ARG 599 COBJ "detcom:dheader 8.0 8 \"\ARG\" \"lamp 8 ON/OFF\"" 600 ENDM 601 DETCOM_9 MACRO ARG 602 COBJ "detcom:dheader 9.0 9 \"\ARG\" \"lamp 9 ON/OFF\"" 603 ENDM 604 DETCOM_D MACRO ARG 605 COBJ "detcom:dheader 0.1 D \"\ARG\" \"wheel position\"" 606 ENDM 607 DETCOM_R MACRO ARG 608 COBJ "detcom:dheader 0.2 R \"\ARG\" \"description of filter\"" 609 ENDM 610 DETCOM_3 MACRO ARG 611 COBJ "detcom:dheader 0.3 3 \"\ARG\" \"filter bandwidth\"" 612 ENDM 613 DETCOM_3 MACRO ARG 614 COBJ "detcom:dheader 0.4 3 \"\ARG\" \"filter wavelength\"" 615 ENDM 616 DETCOM_5 MACRO ARG 617 COBJ "detcom:dheader 0.5 5 \"\ARG\" \"lower bound of filter (units/%?)\"" 618 ENDM 619 DETCOM_5 MACRO ARG 620 COBJ "detcom:dheader 0.6 5 \"\ARG\" \"upper bound of filter (units/%?)\"" 621 ENDM 622 DETCOM_D MACRO ARG 623 COBJ "detcom:dheader 0.7 D \"\ARG\" \"filter drawer number\"" 624 ENDM 625 DETCOM_D MACRO ARG 626 COBJ "detcom:dheader 0.1 D \"\ARG\" \"'wheel' A position\"" 627 ENDM 628 DETCOM_E MACRO ARG 629 COBJ "detcom:dheader 0.2 E \"\ARG\" \"description of filter\"" 630 ENDM 631 DETCOM_4 MACRO ARG 632 COBJ "detcom:dheader 0.5 4 \"\ARG\" \"lower bound of filter A (units/%?)\"" 633 ENDM 634 DETCOM_4 MACRO ARG 635 COBJ "detcom:dheader 0.6 4 \"\ARG\" \"upper bound of filter A (units/%?)\"" 636 ENDM 637 DETCOM_D MACRO ARG 638 COBJ "detcom:dheader 0.1 D \"\ARG\" \"'wheel' B position\"" 639 ENDM 640 DETCOM_E MACRO ARG 641 COBJ "detcom:dheader 0.2 E \"\ARG\" \"description of filter\"" 642 ENDM 643 DETCOM_4 MACRO ARG 644 COBJ "detcom:dheader 0.5 4 \"\ARG\" \"lower bound of filter B (units/%?)\"" 645 ENDM 646 DETCOM_4 MACRO ARG 647 COBJ "detcom:dheader 0.6 4 \"\ARG\" \"upper bound of filter B (units/%?)\"" 648 ENDM 649 DETCOM_7 MACRO ARG 650 COBJ "detcom:dheader 1.0 7 \"\ARG\" \"internal instrument focus value\"" 651 ENDM 652 DETCOM_D MACRO ARG 653 COBJ "detcom:dheader 1.0 D \"\ARG\" \"grism position\"" 654 ENDM 655 DETCOM_M MACRO ARG 656 COBJ "detcom:dheader 2.0 M \"\ARG\" \"grism description\"" 657 ENDM 658 DETCOM_D MACRO ARG 659 COBJ "detcom:dheader 3.0 D \"\ARG\" \"grism drawer number\"" 660 ENDM 661 DETCOM_D MACRO ARG 662 COBJ "detcom:dheader 1.0 D \"\ARG\" \"mask position\"" 663 ENDM 664 DETCOM_K MACRO ARG 665 COBJ "detcom:dheader 2.0 K \"\ARG\" \"mask description\"" 666 ENDM 667 DETCOM_D MACRO ARG 668 COBJ "detcom:dheader 3.0 D \"\ARG\" \"mask slider number\"" 669 ENDM 670 DETCOM_L MACRO ARG 671 COBJ "detcom:dheader 1.0 L \"\ARG\" \"grating description\"" 672 ENDM 673 DETCOM_S MACRO ARG 674 COBJ "detcom:dheader 2.0 S \"\ARG\" \"dispersion axis (1 or 2)\"" 675 ENDM 676 DETCOM_6 MACRO ARG 677 COBJ "detcom:dheader 3.0 6 \"\ARG\" \"grating angle in degrees\"" 678 ENDM 679 DETCOM_0 MACRO ARG 680 COBJ "detcom:dheader 4.0 0 \"\ARG\" \"central wavelength in angstroms\"" 681 ENDM 682 DETCOM_R MACRO ARG 683 COBJ "detcom:dheader 5.0 R \"\ARG\" \"spectral order\"" 684 ENDM 685 DETCOM_5 MACRO ARG 686 COBJ "detcom:dheader 6.0 5 \"\ARG\" \"grating setup constant in degrees\"" 687 ENDM 688 DETCOM_7 MACRO ARG 689 COBJ "detcom:dheader 7.0 7 \"\ARG\" \"setup const in degrees (opening angle / 2)\"" 690 ENDM 691 DETCOM_5 MACRO ARG 692 COBJ "detcom:dheader 8.0 5 \"\ARG\" \"rel.angle between prisms in degrees\"" 693 ENDM 694 DETCOM_R MACRO ARG 695 COBJ "detcom:dheader 0.0 R \"\ARG\" \"image slicer in place\"" 696 ENDM 697 DETCOM_A MACRO ARG 698 COBJ "detcom:dheader 1.0 A \"\ARG\" \"hartman mask 1a position OPEN/CLOSED\"" 699 ENDM 700 DETCOM_B MACRO ARG 701 COBJ "detcom:dheader 1.1 B \"\ARG\" \"hartman mask 1b position OPEN/CLOSED\"" 702 ENDM 703 DETCOM_2 MACRO ARG 704 COBJ "detcom:dheader 2.0 2 \"\ARG\" \"hartman mask 2 position OPEN/CLOSED\"" 705 ENDM 706 DETCOM_3 MACRO ARG 707 COBJ "detcom:dheader 3.0 3 \"\ARG\" \"hartman mask 3 position OPEN/CLOSED\"" 708 ENDM 709 DETCOM_4 MACRO ARG 710 COBJ "detcom:dheader 4.0 4 \"\ARG\" \"hartman mask 4 position OPEN/CLOSED\"" 711 ENDM 712 DETCOM_N MACRO ARG 713 COBJ "detcom:dheader 0.0 N \"\ARG\" \"coude train color UV/RED/CAFE\"" 714 ENDM 715 DETCOM_R MACRO ARG 716 COBJ "detcom:dheader 0.0 R \"\ARG\" \"exposure meter filter description\"" 717 ENDM 718 DETCOM_S MACRO ARG 719 COBJ "detcom:dheader 1.0 S \"\ARG\" \"exposure meter counts at end\"" 720 ENDM 721 DETCOM_M MACRO ARG 722 COBJ "detcom:dheader 2.0 M \"\ARG\" \"mid-exposure time (seconds)\"" 723 ENDM 724 DETCOM_E MACRO ARG 725 COBJ "detcom:dheader 0.0 E \"\ARG\" \"CAFE is being used Null/INUSE\"" 726 ENDM 727 DETCOM_T MACRO ARG 728 COBJ "detcom:dheader 1.0 T \"\ARG\" \"fabry perot etalon description\"" 729 ENDM 730 DETCOM_N MACRO ARG 731 COBJ "detcom:dheader 3.0 N \"\ARG\" \"number of channels per scan\"" 732 ENDM 733 DETCOM_N MACRO ARG 734 COBJ "detcom:dheader 4.0 N \"\ARG\" \"current channel\"" 735 ENDM 736 DETCOM_L MACRO ARG 737 COBJ "detcom:dheader 5.0 L \"\ARG\" \"binary control value\"" 738 ENDM 739 DETCOM_S MACRO ARG 740 COBJ "detcom:dheader 0.0 S \"\ARG\" \"GriF position of FP carriage - In/Out\"" 741 ENDM 742 DETCOM_6 MACRO ARG 743 COBJ "detcom:dheader 1.1 6 \"\ARG\" \"GriF wavelength of order used to scan\"" 744 ENDM 745 DETCOM_6 MACRO ARG 746 COBJ "detcom:dheader 1.2 6 \"\ARG\" \"GriF wavelength of calibration spectral line\"" 747 ENDM 748 DETCOM_6 MACRO ARG 749 COBJ "detcom:dheader 1.3 6 \"\ARG\" \"GriF BCV at calibration line\"" 750 ENDM 751 DETCOM_Y MACRO ARG 752 COBJ "detcom:dheader 2.0 Y \"\ARG\" \"GriF type of scan - bcv, wave, velocity\"" 753 ENDM 754 DETCOM_6 MACRO ARG 755 COBJ "detcom:dheader 3.1 6 \"\ARG\" \"GriF wavelength at beginning of scan\"" 756 ENDM 757 DETCOM_6 MACRO ARG 758 COBJ "detcom:dheader 3.2 6 \"\ARG\" \"GriF wavelength step\"" 759 ENDM 760 DETCOM_6 MACRO ARG 761 COBJ "detcom:dheader 3.3 6 \"\ARG\" \"GriF current observed wavelength\"" 762 ENDM 763 DETCOM_6 MACRO ARG 764 COBJ "detcom:dheader 4.1 6 \"\ARG\" \"GriF Binary Contol Value at beginning of scan\"" 765 ENDM 766 DETCOM_6 MACRO ARG 767 COBJ "detcom:dheader 4.2 6 \"\ARG\" \"GriF BCV step\"" 768 ENDM 769 DETCOM_R MACRO ARG 770 COBJ "detcom:dheader 4.3 R \"\ARG\" \"GriF applied BCV\"" 771 ENDM 772 DETCOM_N MACRO ARG 773 COBJ "detcom:dheader 5.1 N \"\ARG\" \"GriF number of channels in scan\"" 774 ENDM 775 DETCOM_H MACRO ARG 776 COBJ "detcom:dheader 5.2 H \"\ARG\" \"GriF current channel\"" 777 ENDM 778 DETCOM_X MACRO ARG 779 COBJ "detcom:dheader 6.1 X \"\ARG\" \"GriF X Binary Control Value FP\"" 780 ENDM 781 DETCOM_Y MACRO ARG 782 COBJ "detcom:dheader 6.2 Y \"\ARG\" \"GriF Y Binary Control Value FP\"" 783 ENDM 784 DETCOM_D MACRO ARG 785 COBJ "detcom:dheader 1.0 D \"\ARG\" \"Elixir camera run ID\"" 786 ENDM -
trunk/ippScripts/scripts/nightly_science.pl
r42253 r42254 1443 1443 diff_queue($date,$target,$filter,$maxFWHM,$pretend); 1444 1444 1445 #Queue up desperate diffs if the conditions are right for them 1445 #Queue up desperate diffs if the conditions are right for them 1446 1446 if ((defined($science_config{$target}{DESPERATE_DIFFS})) && ($science_config{$target}{DESPERATE_DIFFS} == 1)) { 1447 1447 desperate_diff_singles($date,$target,$filter,$maxFWHM,$pretend); … … 1919 1919 1920 1920 } else { 1921 print STDERR "desp_diff_singles: There is a possibility for dirty diffs to be made\n"; 1921 print STDERR "desp_diff_singles: There is a possibility for dirty diffs to be made\n"; 1922 1922 #Consider the case of on-the-fly dirty desperate diffs 1923 1923 #The conditions are: uneven nr of bad quality warps greater than 3, and the most recent observations is more than $desdiffdt hours old 1924 1924 1925 # # Exclude any warps that are not stored in the more general comment_hash.1926 # my @keep_warps = ();1927 # foreach my $this_warp (@{ $warpsBQ }) {1928 # my $this_comment = ${ $this_warp }[3];1929 # my $this_exp_id = ${ $this_warp }[0];1930 # if ((exists($comment_hash{$this_comment}))&&1931 # ($comment_hash{$this_comment} == $this_exp_id)) {1932 # push @keep_warps, $this_warp;1933 # $this_date = ${ $this_warp }[2];1934 # $chunk_name = ${ $this_warp }[6];1935 # }1936 # else {1937 # print STDERR "desp_diff_singles: excluding $this_exp_id for $this_object due to being rejected $this_comment\n";1938 # }1939 # }1940 # @{ $warpsBQ } = @keep_warps;1941 # 1942 # if ($nwarps >= 2) {1943 # #one regular diff has already been made. So, need only one more. Strip a good entry from the array1944 # my $nrem = 0;1945 # my @keep_warps = ();1946 # foreach my $this_warp (@{ $warpsBQ }) {1947 # my $this_comment = ${ $this_warp }[3];1948 # my $this_exp_id = ${ $this_warp }[0];1949 # my $this_fwhm = ${ $this_warp }[7];1950 # if (($nrem <1) && ($this_fwhm <= $maxFWHM)) {1951 # $nrem++;1952 # print STDERR "desp_diff_singles: excluding $this_exp_id for $this_object from dirty desp diffs $this_comment\n";1953 # } else {1954 # push @keep_warps, $this_warp;1955 # }1956 # }1957 # @{ $warpsBQ } = @keep_warps;1958 # }1959 # 1960 # # We are attempting to do the missing diffs, so reverse the list of retained warps.1961 # # Good objects with all visits will be skipped due to the duplicate check.1962 # # Bad objects will have the earliest visit rejected, and the visits repaired in a way that will produce all desired pairs.1963 # @{ $warpsBQ } = reverse @{ $warpsBQ };1964 # 1965 # # Exclude the last entry if we do not have an even number of warps.1966 # if (($#{ $warpsBQ } + 1) % 2 != 0) {1967 # print STDERR "desp_diff_singles: Number of input warps to make dirty diffs is not even for target $target and object $this_object!";1968 # my $rejected_warp = pop @{ $warpsBQ };1969 # my $rejected_exp_id = ${ $rejected_warp }[0];1970 # print STDERR ": Rejecting ${rejected_exp_id} to force visit count.\n";1971 # }1972 # my $nwarpsBQ = ($#{$warpsBQ} + 1);1973 # 1974 # 1975 # if (($nwarpsBQ >= 2) && ($timediff < $desdiffdt)) {1976 # print STDERR "desp_diff_singles: There are potential dirty desperate diffs to be done, but the time criterium is not met.\n";1977 # next;1978 # }1979 # if (($nwarpsBQ <= 1) || ($timediff < $desdiffdt)) {1980 # next;1981 # }1982 # 1983 # while ($#{ $warpsBQ } > -1) {1984 # # The array is sorted in pairs of input/template.1985 # my $template_warp = shift @{ $warpsBQ };1986 # my $input_warp = shift @{ $warpsBQ };1925 # # Exclude any warps that are not stored in the more general comment_hash. 1926 # my @keep_warps = (); 1927 # foreach my $this_warp (@{ $warpsBQ }) { 1928 # my $this_comment = ${ $this_warp }[3]; 1929 # my $this_exp_id = ${ $this_warp }[0]; 1930 # if ((exists($comment_hash{$this_comment}))&& 1931 # ($comment_hash{$this_comment} == $this_exp_id)) { 1932 # push @keep_warps, $this_warp; 1933 # $this_date = ${ $this_warp }[2]; 1934 # $chunk_name = ${ $this_warp }[6]; 1935 # } 1936 # else { 1937 # print STDERR "desp_diff_singles: excluding $this_exp_id for $this_object due to being rejected $this_comment\n"; 1938 # } 1939 # } 1940 # @{ $warpsBQ } = @keep_warps; 1941 # 1942 # if ($nwarps >= 2) { 1943 # #one regular diff has already been made. So, need only one more. Strip a good entry from the array 1944 # my $nrem = 0; 1945 # my @keep_warps = (); 1946 # foreach my $this_warp (@{ $warpsBQ }) { 1947 # my $this_comment = ${ $this_warp }[3]; 1948 # my $this_exp_id = ${ $this_warp }[0]; 1949 # my $this_fwhm = ${ $this_warp }[7]; 1950 # if (($nrem <1) && ($this_fwhm <= $maxFWHM)) { 1951 # $nrem++; 1952 # print STDERR "desp_diff_singles: excluding $this_exp_id for $this_object from dirty desp diffs $this_comment\n"; 1953 # } else { 1954 # push @keep_warps, $this_warp; 1955 # } 1956 # } 1957 # @{ $warpsBQ } = @keep_warps; 1958 # } 1959 # 1960 # # We are attempting to do the missing diffs, so reverse the list of retained warps. 1961 # # Good objects with all visits will be skipped due to the duplicate check. 1962 # # Bad objects will have the earliest visit rejected, and the visits repaired in a way that will produce all desired pairs. 1963 # @{ $warpsBQ } = reverse @{ $warpsBQ }; 1964 # 1965 # # Exclude the last entry if we do not have an even number of warps. 1966 # if (($#{ $warpsBQ } + 1) % 2 != 0) { 1967 # print STDERR "desp_diff_singles: Number of input warps to make dirty diffs is not even for target $target and object $this_object!"; 1968 # my $rejected_warp = pop @{ $warpsBQ }; 1969 # my $rejected_exp_id = ${ $rejected_warp }[0]; 1970 # print STDERR ": Rejecting ${rejected_exp_id} to force visit count.\n"; 1971 # } 1972 # my $nwarpsBQ = ($#{$warpsBQ} + 1); 1973 # 1974 # 1975 # if (($nwarpsBQ >= 2) && ($timediff < $desdiffdt)) { 1976 # print STDERR "desp_diff_singles: There are potential dirty desperate diffs to be done, but the time criterium is not met.\n"; 1977 # next; 1978 # } 1979 # if (($nwarpsBQ <= 1) || ($timediff < $desdiffdt)) { 1980 # next; 1981 # } 1982 # 1983 # while ($#{ $warpsBQ } > -1) { 1984 # # The array is sorted in pairs of input/template. 1985 # my $template_warp = shift @{ $warpsBQ }; 1986 # my $input_warp = shift @{ $warpsBQ }; 1987 1987 # 1988 # my $input_exp_id = ${ $input_warp }[0];1989 # my $input_comment = ${ $input_warp }[3];1990 # 1991 # my $template_exp_id = ${ $template_warp }[0];1992 # my $template_comment = ${ $template_warp }[3];1993 # 1994 # my $input_warp_id = ${ $input_warp }[1];1995 # my $template_warp_id = ${ $template_warp }[1];1996 # 1997 # my $input_warp_state = ${ $input_warp }[4];1998 # my $template_warp_state = ${ $template_warp }[4];1999 # 2000 # my $input_warp_camQuality = ${ $input_warp }[5];2001 # my $template_warp_camQuality = ${ $template_warp }[5];2002 # 2003 # $Npotential++;2004 # 2005 # unless (defined($input_warp_id) && defined($template_warp_id) &&2006 # ($input_warp_state eq 'full')&&($template_warp_state eq 'full')) {2007 # print STDERR "Desp diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n";2008 # if (($input_warp_camQuality == 4007)||($template_warp_camQuality == 4007)) {2009 # # This should now never be reached.2010 # # CZW: Trigger backup plan here? Or simply set up framework?2011 # print STDERR " ...but this is due to a camera stage astrometry quality\n";2012 # $Npotential--;2013 # }2014 # next;2015 # }2016 # 2017 # if (verify_uniqueness_diff($input_warp_id,$template_warp_id,$date,$target) != 0) {2018 # $Nqueued++;2019 # print STDERR "Desp diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";2020 # next;2021 # }2022 # else {2023 # print STDERR "Preparing to dirty diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";2024 # }2025 # 2026 # my $cmd = "$difftool -dbname $dbname -definewarpwarp ";2027 # $cmd .= "-input_label $label -template_label $label -good_frac 0.1 ";2028 # $cmd .= "-backwards "; # Needed because difftool assumes a different date sorting.2029 # $cmd .= "-rerun "; # Needed because we may have some diffs that already use some of the exposures2030 # $cmd .= "-set_workdir $workdir -set_dist_group $dist_group -set_data_group $data_group ";2031 # $cmd .= " -simple -set_label $label -exp_id $input_exp_id -template_exp_id $template_exp_id ";2032 # if (defined($reduction)) {2033 # $cmd .= " -set_reduction $reduction ";2034 # }2035 # 2036 # if (defined($pretend)) {2037 # $cmd .= ' -pretend ';2038 # }2039 # if ($debug == 1) {2040 # $cmd .= ' -pretend ';2041 # print STDERR "desp_diff_singles: $cmd\n";2042 # print STDERR " $input_warp_id $template_warp_id\n";2043 # }2044 # 2045 # if (($debug == 0)&&(!defined($pretend))) {2046 # my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =2047 # run ( command => $cmd, verbose => $verbose );2048 # unless ($success) {2049 # $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);2050 # &my_die("Unable to perform difftool: $error_code", 0,0,$date, $PS_EXIT_SYS_ERROR);2051 # }2052 # $Nqueued++;2053 # }2054 # }1988 # my $input_exp_id = ${ $input_warp }[0]; 1989 # my $input_comment = ${ $input_warp }[3]; 1990 # 1991 # my $template_exp_id = ${ $template_warp }[0]; 1992 # my $template_comment = ${ $template_warp }[3]; 1993 # 1994 # my $input_warp_id = ${ $input_warp }[1]; 1995 # my $template_warp_id = ${ $template_warp }[1]; 1996 # 1997 # my $input_warp_state = ${ $input_warp }[4]; 1998 # my $template_warp_state = ${ $template_warp }[4]; 1999 # 2000 # my $input_warp_camQuality = ${ $input_warp }[5]; 2001 # my $template_warp_camQuality = ${ $template_warp }[5]; 2002 # 2003 # $Npotential++; 2004 # 2005 # unless (defined($input_warp_id) && defined($template_warp_id) && 2006 # ($input_warp_state eq 'full')&&($template_warp_state eq 'full')) { 2007 # print STDERR "Desp diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n"; 2008 # if (($input_warp_camQuality == 4007)||($template_warp_camQuality == 4007)) { 2009 # # This should now never be reached. 2010 # # CZW: Trigger backup plan here? Or simply set up framework? 2011 # print STDERR " ...but this is due to a camera stage astrometry quality\n"; 2012 # $Npotential--; 2013 # } 2014 # next; 2015 # } 2016 # 2017 # if (verify_uniqueness_diff($input_warp_id,$template_warp_id,$date,$target) != 0) { 2018 # $Nqueued++; 2019 # print STDERR "Desp diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n"; 2020 # next; 2021 # } 2022 # else { 2023 # print STDERR "Preparing to dirty diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n"; 2024 # } 2025 # 2026 # my $cmd = "$difftool -dbname $dbname -definewarpwarp "; 2027 # $cmd .= "-input_label $label -template_label $label -good_frac 0.1 "; 2028 # $cmd .= "-backwards "; # Needed because difftool assumes a different date sorting. 2029 # $cmd .= "-rerun "; # Needed because we may have some diffs that already use some of the exposures 2030 # $cmd .= "-set_workdir $workdir -set_dist_group $dist_group -set_data_group $data_group "; 2031 # $cmd .= " -simple -set_label $label -exp_id $input_exp_id -template_exp_id $template_exp_id "; 2032 # if (defined($reduction)) { 2033 # $cmd .= " -set_reduction $reduction "; 2034 # } 2035 # 2036 # if (defined($pretend)) { 2037 # $cmd .= ' -pretend '; 2038 # } 2039 # if ($debug == 1) { 2040 # $cmd .= ' -pretend '; 2041 # print STDERR "desp_diff_singles: $cmd\n"; 2042 # print STDERR " $input_warp_id $template_warp_id\n"; 2043 # } 2044 # 2045 # if (($debug == 0)&&(!defined($pretend))) { 2046 # my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 2047 # run ( command => $cmd, verbose => $verbose ); 2048 # unless ($success) { 2049 # $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR); 2050 # &my_die("Unable to perform difftool: $error_code", 0,0,$date, $PS_EXIT_SYS_ERROR); 2051 # } 2052 # $Nqueued++; 2053 # } 2054 # } 2055 2055 2056 2056 … … 2285 2285 # print STDERR "desp_diff_queue: excluding $this_exp_id for $this_object due to being rejected $this_comment\n"; 2286 2286 # } 2287 # }2288 # @{ $warpsBQ } = @keep_warps;2289 # 2290 # if ($nwarps >= 2) {2291 # #one regular diff has already been made. So, need only one more. Strip a good entry from the array2292 # my $nrem = 0;2293 # my @keep_warps = ();2294 # foreach my $this_warp (@{ $warpsBQ }) {2295 # my $this_comment = ${ $this_warp }[3];2296 # my $this_exp_id = ${ $this_warp }[0];2297 # my $this_fwhm = ${ $this_warp }[7];2298 # if (($nrem <1) && ($this_fwhm <= $maxFWHM)) {2299 # $nrem++;2300 # print STDERR "desp_diff_queue: excluding $this_exp_id for $this_object from dirty desp diffs $this_comment\n";2301 # } else {2302 # push @keep_warps, $this_warp;2303 # }2304 # }2305 # @{ $warpsBQ } = @keep_warps;2306 # }2307 # 2308 # # We are attempting to do the missing diffs, so reverse the list of retained warps.2309 # # Good objects with all visits will be skipped due to the duplicate check.2310 # # Bad objects will have the earliest visit rejected, and the visits repaired in a way that will produce all desired pairs.2311 # @{ $warpsBQ } = reverse @{ $warpsBQ };2312 # 2313 # # Exclude the last entry if we do not have an even number of warps.2314 # if (($#{ $warpsBQ } + 1) % 2 != 0) {2315 # print STDERR "desp_diff_queue: Number of input warps to make dirty diffs is not even for target $target and object $this_object!";2316 # my $rejected_warp = pop @{ $warpsBQ };2317 # my $rejected_exp_id = ${ $rejected_warp }[0];2318 # print STDERR ": Rejecting ${rejected_exp_id} to force visit count.\n";2319 # }2320 # my $nwarpsBQ = ($#{$warpsBQ} + 1);2321 # 2322 # 2323 # while ($#{ $warpsBQ } > -1) {2324 # # The array is sorted in pairs of input/template.2325 # my $template_warp = shift @{ $warpsBQ };2326 # my $input_warp = shift @{ $warpsBQ };2287 # } 2288 # @{ $warpsBQ } = @keep_warps; 2289 # 2290 # if ($nwarps >= 2) { 2291 # #one regular diff has already been made. So, need only one more. Strip a good entry from the array 2292 # my $nrem = 0; 2293 # my @keep_warps = (); 2294 # foreach my $this_warp (@{ $warpsBQ }) { 2295 # my $this_comment = ${ $this_warp }[3]; 2296 # my $this_exp_id = ${ $this_warp }[0]; 2297 # my $this_fwhm = ${ $this_warp }[7]; 2298 # if (($nrem <1) && ($this_fwhm <= $maxFWHM)) { 2299 # $nrem++; 2300 # print STDERR "desp_diff_queue: excluding $this_exp_id for $this_object from dirty desp diffs $this_comment\n"; 2301 # } else { 2302 # push @keep_warps, $this_warp; 2303 # } 2304 # } 2305 # @{ $warpsBQ } = @keep_warps; 2306 # } 2307 # 2308 # # We are attempting to do the missing diffs, so reverse the list of retained warps. 2309 # # Good objects with all visits will be skipped due to the duplicate check. 2310 # # Bad objects will have the earliest visit rejected, and the visits repaired in a way that will produce all desired pairs. 2311 # @{ $warpsBQ } = reverse @{ $warpsBQ }; 2312 # 2313 # # Exclude the last entry if we do not have an even number of warps. 2314 # if (($#{ $warpsBQ } + 1) % 2 != 0) { 2315 # print STDERR "desp_diff_queue: Number of input warps to make dirty diffs is not even for target $target and object $this_object!"; 2316 # my $rejected_warp = pop @{ $warpsBQ }; 2317 # my $rejected_exp_id = ${ $rejected_warp }[0]; 2318 # print STDERR ": Rejecting ${rejected_exp_id} to force visit count.\n"; 2319 # } 2320 # my $nwarpsBQ = ($#{$warpsBQ} + 1); 2321 # 2322 # 2323 # while ($#{ $warpsBQ } > -1) { 2324 # # The array is sorted in pairs of input/template. 2325 # my $template_warp = shift @{ $warpsBQ }; 2326 # my $input_warp = shift @{ $warpsBQ }; 2327 2327 # 2328 # my $input_exp_id = ${ $input_warp }[0];2329 # my $input_comment = ${ $input_warp }[3];2330 # 2331 # my $template_exp_id = ${ $template_warp }[0];2332 # my $template_comment = ${ $template_warp }[3];2333 # 2334 # my $input_warp_id = ${ $input_warp }[1];2335 # my $template_warp_id = ${ $template_warp }[1];2336 # 2337 # my $input_warp_state = ${ $input_warp }[4];2338 # my $template_warp_state = ${ $template_warp }[4];2339 # 2340 # my $input_warp_camQuality = ${ $input_warp }[5];2341 # my $template_warp_camQuality = ${ $template_warp }[5];2342 # 2343 # $Npotential++;2344 # 2345 # unless (defined($input_warp_id) && defined($template_warp_id) &&2346 # ($input_warp_state eq 'full')&&($template_warp_state eq 'full')) {2347 # print STDERR "Desp diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n";2348 # if (($input_warp_camQuality == 4007)||($template_warp_camQuality == 4007)) {2349 # # This should now never be reached.2350 # # CZW: Trigger backup plan here? Or simply set up framework?2351 # print STDERR " ...but this is due to a camera stage astrometry quality\n";2352 # $Npotential--;2353 # }2354 # next;2355 # }2356 # 2357 # if (verify_uniqueness_diff($input_warp_id,$template_warp_id,$date,$target) != 0) {2358 # $Nqueued++;2359 # print STDERR "Desp diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";2360 # next;2361 # }2362 # else {2363 # print STDERR "Preparing to dirty diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";2364 # }2365 # 2366 # my $cmd = "$difftool -dbname $dbname -definewarpwarp ";2367 # $cmd .= "-input_label $label -template_label $label -good_frac 0.1 ";2368 # $cmd .= "-backwards "; # Needed because difftool assumes a different date sorting.2369 # $cmd .= "-rerun "; # Needed because we may have some diffs that already use some of the exposures2370 # $cmd .= "-set_workdir $workdir -set_dist_group $dist_group -set_data_group $data_group ";2371 # $cmd .= " -simple -set_label $label -exp_id $input_exp_id -template_exp_id $template_exp_id ";2372 # if (defined($reduction)) {2373 # $cmd .= " -set_reduction $reduction ";2374 # }2375 # 2376 # if (defined($pretend)) {2377 # $cmd .= ' -pretend ';2378 # }2379 # if ($debug == 1) {2380 # $cmd .= ' -pretend ';2381 # print STDERR "desp_diff_queue: $cmd\n";2382 # print STDERR " $input_warp_id $template_warp_id\n";2383 # }2384 # 2385 # if (($debug == 0)&&(!defined($pretend))) {2386 # my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =2387 # run ( command => $cmd, verbose => $verbose );2388 # unless ($success) {2389 # $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);2390 # &my_die("Unable to perform difftool: $error_code", 0,0,$date, $PS_EXIT_SYS_ERROR);2391 # }2392 # $Nqueued++;2393 # }2394 # }2395 2396 2397 2398 }2328 # my $input_exp_id = ${ $input_warp }[0]; 2329 # my $input_comment = ${ $input_warp }[3]; 2330 # 2331 # my $template_exp_id = ${ $template_warp }[0]; 2332 # my $template_comment = ${ $template_warp }[3]; 2333 # 2334 # my $input_warp_id = ${ $input_warp }[1]; 2335 # my $template_warp_id = ${ $template_warp }[1]; 2336 # 2337 # my $input_warp_state = ${ $input_warp }[4]; 2338 # my $template_warp_state = ${ $template_warp }[4]; 2339 # 2340 # my $input_warp_camQuality = ${ $input_warp }[5]; 2341 # my $template_warp_camQuality = ${ $template_warp }[5]; 2342 # 2343 # $Npotential++; 2344 # 2345 # unless (defined($input_warp_id) && defined($template_warp_id) && 2346 # ($input_warp_state eq 'full')&&($template_warp_state eq 'full')) { 2347 # print STDERR "Desp diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n"; 2348 # if (($input_warp_camQuality == 4007)||($template_warp_camQuality == 4007)) { 2349 # # This should now never be reached. 2350 # # CZW: Trigger backup plan here? Or simply set up framework? 2351 # print STDERR " ...but this is due to a camera stage astrometry quality\n"; 2352 # $Npotential--; 2353 # } 2354 # next; 2355 # } 2356 # 2357 # if (verify_uniqueness_diff($input_warp_id,$template_warp_id,$date,$target) != 0) { 2358 # $Nqueued++; 2359 # print STDERR "Desp diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n"; 2360 # next; 2361 # } 2362 # else { 2363 # print STDERR "Preparing to dirty diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n"; 2364 # } 2365 # 2366 # my $cmd = "$difftool -dbname $dbname -definewarpwarp "; 2367 # $cmd .= "-input_label $label -template_label $label -good_frac 0.1 "; 2368 # $cmd .= "-backwards "; # Needed because difftool assumes a different date sorting. 2369 # $cmd .= "-rerun "; # Needed because we may have some diffs that already use some of the exposures 2370 # $cmd .= "-set_workdir $workdir -set_dist_group $dist_group -set_data_group $data_group "; 2371 # $cmd .= " -simple -set_label $label -exp_id $input_exp_id -template_exp_id $template_exp_id "; 2372 # if (defined($reduction)) { 2373 # $cmd .= " -set_reduction $reduction "; 2374 # } 2375 # 2376 # if (defined($pretend)) { 2377 # $cmd .= ' -pretend '; 2378 # } 2379 # if ($debug == 1) { 2380 # $cmd .= ' -pretend '; 2381 # print STDERR "desp_diff_queue: $cmd\n"; 2382 # print STDERR " $input_warp_id $template_warp_id\n"; 2383 # } 2384 # 2385 # if (($debug == 0)&&(!defined($pretend))) { 2386 # my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 2387 # run ( command => $cmd, verbose => $verbose ); 2388 # unless ($success) { 2389 # $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR); 2390 # &my_die("Unable to perform difftool: $error_code", 0,0,$date, $PS_EXIT_SYS_ERROR); 2391 # } 2392 # $Nqueued++; 2393 # } 2394 # } 2395 2396 2397 2398 } 2399 2399 } 2400 2400 } -
trunk/ippTools/src/pztoolConfig.c
r42253 r42254 171 171 psMetadataAddStr(updatepzexpArgs, PS_LIST_TAIL, "-set_state", 0, "define new state (required)", NULL); 172 172 173 # if (0) 173 174 // -updatesummitexp 174 175 psMetadata *updatesummitexpArgs = psMetadataAlloc(); … … 178 179 psMetadataAddStr(updatesummitexpArgs, PS_LIST_TAIL, "-telescope", 0, "search by telescope (required)", NULL); 179 180 psMetadataAddS32(updatesummitexpArgs, PS_LIST_TAIL, "-set_fault", 0, "define new fault (required)", 0); 181 # endif 180 182 181 183 // -updatenewexp -
trunk/ppViz/src/ppCoord/ppCoord.h
r42253 r42254 14 14 psString rawName; // Filename with raw image (or NULL) 15 15 psString pixelsName; // Filename with pixel coordinates 16 psString fpaName; // Filename with FPA coordinates17 16 psString chipName; // Name of chip of interest 18 17 psString radecName; // Filename with sky coordinates -
trunk/ppViz/src/ppCoord/ppCoordArguments.c
r42253 r42254 49 49 psMetadataAddStr(arguments, PS_LIST_TAIL, "-raw", 0, "Filename with raw data", NULL); 50 50 psMetadataAddStr(arguments, PS_LIST_TAIL, "-pixels", 0, "Filename with pixel coordinates", NULL); 51 psMetadataAddStr(arguments, PS_LIST_TAIL, "-fpa", 0, "Filename with FPA coordinates", NULL);52 51 psMetadataAddStr(arguments, PS_LIST_TAIL, "-chip", 0, "Chip for pixel coordinates", NULL); 53 52 psMetadataAddStr(arguments, PS_LIST_TAIL, "-radec", 0, "Filename with RA,Dec (default decimal degrees)", NULL); … … 67 66 data->rawName = psMemIncrRefCounter(psMetadataLookupStr(NULL, arguments, "-raw")); 68 67 data->pixelsName = psMemIncrRefCounter(psMetadataLookupStr(NULL, arguments, "-pixels")); 69 data->fpaName = psMemIncrRefCounter(psMetadataLookupStr(NULL, arguments, "-fpa"));70 68 data->chipName = psMemIncrRefCounter(psMetadataLookupStr(NULL, arguments, "-chip")); 71 69 data->radecName = psMemIncrRefCounter(psMetadataLookupStr(NULL, arguments, "-radec")); … … 98 96 } 99 97 100 if (!data->pixelsName && !data->radecName && !data-> fpaName && !data->streaksName && !data->clustersName) {101 psError(PS_ERR_BAD_PARAMETER_VALUE, true, "Neither -pixels nor -radec nor -fpaprovided.");98 if (!data->pixelsName && !data->radecName && !data->streaksName && !data->clustersName) { 99 psError(PS_ERR_BAD_PARAMETER_VALUE, true, "Neither -pixels nor -radec provided."); 102 100 return false; 103 101 } -
trunk/ppViz/src/ppCoord/ppCoordData.c
r42253 r42254 16 16 psFree(data->rawName); 17 17 psFree(data->pixelsName); 18 psFree(data->fpaName);19 18 psFree(data->chipName); 20 19 psFree(data->radecName); … … 38 37 data->rawName = NULL; 39 38 data->pixelsName = NULL; 40 data->fpaName = NULL;41 39 data->chipName = NULL; 42 40 data->radecName = NULL; -
trunk/ppViz/src/ppCoord/ppCoordLoop.c
r42253 r42254 79 79 NULL; // File with raw image 80 80 81 psArray *pixels = NULL, *radec = NULL, * fpas = NULL, *streaks = NULL, *clusters = NULL; // Array of coordinate vectors82 psArray *radecOut = NULL, *fpaOut = NULL,*streaksOut = NULL, *clustersOut = NULL; // Output for sky coordinates81 psArray *pixels = NULL, *radec = NULL, *streaks = NULL, *clusters = NULL; // Array of coordinate vectors 82 psArray *radecOut = NULL, *streaksOut = NULL, *clustersOut = NULL; // Output for sky coordinates 83 83 if (data->pixelsName) { 84 84 pixels = psVectorsReadFromFile(data->pixelsName, "%f %f"); … … 107 107 psVectorInit(radecOut->data[1], NAN); 108 108 psVectorInit(radecOut->data[2], NAN); 109 }110 111 if (data->fpaName) {112 fpas = psVectorsReadFromFile(data->fpaName, "%f %f");113 if (!fpas || fpas->n != 2) {114 psError(psErrorCodeLast(), false, "Unable to read FPA coordinates");115 return false;116 }117 psVector *fpa_x = fpas->data[0]; // FPA x coordinates118 long num = fpa_x->n; // Number of coordinates119 fpaOut = psArrayAlloc(6);120 fpaOut->data[0] = psArrayAlloc(num);121 fpaOut->data[1] = psVectorAlloc(num, PS_TYPE_F32);122 fpaOut->data[2] = psVectorAlloc(num, PS_TYPE_F32);123 fpaOut->data[3] = psArrayAlloc(num);124 fpaOut->data[4] = psVectorAlloc(num, PS_TYPE_F32);125 fpaOut->data[5] = psVectorAlloc(num, PS_TYPE_F32);126 psVectorInit(fpaOut->data[1], NAN);127 psVectorInit(fpaOut->data[2], NAN);128 psVectorInit(fpaOut->data[4], NAN);129 psVectorInit(fpaOut->data[5], NAN);130 109 } 131 110 … … 415 394 yTP->data.F32[i] = src.tp.y; 416 395 } 417 }418 419 if (fpas) {420 psVector *fpa_x = fpas->data[0], *fpa_y = fpas->data[1]; // FPA coordinates421 long num = fpa_x->n; // Number of coordinates422 423 int numCols = psMetadataLookupS32(NULL, hdu->header, "IMNAXIS1"); // Number of columns424 int numRows = psMetadataLookupS32(NULL, hdu->header, "IMNAXIS2"); // Number of rows425 if (numCols <= 0 || numRows <= 0) {426 psError(psErrorCodeLast(), false, "Unable to read size of chip.");427 return false;428 }429 430 psArray *chipPix = fpaOut->data[0]; // Chip for pixels431 psVector *xPix = fpaOut->data[1]; // x coordinate for pixels432 psVector *yPix = fpaOut->data[2]; // y coordinate for pixels433 psArray *cellPix = fpaOut->data[3]; // Cell for pixels434 psVector *xCell = fpaOut->data[4]; // x coordinate for cell435 psVector *yCell = fpaOut->data[5]; // y coordinate for cell436 437 psPlane *pix = psPlaneAlloc(); // Pixel coordinates on chip438 psPlane *fp = psPlaneAlloc(); // Focal plane coordinates439 440 for (long i = 0; i < num; i++) {441 float x, y; // Pixel coordinates442 fp->x = fpa_x->data.F32[i];443 fp->y = fpa_y->data.F32[i];444 445 psPlaneTransformApply(pix, chip->fromFPA, fp);446 psTrace("ppCoord",2,"fpa2pix tr1: %f %f\n",pix->x,pix->y);447 448 x = pix->x;449 y = pix->y;450 451 if ((x < 0 || x > numCols || y < 0 || y > numRows)) {452 // Not on this chip453 continue;454 }455 456 chipPix->data[i] = psStringCopy(chipName);457 xPix->data.F32[i] = x;458 yPix->data.F32[i] = y;459 460 if (rawChip) {461 psString cellName = NULL; // Name of cell462 coordChip2Cell(&cellName, &x, &y, x, y, cellNames, cellBounds,463 cellX0, cellY0, cellParityX, cellParityY, cellBinX, cellBinY);464 cellPix->data[i] = cellName;465 xCell->data.F32[i] = x;466 yCell->data.F32[i] = y;467 }468 469 }470 psFree(pix);471 psFree(fp);472 396 } 473 397 … … 632 556 } 633 557 634 if (fpaOut) {635 psArray *chipPix = fpaOut->data[0]; // Chip for pixels636 psVector *xPix = fpaOut->data[1]; // x coordinate for pixels637 psVector *yPix = fpaOut->data[2]; // y coordinate for pixels638 psArray *cellPix = fpaOut->data[3]; // Cell for pixels639 psVector *xCell = fpaOut->data[4]; // x coordinate for pixels640 psVector *yCell = fpaOut->data[5]; // y coordinate for pixels641 psVector *fpa_x = fpas->data[0]; // FPA x coordinate642 psVector *fpa_y = fpas->data[1]; // FPA y coordinate643 644 for (long i = 0; i < chipPix->n; i++) {645 const char *chipName = chipPix->data[i]; // Name of chip646 const char *cellName = cellPix->data[i]; // Name of cell, or NULL647 if (!data->all && (!isfinite(xPix->data.F32[i]) || !isfinite(yPix->data.F32[i]) ||648 !chipName || (rawFile && !cellName))) {649 continue;650 }651 if (!rawFile && data->ds9) {652 // Region file is only appropriate if we're not mapping all the way back to cell coordinates653 fprintf(data->ds9, "image;circle(%f,%f,%f) # color=%s\n",654 xPix->data.F32[i], yPix->data.F32[i], data->ds9radius, data->ds9color);655 } else if (rawFile) {656 fprintf(stdout, "%.3f %.3f --> %.3f %.3f %s %.3f %.3f %s\n",657 fpa_x->data.F32[i], fpa_y->data.F32[i], xPix->data.F32[i], yPix->data.F32[i],658 chipName ? chipName : "UNKNOWN",659 xCell->data.F32[i], yCell->data.F32[i],660 cellName ? cellName : "UNKNOWN");661 } else {662 fprintf(stdout, "%.3f %.3f --> %.3f %.3f %s\n",663 fpa_x->data.F32[i], fpa_y->data.F32[i], xPix->data.F32[i], yPix->data.F32[i],664 chipName ? chipName : "UNKNOWN");665 }666 }667 }668 669 558 if (streaksOut) { 670 559 psArray *chipPix1 = streaksOut->data[0]; // Chip for point 1 -
trunk/psphot/src/psphotBlendFit.c
r42253 r42254 264 264 # define TEST_X 653 265 265 # define TEST_Y 466 266 # define TESTING 0266 # define TESTING 1 267 267 int TEST_ON = false; 268 268 if (TESTING && (fabs(source->peak->xf - TEST_X) < 5) && (fabs(source->peak->yf - TEST_Y) < 5)) { 269 269 fprintf (stderr, "test object\n"); 270 //psTraceSetLevel("psLib.math.psMinimizeLMChi2", 5);270 psTraceSetLevel("psLib.math.psMinimizeLMChi2", 5); 271 271 TEST_ON = true; 272 272 } … … 333 333 # if (PS_TRACE_ON) 334 334 if (TEST_ON) { 335 //psTraceSetLevel("psLib.math.psMinimizeLMChi2", 0);335 psTraceSetLevel("psLib.math.psMinimizeLMChi2", 0); 336 336 } 337 337 # endif … … 344 344 # if (PS_TRACE_ON) 345 345 if (TEST_ON) { 346 //psTraceSetLevel("psLib.math.psMinimizeLMChi2", 0);346 psTraceSetLevel("psLib.math.psMinimizeLMChi2", 0); 347 347 } 348 348 # endif -
trunk/psphot/src/psphotExtendedSourceFits.c
r42253 r42254 493 493 if (testObject) { 494 494 fprintf (stderr, "test object @ %f, %f\n", source->peak->xf, source->peak->yf); 495 //psTraceSetLevel ("psModules.objects.pmPCM_MinimizeChisq", 5);496 //psTraceSetLevel ("psphot.psphotExtendedSourceFits_Threaded", 5);495 psTraceSetLevel ("psModules.objects.pmPCM_MinimizeChisq", 5); 496 psTraceSetLevel ("psphot.psphotExtendedSourceFits_Threaded", 5); 497 497 } 498 498 # endif … … 690 690 # ifdef TEST_OBJECT 691 691 if (testObject) { 692 //psTraceSetLevel ("psModules.objects.pmPCM_MinimizeChisq", 0);693 //psTraceSetLevel ("psphot.psphotExtendedSourceFits_Threaded", 0);692 psTraceSetLevel ("psModules.objects.pmPCM_MinimizeChisq", 0); 693 psTraceSetLevel ("psphot.psphotExtendedSourceFits_Threaded", 0); 694 694 } 695 695 # endif -
trunk/psphot/src/psphotSourceFits.c
r42253 r42254 526 526 } 527 527 if (psTraceGetLevel ("psphot") >= 7) { 528 //psTraceSetLevel("psLib.math.psMinimizeLMChi2", 5);528 psTraceSetLevel("psLib.math.psMinimizeLMChi2", 5); 529 529 } 530 530 # endif … … 557 557 } 558 558 } 559 //psTraceSetLevel("psLib.math.psMinimizeLMChi2", 0);559 psTraceSetLevel("psLib.math.psMinimizeLMChi2", 0); 560 560 # endif 561 561 -
trunk/pswarp/src/pswarpMapGrid.c
r42253 r42254 38 38 int nYpts = (int)(Ny / nYpix) + 1; 39 39 40 psLogMsg("pswarp", 3, "in grid sampling\n");41 40 // create the grid of maps 42 41 pswarpMapGrid *grid = pswarpMapGridAlloc (nXpts, nYpts); … … 50 49 } 51 50 52 //if (0) {51 if (0) { 53 52 // test the transformation sky<->chip for chip in smf: 54 53 if (fout == NULL) { fout = fopen ("map.grid.txt", "w"); } … … 89 88 fprintf (fout, "%f %f < %f %f < %f %f \n", TP1->x, TP1->y, FP1->x, FP1->y, CH1->x, CH1->y); 90 89 91 psLogMsg("pswarp", 3, "testing grid sampling\n");92 psLogMsg("pswarp", 3, "%f %f > %f %f > %f %f > %f %f | ", CH0->x, CH0->y, FP0->x, FP0->y, TP0->x, TP0->y, sky->r*180/M_PI, sky->d*180/M_PI);93 psLogMsg("pswarp", 3, "%f %f < %f %f < %f %f \n", TP1->x, TP1->y, FP1->x, FP1->y, CH1->x, CH1->y);94 95 90 } 96 91 } … … 106 101 107 102 psFree (sky); 108 //}103 } 109 104 110 105 grid->nXpix = nXpix; -
trunk/pswarp/src/pswarpTransformReadout.c
r42253 r42254 104 104 // pswarpMapGridFromImage builds a set of locally-linear maps which convert the 105 105 // output coordinates to input coordinates 106 psLogMsg("pswarp", 3, "going into MapGrid \n");107 106 pswarpMapGrid *grid = pswarpMapGridFromImage(input, output, nGridX, nGridY); 108 107
Note:
See TracChangeset
for help on using the changeset viewer.
