Changeset 4689 for trunk/Ohana/src/opihi/dvo/photometry.c
- Timestamp:
- Jul 31, 2005, 1:04:22 PM (21 years ago)
- File:
-
- 1 edited
-
trunk/Ohana/src/opihi/dvo/photometry.c (modified) (20 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/opihi/dvo/photometry.c
r4681 r4689 329 329 double trange; 330 330 331 if ( N = get_argument (*argc, argv, "-phothelp")) {331 if ((N = get_argument (*argc, argv, "-phothelp"))) { 332 332 fprintf (stderr, "optional photometry selection criteria:\n"); 333 333 fprintf (stderr, " -magrange min max\n"); … … 346 346 /* select based on measured mag (MEASURE ONLY) */ 347 347 MagSelect = FALSE; 348 if ( N = get_argument (*argc, argv, "-magrange")) {348 if ((N = get_argument (*argc, argv, "-magrange"))) { 349 349 MagSelect = TRUE; 350 350 remove_argument (N, argc, argv); … … 357 357 /* select based on instrument mag (MEASURE ONLY) */ 358 358 iMagSelect = FALSE; 359 if ( N = get_argument (*argc, argv, "-imaglim")) {359 if ((N = get_argument (*argc, argv, "-imaglim"))) { 360 360 iMagSelect = TRUE; 361 361 remove_argument (N, argc, argv); … … 366 366 /* select on value of flag (MEASURE ONLY) */ 367 367 FlagSelect = FALSE; 368 if ( N = get_argument (*argc, argv, "-flag")) {368 if ((N = get_argument (*argc, argv, "-flag"))) { 369 369 FlagSelect = TRUE; 370 370 remove_argument (N, argc, argv); … … 375 375 /* select on value of Chisq (AVERAGE ONLY) */ 376 376 for (i = 0; i < 4; i++) ApplySelections[i] = TRUE; 377 if ( N = get_argument (*argc, argv, "-apply")) {377 if ((N = get_argument (*argc, argv, "-apply"))) { 378 378 remove_argument (N, argc, argv); 379 379 if (strlen(argv[N]) != Nparams) { … … 393 393 /* select on value of photcode */ 394 394 PhotcodeSelect = FALSE; 395 if ( N = get_argument (*argc, argv, "-photcode")) {395 if ((N = get_argument (*argc, argv, "-photcode"))) { 396 396 PhotcodeSelect = TRUE; 397 397 remove_argument (N, argc, argv); … … 406 406 /* selection on basis of time range (MEASURE only) */ 407 407 TimeSelect = FALSE; 408 if ( N = get_argument (*argc, argv, "-time")) {408 if ((N = get_argument (*argc, argv, "-time"))) { 409 409 remove_argument (N, argc, argv); 410 410 if (!str_to_time (argv[N], &tzero)) { … … 430 430 /* select by error (on measure or average) */ 431 431 ErrSelect = FALSE; 432 if ( N = get_argument (*argc, argv, "-errorlim")) {432 if ((N = get_argument (*argc, argv, "-errorlim"))) { 433 433 remove_argument (N, argc, argv); 434 434 ErrValue = 1000*atof (argv[N]); … … 439 439 /* select on value of Chisq (AVERAGE ONLY) */ 440 440 ChiSelect = FALSE; 441 if ( N = get_argument (*argc, argv, "-chisq")) {441 if ((N = get_argument (*argc, argv, "-chisq"))) { 442 442 ChiSelect = TRUE; 443 443 remove_argument (N, argc, argv); … … 448 448 /* select on measurement type: 1,2,3 (AVERAGE ONLY) */ 449 449 TypeSelect = FALSE; 450 if ( N = get_argument (*argc, argv, "-type")) {450 if ((N = get_argument (*argc, argv, "-type"))) { 451 451 remove_argument (N, argc, argv); 452 452 TypeValue = atoi (argv[N]); … … 457 457 /* select on measurement type: 1,2,3 (AVERAGE ONLY) */ 458 458 TypefracType = 0; 459 if ( N = get_argument (*argc, argv, "-usetype")) {459 if ((N = get_argument (*argc, argv, "-usetype"))) { 460 460 remove_argument (N, argc, argv); 461 461 TypefracType = atoi (argv[N]); … … 465 465 /* select on measurement type: 1,2,3 (AVERAGE ONLY) */ 466 466 TypefracSelect = FALSE; 467 if ( N = get_argument (*argc, argv, "-typefrac")) {467 if ((N = get_argument (*argc, argv, "-typefrac"))) { 468 468 remove_argument (N, argc, argv); 469 469 TypefracType = atoi (argv[N]); … … 479 479 /* select by number of measurements (AVERAGE ONLY) */ 480 480 NphotSelect = FALSE; 481 if ( N = get_argument (*argc, argv, "-nphot")) {481 if ((N = get_argument (*argc, argv, "-nphot"))) { 482 482 remove_argument (N, argc, argv); 483 483 NphotValue = abs (atoi (argv[N])); … … 491 491 /* select by number of measurements (AVERAGE ONLY) */ 492 492 NcodeSelect = FALSE; 493 if ( N = get_argument (*argc, argv, "-ncode")) {493 if ((N = get_argument (*argc, argv, "-ncode"))) { 494 494 remove_argument (N, argc, argv); 495 495 NcodeValue = abs (atoi (argv[N])); … … 503 503 /* -fwhm value frac (AVERAGE ONLY) */ 504 504 FWHMSelect = FALSE; 505 if ( N = get_argument (*argc, argv, "-fwhm")) {505 if ((N = get_argument (*argc, argv, "-fwhm"))) { 506 506 remove_argument (N, argc, argv); 507 507 FWHMvalue = abs (atof (argv[N])); … … 522 522 double *ExtractMeasures (PhotCode *code, int mode, Average *average, SecFilt *secfilt, Measure *measure, int *nlist, int param) { 523 523 524 int i, k, m, Nlist, NLIST, np, found, Nm; 525 time_t t; 526 double ra, dec, x, y, value, M, fwhm; 527 double *list; 524 int i, Nlist, NLIST; 525 double M, *list; 528 526 529 527 *nlist = 0; … … 552 550 double ExtractAverages (PhotCode *code, int mode, Average *average, SecFilt *secfilt, Measure *measure, int param) { 553 551 554 int i , k, Nm;552 int i; 555 553 double value; 556 554 … … 937 935 938 936 int i, j, Np0, Np1, Nlist, NLIST; 939 double *list, M1, M2, value,NoMag;937 double *list, M1, M2, NoMag; 940 938 941 939 *nlist = 0; … … 1008 1006 double *ExtractMeasuresByDMag (PhotCode **code, int *mode, int use_first, Average *average, SecFilt *secfilt, Measure *measure, int *nlist, int param) { 1009 1007 1010 int i, j, k, n, Nlist, NLIST; 1011 time_t t; 1012 int np, found; 1013 double *list, M1, M2, value; 1008 int i, j, n, Nlist, NLIST; 1009 double *list, M1, M2; 1014 1010 1015 1011 *nlist = 0; … … 1050 1046 double GetMeasure (int param, Average *average, Measure *measure, double mag) { 1051 1047 1052 int m;1053 1048 double ra, dec, x, y; 1054 1049 double value;
Note:
See TracChangeset
for help on using the changeset viewer.
