Changeset 36910
- Timestamp:
- Jun 19, 2014, 8:11:39 AM (12 years ago)
- Location:
- branches/eam_branches/ipp-20140610/Ohana/src
- Files:
-
- 1 added
- 32 edited
-
addstar/src/find_matches.c (modified) (2 diffs)
-
addstar/src/find_matches_closest.c (modified) (2 diffs)
-
getstar/src/select_by_region.c (modified) (2 diffs)
-
getstar/src/write_getstar_ps1_dev_0.c (modified) (3 diffs)
-
getstar/src/write_getstar_ps1_dev_1.c (modified) (3 diffs)
-
getstar/src/write_getstar_ps1_dev_2.c (modified) (3 diffs)
-
libdvo/include/dvo.h (modified) (1 diff)
-
libdvo/src/dbExtractMeasures.c (modified) (1 diff)
-
libdvo/src/dvo_photcode_ops.c (modified) (3 diffs)
-
opihi/dvo/Makefile (modified) (2 diffs)
-
opihi/dvo/avextract.c (modified) (1 diff)
-
opihi/dvo/avmatch.c (modified) (1 diff)
-
opihi/dvo/fitsed.c (modified) (1 diff)
-
opihi/dvo/gstar.c (modified) (1 diff)
-
opihi/dvo/init.c (modified) (2 diffs)
-
opihi/dvo/lcurve.c (modified) (1 diff)
-
opihi/dvo/lightcurve.c (modified) (1 diff)
-
opihi/dvo/photcode_ops.c (added)
-
opihi/dvo/photometry.c (modified) (5 diffs)
-
opihi/dvo/pmeasure.c (modified) (1 diff)
-
opihi/dvo/subpix.c (modified) (1 diff)
-
opihi/include/dvoshell.h (modified) (1 diff)
-
photdbc/src/make_subcatalog.c (modified) (2 diffs)
-
relastro/src/ImageOps.c (modified) (2 diffs)
-
relphot/src/GridOps.c (modified) (3 diffs)
-
relphot/src/ImageOps.c (modified) (1 diff)
-
relphot/src/MosaicOps.c (modified) (2 diffs)
-
relphot/src/StarOps.c (modified) (3 diffs)
-
relphot/src/bcatalog.c (modified) (2 diffs)
-
relphot/src/plot_scatter.c (modified) (1 diff)
-
relphot/src/setMrelCatalog.c (modified) (4 diffs)
-
relphot/src/setMrelFinal.c (modified) (1 diff)
-
uniphot/src/update_catalog_setastrom.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branches/ipp-20140610/Ohana/src/addstar/src/find_matches.c
r36904 r36910 202 202 if (Nsec > -1) { 203 203 if (isnan(catalog[0].secfilt[n*Nsecfilt+Nsec].M)) { 204 catalog[0].secfilt[n*Nsecfilt+Nsec].M = PhotCat (&catalog[0].measure[Nmeas] );204 catalog[0].secfilt[n*Nsecfilt+Nsec].M = PhotCat (&catalog[0].measure[Nmeas], MAG_CLASS_PSF); 205 205 } 206 206 } … … 290 290 /* in UPDATE mode, this value is not saved; use relphot to recalculate */ 291 291 if (Nsec > -1) { 292 catalog[0].secfilt[Nave*Nsecfilt+Nsec].M = PhotCat (&catalog[0].measure[Nmeas] );292 catalog[0].secfilt[Nave*Nsecfilt+Nsec].M = PhotCat (&catalog[0].measure[Nmeas], MAG_CLASS_PSF); 293 293 } 294 294 -
branches/eam_branches/ipp-20140610/Ohana/src/addstar/src/find_matches_closest.c
r36904 r36910 230 230 if (Nsec > -1) { 231 231 if (isnan(catalog[0].secfilt[n*Nsecfilt+Nsec].M)) { 232 catalog[0].secfilt[n*Nsecfilt+Nsec].M = PhotCat (&catalog[0].measure[Nmeas] );232 catalog[0].secfilt[n*Nsecfilt+Nsec].M = PhotCat (&catalog[0].measure[Nmeas], MAG_CLASS_PSF); 233 233 } 234 234 } … … 298 298 /* in UPDATE mode, this value is not saved; use relphot to recalculate */ 299 299 if (Nsec > -1) { 300 catalog[0].secfilt[Nave*Nsecfilt+Nsec].M = PhotCat (&catalog[0].measure[Nmeas] );300 catalog[0].secfilt[Nave*Nsecfilt+Nsec].M = PhotCat (&catalog[0].measure[Nmeas], MAG_CLASS_PSF); 301 301 } 302 302 -
branches/eam_branches/ipp-20140610/Ohana/src/getstar/src/select_by_region.c
r35066 r36910 73 73 for (m = 0; m < catalog[0].average[i].Nmeasure; m++) { 74 74 if (catalog[0].measure[offset + m].photcode == code) { 75 mag = PhotRel (&catalog[0].measure[offset + m], &catalog[0].average[i], &catalog[0].secfilt[i*Nsecfilt] );75 mag = PhotRel (&catalog[0].measure[offset + m], &catalog[0].average[i], &catalog[0].secfilt[i*Nsecfilt], MAG_CLASS_PSF); 76 76 break; 77 77 } … … 126 126 for (m = 0; m < catalog[0].average[i].Nmeasure; m++) { 127 127 if (catalog[0].measure[offset + m].photcode == code) { 128 mag = PhotRel (&catalog[0].measure[offset + m], &catalog[0].average[i], &catalog[0].secfilt[i*Nsecfilt] );128 mag = PhotRel (&catalog[0].measure[offset + m], &catalog[0].average[i], &catalog[0].secfilt[i*Nsecfilt], MAG_CLASS_PSF); 129 129 break; 130 130 } -
branches/eam_branches/ipp-20140610/Ohana/src/getstar/src/write_getstar_ps1_dev_0.c
r21508 r36910 61 61 for (m = 0; m < average[i].Nmeasure; m++) { 62 62 if (measure[offset + m].photcode == code_c0) { 63 output[i].mag = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt] );63 output[i].mag = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt], MAG_CLASS_PSF); 64 64 break; 65 65 } … … 75 75 for (m = 0; m < average[i].Nmeasure; m++) { 76 76 if (measure[offset + m].photcode == code_c1) { 77 output[i].c1 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt] );77 output[i].c1 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt], MAG_CLASS_PSF); 78 78 break; 79 79 } … … 89 89 for (m = 0; m < average[i].Nmeasure; m++) { 90 90 if (measure[offset + m].photcode == code_c2) { 91 output[i].c2 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt] );91 output[i].c2 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt], MAG_CLASS_PSF); 92 92 break; 93 93 } -
branches/eam_branches/ipp-20140610/Ohana/src/getstar/src/write_getstar_ps1_dev_1.c
r21508 r36910 64 64 for (m = 0; m < average[i].Nmeasure; m++) { 65 65 if (measure[offset + m].photcode == code_c0) { 66 output[i].mag = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt] );66 output[i].mag = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt], MAG_CLASS_PSF); 67 67 break; 68 68 } … … 78 78 for (m = 0; m < average[i].Nmeasure; m++) { 79 79 if (measure[offset + m].photcode == code_c1) { 80 output[i].c1 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt] );80 output[i].c1 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt], MAG_CLASS_PSF); 81 81 break; 82 82 } … … 92 92 for (m = 0; m < average[i].Nmeasure; m++) { 93 93 if (measure[offset + m].photcode == code_c2) { 94 output[i].c2 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt] );94 output[i].c2 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt], MAG_CLASS_PSF); 95 95 break; 96 96 } -
branches/eam_branches/ipp-20140610/Ohana/src/getstar/src/write_getstar_ps1_dev_2.c
r21508 r36910 70 70 for (m = 0; m < average[i].Nmeasure; m++) { 71 71 if (measure[offset + m].photcode == code_c0) { 72 output[i].mag = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt] );72 output[i].mag = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt], MAG_CLASS_PSF); 73 73 break; 74 74 } … … 84 84 for (m = 0; m < average[i].Nmeasure; m++) { 85 85 if (measure[offset + m].photcode == code_c1) { 86 output[i].c1 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt] );86 output[i].c1 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt], MAG_CLASS_PSF); 87 87 break; 88 88 } … … 98 98 for (m = 0; m < average[i].Nmeasure; m++) { 99 99 if (measure[offset + m].photcode == code_c2) { 100 output[i].c2 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt] );100 output[i].c2 = PhotRel (&measure[offset + m], &average[i], &secfilt[i*Nsecfilt], MAG_CLASS_PSF); 101 101 break; 102 102 } -
branches/eam_branches/ipp-20140610/Ohana/src/libdvo/include/dvo.h
r36908 r36910 690 690 int PhotColor (Average *average, SecFilt *secfilt, Measure *measure, int c1, int c2, double *color); 691 691 692 float PhotInstTiny (MeasureTiny *measure); 693 float PhotCatTiny (MeasureTiny *measure); 694 float PhotAperTiny (MeasureTiny *measure); 695 float PhotSysTiny (MeasureTiny *measure, AverageTiny *average, SecFilt *secfilt); 696 float PhotRelTiny (MeasureTiny *measure, AverageTiny *average, SecFilt *secfilt); 697 float PhotCalTiny (MeasureTiny *thisone, AverageTiny *average, SecFilt *secfilt, MeasureTiny *measure, PhotCode *code); 698 float PhotAveTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt); 699 float PhotRefTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt, MeasureTiny *measure); 692 float PhotInstTiny (MeasureTiny *measure, dvoMagClassType class); 693 float PhotCatTiny (MeasureTiny *measure, dvoMagClassType class); 694 float PhotSysTiny (MeasureTiny *measure, AverageTiny *average, SecFilt *secfilt, dvoMagClassType class); 695 float PhotRelTiny (MeasureTiny *measure, AverageTiny *average, SecFilt *secfilt, dvoMagClassType class); 696 float PhotCalTiny (MeasureTiny *thisone, AverageTiny *average, SecFilt *secfilt, MeasureTiny *measure, PhotCode *code, dvoMagClassType class); 697 698 float PhotAveTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt, dvoMagClassType class, dvoMagSourceType source); 699 float PhotRefTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt, MeasureTiny *measure, dvoMagClassType class, dvoMagSourceType source); 700 700 701 float PhotXmTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt); 701 702 float PhotdMTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt); -
branches/eam_branches/ipp-20140610/Ohana/src/libdvo/src/dbExtractMeasures.c
r36908 r36910 103 103 PhotCode *myEquiv = GetPhotcodeEquivbyCode (measure[0].photcode); 104 104 105 // if we request mag:ave, use equiv for photcode 105 // if we request mag:ave, use equiv for photcode (ie a given measure, say GPC1.g.XY01, will return g for mag:ave) 106 106 if (field->photcode->type == PHOT_MAG) { 107 107 equiv = myEquiv; -
branches/eam_branches/ipp-20140610/Ohana/src/libdvo/src/dvo_photcode_ops.c
r36908 r36910 615 615 616 616 /* color term may not use DEP magnitude */ 617 // currently only returns the PSF color 617 618 float PhotColorForCode (Average *average, SecFilt *secfilt, Measure *measure, PhotCode *code) { 618 619 … … 834 835 835 836 /******** alternate photometry conversion functions using MeasureTiny and AverageTiny *********/ 836 float PhotInstTiny (MeasureTiny *measure) { 837 838 int Np; 839 float M; 840 841 Np = photcodes[0].hashcode[measure[0].photcode]; 837 float PhotInstTiny (MeasureTiny *measure, dvoMagClassType class) { 838 839 int Np = photcodes[0].hashcode[measure[0].photcode]; 842 840 if (Np == -1) return (NAN); 843 844 if (photcodes[0].code[Np].type == PHOT_REF) { 845 M = measure[0].M; 846 return (M); 847 } 848 849 M = measure[0].M - measure[0].dt - ZERO_POINT; 850 851 return (M); 852 853 } 854 855 float PhotCatTiny (MeasureTiny *measure) { 856 857 int Np; 858 float Mcat; 859 PhotCode *code; 860 861 Np = photcodes[0].hashcode[measure[0].photcode]; 841 PhotCode *code = &photcodes[0].code[Np]; 842 843 float Mraw = NAN; 844 switch (class) { 845 case MAG_CLASS_PSF: 846 Mraw = measure[0].M; 847 break; 848 case MAG_CLASS_KRON: 849 // Mraw = measure[0].Mkron; 850 break; 851 case MAG_CLASS_APER: 852 // Mraw = measure[0].Map; 853 break; 854 default: 855 break; 856 } 857 if (code->type == PHOT_REF) { 858 return (Mraw); 859 } 860 float Minst = Mraw - measure[0].dt - ZERO_POINT; 861 862 return (Minst); 863 } 864 865 float PhotCatTiny (MeasureTiny *measure, dvoMagClassType class) { 866 867 int Np = photcodes[0].hashcode[measure[0].photcode]; 862 868 if (Np == -1) return (NAN); 863 864 if (photcodes[0].code[Np].type == PHOT_REF) { 865 Mcat = measure[0].M; 866 return (Mcat); 867 } 868 code = &photcodes[0].code[Np]; 869 Mcat = measure[0].M - ZERO_POINT + code[0].K*(measure[0].airmass - 1.000) + SCALE*code[0].C; 869 PhotCode *code = &photcodes[0].code[Np]; 870 871 float Mraw = NAN; 872 switch (class) { 873 case MAG_CLASS_PSF: 874 Mraw = measure[0].M; 875 break; 876 case MAG_CLASS_KRON: 877 // Mraw = measure[0].Mkron; 878 break; 879 case MAG_CLASS_APER: 880 // Mraw = measure[0].Map; 881 break; 882 default: 883 break; 884 } 885 if (code->type == PHOT_REF) { 886 return (Mraw); 887 } 888 889 float Mcat = Mraw - ZERO_POINT + code[0].K*(measure[0].airmass - 1.000) + SCALE*code[0].C; 870 890 871 891 return (Mcat); 872 892 } 873 893 874 # if (0) 875 float PhotAperTiny (MeasureTiny *measure) { 876 877 int Np; 878 float Mcat; 879 PhotCode *code; 880 881 Np = photcodes[0].hashcode[measure[0].photcode]; 894 float PhotSysTiny (MeasureTiny *measure, AverageTiny *average, SecFilt *secfilt, dvoMagClassType class) { 895 896 int Np = photcodes[0].hashcode[measure[0].photcode]; 882 897 if (Np == -1) return (NAN); 883 884 if (photcodes[0].code[Np].type == PHOT_REF) { 885 Mcat = measure[0].Map; 886 return (Mcat); 887 } 888 code = &photcodes[0].code[Np]; 889 Mcat = measure[0].Map - ZERO_POINT + code[0].K*(measure[0].airmass - 1.000) + SCALE*code[0].C; 890 891 return (Mcat); 892 } 893 # endif 894 895 float PhotSysTiny (MeasureTiny *measure, AverageTiny *average, SecFilt *secfilt) { 896 897 int i, Np; 898 float Mcat, Mcol, Msys, mc, Mc; 899 PhotCode *code; 900 901 Np = photcodes[0].hashcode[measure[0].photcode]; 902 if (Np == -1) return (NAN); 903 904 if (photcodes[0].code[Np].type == PHOT_REF) { 905 Msys = measure[0].M; 906 return (Msys); 907 } 908 code = &photcodes[0].code[Np]; 909 Mcat = measure[0].M - ZERO_POINT + code[0].K*(measure[0].airmass - 1.000) + SCALE*code[0].C; 898 PhotCode *code = &photcodes[0].code[Np]; 899 900 float Mraw = NAN; 901 switch (class) { 902 case MAG_CLASS_PSF: 903 Mraw = measure[0].M; 904 break; 905 case MAG_CLASS_KRON: 906 // Mraw = measure[0].Mkron; 907 break; 908 case MAG_CLASS_APER: 909 // Mraw = measure[0].Map; 910 break; 911 default: 912 break; 913 } 914 if (code->type == PHOT_REF) { 915 return (Mraw); 916 } 917 float Mcat = Mraw - ZERO_POINT + code[0].K*(measure[0].airmass - 1.000) + SCALE*code[0].C; 910 918 911 919 /* for DEP, color must be made of PRI/SEC */ 912 mc = PhotColorForCodeTiny (average, secfilt, NULL, code);920 float mc = PhotColorForCodeTiny (average, secfilt, NULL, code); 913 921 if (isnan(mc)) return (Mcat); 914 mc = mc - SCALE*code[0].dX; 915 916 Mc = mc; 917 Mcol = 0; 922 mc -= SCALE*code[0].dX; 923 924 int i = 0; 925 double Mc = mc; 926 float Mcol = 0; 918 927 for (i = 0; i < code[0].Nc; i++) { 919 928 Mcol += code[0].X[i]*Mc; 920 929 Mc *= mc; 921 930 } 922 Msys = Mcat + Mcol;931 float Msys = Mcat + Mcol; 923 932 return (Msys); 924 933 } 925 934 926 float PhotRelTiny (MeasureTiny *measure, AverageTiny *average, SecFilt *secfilt) { 927 928 int i, Np; 929 float Mcat, Mcol, Mrel, mc, Mc; 930 PhotCode *code; 931 932 Np = photcodes[0].hashcode[measure[0].photcode]; 935 float PhotRelTiny (MeasureTiny *measure, AverageTiny *average, SecFilt *secfilt, dvoMagClassType class) { 936 937 int Np = photcodes[0].hashcode[measure[0].photcode]; 933 938 if (Np == -1) return (NAN); 934 935 if (photcodes[0].code[Np].type == PHOT_REF) { 936 Mcat = measure[0].M; 937 return (Mcat); 938 } 939 code = &photcodes[0].code[Np]; 940 Mrel = measure[0].M - ZERO_POINT + code[0].K*(measure[0].airmass - 1.000) + SCALE*code[0].C - measure[0].Mcal; 939 PhotCode *code = &photcodes[0].code[Np]; 940 941 float Mraw = NAN; 942 switch (class) { 943 case MAG_CLASS_PSF: 944 Mraw = measure[0].M; 945 break; 946 case MAG_CLASS_KRON: 947 // Mraw = measure[0].Mkron; 948 break; 949 case MAG_CLASS_APER: 950 // Mraw = measure[0].Map; 951 break; 952 default: 953 break; 954 } 955 if (code->type == PHOT_REF) { 956 return (Mraw); 957 } 958 float Mcat = Mraw - ZERO_POINT + code[0].K*(measure[0].airmass - 1.000) + SCALE*code[0].C - measure[0].Mcal; 941 959 942 960 /* for DEP, color must be made of PRI/SEC */ 943 mc = PhotColorForCodeTiny (average, secfilt, NULL, code); 944 if (isnan(mc)) return (Mrel); 945 mc = mc - SCALE*code[0].dX; 946 947 Mc = mc; 948 Mcol = 0; 961 float mc = PhotColorForCodeTiny (average, secfilt, NULL, code); 962 if (isnan(mc)) return (Mcat); 963 mc -= SCALE*code[0].dX; 964 965 double Mc = mc; 966 float Mcol = 0; 967 int i = 0; 968 for (i = 0; i < code[0].Nc; i++) { 969 Mcol += code[0].X[i]*Mc; 970 Mc *= mc; 971 } 972 float Mrel = Mcat + Mcol; 973 return (Mrel); 974 } 975 976 /* return calibrated magnitude from measure for given photcode */ 977 float PhotCalTiny (MeasureTiny *thisone, AverageTiny *average, SecFilt *secfilt, MeasureTiny *measure, PhotCode *code, dvoMagClassType class) { 978 979 int i; 980 981 if (code == NULL) return NAN; 982 983 /* code must be the matching PRI/SEC code for this measurement or an equivalent ALT */ 984 int Np = photcodes[0].hashcode[thisone[0].photcode]; 985 if (Np == -1) return (NAN); 986 PhotCode *myCode = &photcodes[0].code[Np]; 987 988 if (code->code != myCode->equiv) return (NAN); 989 990 // if we are REF type, just get the right version and return 991 if (myCode->type == PHOT_REF) { 992 float Mraw = NAN; 993 switch (class) { 994 case MAG_CLASS_PSF: 995 Mraw = thisone[0].M; 996 break; 997 case MAG_CLASS_KRON: 998 // Mraw = thisone[0].Mkron; 999 break; 1000 case MAG_CLASS_APER: 1001 // Mraw = thisone[0].Map; 1002 break; 1003 default: 1004 break; 1005 } 1006 return (Mraw); 1007 } 1008 1009 float Mcal = PhotRelTiny (thisone, average, secfilt, class) + SCALE*code[0].C; 1010 1011 float mc = PhotColorForCodeTiny (average, secfilt, measure, code); 1012 if (isnan(mc)) return (Mcal); 1013 mc -= SCALE*code[0].dX; 1014 1015 double Mc = mc; 1016 float Mcol = 0; 1017 for (i = 0; i < code[0].Nc; i++) { 1018 Mcol += code[0].X[i]*Mc; 1019 Mc *= mc; 1020 } 1021 Mcal += Mcol; 1022 return (Mcal); 1023 } 1024 1025 /***/ 1026 float PhotAveTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt, dvoMagClassType class, dvoMagSourceType source) { 1027 1028 if (code == NULL) return NAN; 1029 1030 int Ns = photcodes[0].hashNsec[code[0].code]; 1031 if (Ns == -1) return (NAN); 1032 1033 float Mave = NAN; 1034 switch (source) { 1035 case MAG_SRC_CHP: 1036 switch (class) { 1037 case MAG_CLASS_PSF: 1038 Mave = secfilt[Ns].M; 1039 break; 1040 case MAG_CLASS_KRON: 1041 Mave = secfilt[Ns].Mkron; 1042 break; 1043 case MAG_CLASS_APER: 1044 Mave = secfilt[Ns].Map; 1045 break; 1046 default: 1047 break; 1048 } 1049 break; 1050 case MAG_SRC_WRP: 1051 switch (class) { 1052 case MAG_CLASS_PSF: 1053 Mave = secfilt[Ns].MpsfWrp; 1054 break; 1055 case MAG_CLASS_KRON: 1056 Mave = secfilt[Ns].MkronWrp; 1057 break; 1058 case MAG_CLASS_APER: 1059 Mave = secfilt[Ns].MapWrp; 1060 break; 1061 default: 1062 break; 1063 } 1064 break; 1065 case MAG_SRC_STK: 1066 switch (class) { 1067 case MAG_CLASS_PSF: 1068 Mave = secfilt[Ns].MpsfStk; 1069 break; 1070 case MAG_CLASS_KRON: 1071 Mave = secfilt[Ns].MkronStk; 1072 break; 1073 case MAG_CLASS_APER: 1074 Mave = secfilt[Ns].MapStk; 1075 break; 1076 default: 1077 break; 1078 } 1079 break; 1080 default: 1081 break; 1082 } 1083 return (Mave); 1084 } 1085 1086 /* return calibrated magnitude from average/secfilt for given photcode */ 1087 float PhotRefTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt, MeasureTiny *measure, dvoMagClassType class, dvoMagSourceType source) { 1088 1089 int i; 1090 1091 float Mave = PhotAveTiny (code, average, secfilt, class, source); 1092 if (isnan(Mave)) return NAN; 1093 1094 // correct for relative zero-point 1095 float Mref = Mave + SCALE*code[0].C; 1096 1097 float mc = PhotColorForCodeTiny (average, secfilt, measure, code); 1098 if (isnan(mc)) return (Mref); 1099 mc -= SCALE*code[0].dX; 1100 1101 // correct for color terms 1102 double Mc = mc; 1103 float Mcol = 0; 949 1104 for (i = 0; i < code[0].Nc; i++) { 950 1105 Mcol += code[0].X[i]*Mc; 951 1106 Mc *= mc; /* the 0.001 is needed for higher order terms to keep the units mag = mag^n */ 952 1107 } 953 Mrel += Mcol; 954 return (Mrel); 955 } 956 957 /* return calibrated magnitude from measure for given photcode */ 958 float PhotCalTiny (MeasureTiny *thisone, AverageTiny *average, SecFilt *secfilt, MeasureTiny *measure, PhotCode *code) { 959 960 int i, Np; 961 float Mcal, Mrel, Mcol, mc, Mc; 962 963 if (code == NULL) return NAN; 964 965 /* code must be the matching PRI/SEC code for this measurement or an equivalent ALT */ 966 Np = photcodes[0].hashcode[thisone[0].photcode]; 967 if (Np == -1) return (NAN); 968 969 if (photcodes[0].code[Np].type == PHOT_REF) { 970 Mrel = thisone[0].M; 971 return (Mrel); 972 } 973 if (code[0].code != photcodes[0].code[Np].equiv) return (NAN); 974 975 Mcal = PhotRelTiny (thisone, average, secfilt) + SCALE*code[0].C; 976 977 mc = PhotColorForCodeTiny (average, secfilt, measure, code); 978 if (isnan(mc)) return (Mcal); 979 mc = mc - SCALE*code[0].dX; 980 981 Mc = mc; 982 Mcol = 0; 983 for (i = 0; i < code[0].Nc; i++) { 984 Mcol += code[0].X[i]*Mc; 985 Mc *= mc; 986 } 987 Mcal += Mcol; 988 return (Mcal); 1108 Mref += Mcol; 1109 return (Mref); 989 1110 } 990 1111 … … 1037 1158 mc = (isnan(m1) || isnan(m2)) ? NAN : (m1 - m2); 1038 1159 return (mc); 1039 }1040 1041 /* return calibrated magnitude from average/secfilt for given photcode */1042 float PhotRefTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt, MeasureTiny *measure) {1043 1044 int i, Ns;1045 float Mave, Mref, Mcol, mc;1046 double Mc;1047 1048 if (code == NULL) return NAN;1049 1050 Ns = photcodes[0].hashNsec[code[0].code];1051 Mave = (Ns == -1) ? NAN : secfilt[Ns].M;1052 Mref = Mave + SCALE*code[0].C;1053 1054 mc = PhotColorForCodeTiny (average, secfilt, measure, code);1055 if (isnan(mc)) return (Mref);1056 mc = mc - SCALE*code[0].dX;1057 1058 Mc = mc;1059 Mcol = 0;1060 for (i = 0; i < code[0].Nc; i++) {1061 Mcol += code[0].X[i]*Mc;1062 Mc *= mc; /* the 0.001 is needed for higher order terms to keep the units mag = mag^n */1063 }1064 Mref += Mcol;1065 return (Mref);1066 }1067 1068 /***/1069 float PhotAveTiny (PhotCode *code, AverageTiny *average, SecFilt *secfilt) {1070 1071 int Ns;1072 float Mave;1073 1074 if (code == NULL) return NAN;1075 1076 Ns = photcodes[0].hashNsec[code[0].code];1077 Mave = (Ns == -1) ? NAN : secfilt[Ns].M;1078 return (Mave);1079 1160 } 1080 1161 -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/Makefile
r36905 r36910 25 25 $(SRC)/dvo_host_utils.$(ARCH).o \ 26 26 $(SRC)/region_list.$(ARCH).o \ 27 $(SRC)/find_matches.$(ARCH).o \ 28 $(SRC)/photometry.$(ARCH).o 27 $(SRC)/photcode_ops.$(ARCH).o \ 28 $(SRC)/find_matches.$(ARCH).o 29 30 # $(SRC)/photometry.$(ARCH).o 31 32 broken = \ 33 $(SRC)/calextract.$(ARCH).o \ 34 $(SRC)/calmextract.$(ARCH).o \ 35 $(SRC)/ccd.$(ARCH).o \ 36 $(SRC)/cmd.$(ARCH).o \ 37 $(SRC)/dmagaves.$(ARCH).o \ 38 $(SRC)/dmagmeas.$(ARCH).o \ 39 $(SRC)/dmags.$(ARCH).o \ 40 $(SRC)/ddmags.$(ARCH).o \ 41 $(SRC)/fitcolors.$(ARCH).o 29 42 30 43 cmds = \ … … 32 45 $(SRC)/avmatch.$(ARCH).o \ 33 46 $(SRC)/badimages.$(ARCH).o \ 34 $(SRC)/calextract.$(ARCH).o \35 $(SRC)/calmextract.$(ARCH).o \36 47 $(SRC)/catdir.$(ARCH).o \ 37 $(SRC)/ccd.$(ARCH).o \38 48 $(SRC)/cmatch.$(ARCH).o \ 39 $(SRC)/cmd.$(ARCH).o \40 49 $(SRC)/cmpload.$(ARCH).o \ 41 50 $(SRC)/cmpread.$(ARCH).o \ 42 51 $(SRC)/coordimage.$(ARCH).o \ 43 52 $(SRC)/coordmosaic.$(ARCH).o \ 44 $(SRC)/ddmags.$(ARCH).o \45 53 $(SRC)/detrend.$(ARCH).o \ 46 $(SRC)/dmagaves.$(ARCH).o \47 $(SRC)/dmagmeas.$(ARCH).o \48 $(SRC)/dmags.$(ARCH).o \49 54 $(SRC)/dmt.$(ARCH).o \ 50 55 $(SRC)/elixir.$(ARCH).o \ 51 $(SRC)/fitcolors.$(ARCH).o \52 56 $(SRC)/fitsed.$(ARCH).o \ 53 57 $(SRC)/gcat.$(ARCH).o \ -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/avextract.c
r35416 r36910 166 166 needMeasures = FALSE; 167 167 for (i = 0; !needMeasures && (i < Nfields); i++) { 168 if (fields[i].magMode == MAG_NONE) continue; 169 if (fields[i].photcode == NULL) continue; // assert this? 168 if (fields[i].photcode == NULL) continue; // non-measure fields do not have a photcode 170 169 if (fields[i].photcode[0].type == PHOT_REF) needMeasures = TRUE; 171 170 if (fields[i].photcode[0].type == PHOT_DEP) needMeasures = TRUE; -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/avmatch.c
r36084 r36910 152 152 int needMeasures = FALSE; 153 153 for (i = 0; !needMeasures && (i < Nfields); i++) { 154 if (fields[i].magMode == MAG_NONE) continue;155 154 if (fields[i].photcode == NULL) continue; // assert this? 156 155 if (fields[i].photcode[0].type == PHOT_REF) needMeasures = TRUE; -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/fitsed.c
r34088 r36910 83 83 /* interpret command-line options */ 84 84 if ((selection = SetRegionSelection (&argc, argv)) == NULL) goto escape; 85 if (!SetPhotSelections (&argc, argv, 4)) goto usage;85 // if (!SetPhotSelections (&argc, argv, 4)) goto usage; 86 86 87 87 PLOT = FALSE; -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/gstar.c
r36905 r36910 374 374 int Nv = index[j]; 375 375 376 Mcat = PhotCat (&catalog.measure[Nv] );376 Mcat = PhotCat (&catalog.measure[Nv], MAG_CLASS_PSF); 377 377 if (INST) { 378 Mrel = PhotInst (&catalog.measure[Nv] );378 Mrel = PhotInst (&catalog.measure[Nv], MAG_CLASS_PSF); 379 379 } else { 380 Mrel = PhotRel (&catalog.measure[Nv], &catalog.average[k], &catalog.secfilt[k*Nsecfilt] );380 Mrel = PhotRel (&catalog.measure[Nv], &catalog.average[k], &catalog.secfilt[k*Nsecfilt], MAG_CLASS_PSF); 381 381 } 382 382 -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/init.c
r36833 r36910 66 66 {1, "avmatch", avmatch, "extract average data values matched to RA,DEC points"}, 67 67 {1, "badimages", badimages, "look for images with anomalous astrometry"}, 68 {1, "calextract", calextract, "extract photometry calibration"},69 {1, "calmextract", calmextract, "extract photometry calibration"},68 // {1, "calextract", calextract, "extract photometry calibration"}, 69 // {1, "calmextract", calmextract, "extract photometry calibration"}, 70 70 {1, "catdir", catdir_define,"re-define CATDIR"}, 71 {1, "ccd", ccd, "plot color-color diagram"},71 // {1, "ccd", ccd, "plot color-color diagram"}, 72 72 {1, "cmatch", cmatch, "match two catalogs"}, 73 {1, "cmd", cmd, "plot cmd of stars in current region"},73 // {1, "cmd", cmd, "plot cmd of stars in current region"}, 74 74 {1, "cmpload", cmpload, "load cmp file into ?"}, 75 75 {1, "cmpread", cmpread, "read data from cmp format files"}, … … 77 77 {1, "coordmosaic", coordmosaic, "generate a map of the distortion"}, 78 78 {1, "psastro_model", psastro_model, "save psastro-format astrometry model"}, 79 {1, "ddmags", ddmags, "plot magnitude differences"},79 // {1, "ddmags", ddmags, "plot magnitude differences"}, 80 80 {1, "detrend", detrend, "extract from detrend database?"}, 81 {1, "dmagaves", dmagaves, "foo"},82 {1, "dmagmeas", dmagmeas, "foo"},83 {1, "dmags", dmags, "plot differential magnitudes between filters"},81 // {1, "dmagaves", dmagaves, "foo"}, 82 // {1, "dmagmeas", dmagmeas, "foo"}, 83 // {1, "dmags", dmags, "plot differential magnitudes between filters"}, 84 84 {1, "dmt", dmt, "plot mag scatter"}, 85 85 {1, "elixir", elixir, "talk to elixir"}, 86 {1, "fitcolors", fitcolors, "fit chip-to-chip color terms"},86 // {1, "fitcolors", fitcolors, "fit chip-to-chip color terms"}, 87 87 {1, "fitsed", fitsed, "fit stellar SEDs to objects"}, 88 88 {1, "gcat", gcat, "get catalog at location"}, -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/lcurve.c
r34584 r36910 129 129 if (ErrorBars) dYvec.elements.Flt[N] = catalog.measure[m].dM; 130 130 Xvec.elements.Flt[N] = TimeValue (catalog.measure[m].t, TimeReference, TimeFormat); 131 Yvec.elements.Flt[N] = PhotCat (&catalog.measure[m] );131 Yvec.elements.Flt[N] = PhotCat (&catalog.measure[m], MAG_CLASS_PSF); 132 132 /**** need to use PhotRel optionally here ****/ 133 133 N++; -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/lightcurve.c
r27435 r36910 121 121 dmvec[0].elements.Flt[N] = catalog.measure[m].dM; 122 122 if (RELPHOT) { 123 mvec[0].elements.Flt[N] = PhotCat (&catalog.measure[m] );123 mvec[0].elements.Flt[N] = PhotCat (&catalog.measure[m], MAG_CLASS_PSF); 124 124 } else { 125 mvec[0].elements.Flt[N] = PhotRel (&catalog.measure[m], &catalog.average[k], &catalog.secfilt[k*Nsecfilt] );125 mvec[0].elements.Flt[N] = PhotRel (&catalog.measure[m], &catalog.average[k], &catalog.secfilt[k*Nsecfilt], MAG_CLASS_PSF); 126 126 } 127 127 N++; -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/photometry.c
r36905 r36910 41 41 } 42 42 43 # if (0) 43 44 /* selection criteria */ 44 45 /* selections based on Measure quantities */ … … 78 79 static time_t TimeReference; 79 80 static int TimeFormat; 80 81 # endif 82 83 # if (0) 81 84 int GetTimeSelection (time_t *tz, time_t *te) { 82 85 *tz = tzero; … … 298 301 return; 299 302 } 300 301 /* (re)load photcodes from photcode table */ 302 int InitPhotcodes () { 303 304 double ZERO_POINT; 305 char MasterPhotcodeFile[256]; 306 char CatdirPhotcodeFile[256]; 307 char *catdir; 308 309 if (VarConfig ("ZERO_PT", "%lf", &ZERO_POINT) == (char *) NULL) { 310 gprint (GP_ERR, "ZERO_PT undefined in config\n"); 311 return (FALSE); 312 } 313 SetZeroPoint (ZERO_POINT); 314 315 catdir = GetCATDIR(); 316 if (catdir == NULL) { 317 CatdirPhotcodeFile[0] = 0; 318 } else { 319 sprintf (CatdirPhotcodeFile, "%s/Photcodes.dat", catdir); 320 } 321 322 if (VarConfig ("PHOTCODE_FILE", "%s", MasterPhotcodeFile) == (char *) NULL) { 323 gprint (GP_ERR, "PHOTCODE_FILE undefined in config\n"); 324 return (FALSE); 325 } 326 327 // XXX now that DVO does not allow write access, we can drop the MasterPhotcodeFile 328 if (!LoadPhotcodes (CatdirPhotcodeFile, MasterPhotcodeFile, FALSE)) { 329 gprint (GP_ERR, "error loading photcode table %s or master file %s\n", CatdirPhotcodeFile, MasterPhotcodeFile); 330 return (FALSE); 331 } 332 return (TRUE); 333 } 334 303 # endif 304 305 # if (0) 335 306 int ListPhotSelections () { 336 307 … … 1121 1092 return (list); 1122 1093 } 1123 1094 # endif 1095 1096 # if (0) 1124 1097 double GetMeasure (int param, Average *average, Measure *measure, double mag) { 1125 1098 … … 1214 1187 return (value); 1215 1188 } 1189 # endif 1216 1190 1217 1191 /** the mosaic entries do not use the registered mosaic found -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/pmeasure.c
r36905 r36910 203 203 if (TimeSelect && (catalog.measure[m+k].t > tzero + trange)) continue; 204 204 if ((PhotcodeClip != -1) && (catalog.measure[m+k].photcode != PhotcodeClip)) continue; 205 mag = PhotCat (&catalog.measure[m+k] );205 mag = PhotCat (&catalog.measure[m+k], MAG_CLASS_PSF); 206 206 Zvec[Npts] = MIN (1.0, MAX (0.01, (mag - Mz) / Mr)); 207 207 if (LimExclude && (Zvec[Npts] > 0.99)) continue; -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/dvo/subpix.c
r31635 r36910 138 138 for (j = 0; j < Nmeasure; j++) { 139 139 if (measure[j].t == Timage) { 140 Mabs = PhotCat (&measure[j] );140 Mabs = PhotCat (&measure[j], MAG_CLASS_PSF); 141 141 RD_to_XY (&X, &Y, Ra, Dec, &image[I].coords); 142 142 t = TimeValue (measure[j].t, TimeReference, TimeFormat); -
branches/eam_branches/ipp-20140610/Ohana/src/opihi/include/dvoshell.h
r35416 r36910 90 90 int wordhash PROTO((char *word)); 91 91 92 int GetMagMode PROTO((char *string));93 PhotCode *ParsePhotcodeField PROTO((char *field, int *mode, int def));94 int ParseMeasureField PROTO((dbField *field, char *fieldName));95 int ParseAverageField PROTO((dbField *field, char *fieldName));96 int ParseImageField PROTO((dbField *field, char *fieldName));97 98 dbValue dbExtractMeasures PROTO((Average *average, SecFilt *secfilt, Measure *measure, dbField *field));99 dbValue dbExtractImages PROTO((Image *image, off_t Nimage, off_t N, dbField *field));100 101 92 int HostTableLaunchJobs PROTO((SkyList *sky, HostTable *table, char *basecmd, char *options, int VERBOSE)); 102 93 int HostTableParallelOps PROTO((SkyList *sky, int argc, char **argv, char *ResultFile, int ReadVectors, int Nelements, int VERBOSE)); -
branches/eam_branches/ipp-20140610/Ohana/src/photdbc/src/make_subcatalog.c
r36833 r36910 123 123 // select measurements by mag limit -- drop exactly this measurement 124 124 if (ExcludeByInstMag) { 125 mag = PhotInst (&catalog[0].measure[offset] );125 mag = PhotInst (&catalog[0].measure[offset], MAG_CLASS_PSF); 126 126 if (mag < INST_MAG_MIN) continue; 127 127 if (mag > INST_MAG_MAX) continue; … … 135 135 // check measurements for this object -- drop object if no measurements pass 136 136 if (ExcludeByMaxMinMag) { 137 mag = PhotSys (&catalog[0].measure[offset], &catalog[0].average[i], &catalog[0].secfilt[i*Nsecfilt] );137 mag = PhotSys (&catalog[0].measure[offset], &catalog[0].average[i], &catalog[0].secfilt[i*Nsecfilt], MAG_CLASS_PSF); 138 138 minMag = MIN (minMag, mag); 139 139 } -
branches/eam_branches/ipp-20140610/Ohana/src/relastro/src/ImageOps.c
r36905 r36910 1120 1120 /* select measurements by mag limit */ 1121 1121 if (ImagSelect) { 1122 mag = PhotInstTiny (measure );1122 mag = PhotInstTiny (measure, MAG_CLASS_PSF); 1123 1123 if (mag < ImagMin || mag > ImagMax) return FALSE; 1124 1124 } … … 1187 1187 /* select measurements by mag limit */ 1188 1188 if (ImagSelect) { 1189 mag = PhotInst (measure );1189 mag = PhotInst (measure, MAG_CLASS_PSF); 1190 1190 if (mag < ImagMin || mag > ImagMax) return FALSE; 1191 1191 } -
branches/eam_branches/ipp-20140610/Ohana/src/relphot/src/GridOps.c
r34088 r36910 414 414 // select the color- and airmass-corrected observed magnitude for this star 415 415 // XXX need to be able to turn off the color-correction until initial average mags are found 416 Msys = PhotCatTiny (&catalog[c].measureT[m] );416 Msys = PhotCatTiny (&catalog[c].measureT[m], MAG_CLASS_PSF); 417 417 if (isnan(Msys)) { 418 418 Nsys++; … … 573 573 574 574 n = catalog[c].measureT[m].averef; 575 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt] );575 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt], MAG_CLASS_PSF); 576 576 if (isnan(Msys)) { 577 577 Nsys++; … … 651 651 652 652 n = catalog[c].measureT[m].averef; 653 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt] );653 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt], MAG_CLASS_PSF); 654 654 655 655 xlist[N] = Xmeas[c][m]; -
branches/eam_branches/ipp-20140610/Ohana/src/relphot/src/ImageOps.c
r36630 r36910 608 608 609 609 n = catalog[c].measureT[m].averef; 610 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt] );610 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt], MAG_CLASS_PSF); 611 611 if (isnan(Msys)) { 612 612 Nsys++; -
branches/eam_branches/ipp-20140610/Ohana/src/relphot/src/MosaicOps.c
r36903 r36910 1127 1127 1128 1128 off_t n = catalog[c].measureT[m].averef; 1129 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt] );1129 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt], MAG_CLASS_PSF); 1130 1130 1131 1131 float delta = Msys - Mrel - Mcal - Mgrid + Mflat; … … 1164 1164 1165 1165 off_t n = catalog[c].measureT[m].averef; 1166 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt] );1166 Msys = PhotSysTiny (&catalog[c].measureT[m], &catalog[c].averageT[n], &catalog[c].secfilt[n*Nsecfilt], MAG_CLASS_PSF); 1167 1167 if (isnan(Msys)) { 1168 1168 info->Nsys++; -
branches/eam_branches/ipp-20140610/Ohana/src/relphot/src/StarOps.c
r36630 r36910 467 467 468 468 // skip some absurd values NAN, < 0.0, > 30.0 469 Msys = PhotSysTiny (&catalog[Nc].measureT[m], &catalog[Nc].averageT[j], &catalog[Nc].secfilt[j*Nsecfilt] );469 Msys = PhotSysTiny (&catalog[Nc].measureT[m], &catalog[Nc].averageT[j], &catalog[Nc].secfilt[j*Nsecfilt], MAG_CLASS_PSF); 470 470 if (isnan(Msys)) SKIP_THIS_MEAS(Nsys); 471 471 if (Msys < 0.0) SKIP_THIS_MEAS(Nsys); … … 1093 1093 if (isnan(Mgrid)) { Ngrid ++; continue; } 1094 1094 1095 Msys = PhotSysTiny (&catalog[i].measureT[m], &catalog[i].averageT[j], &catalog[i].secfilt[j*Nsecfilt] );1095 Msys = PhotSysTiny (&catalog[i].measureT[m], &catalog[i].averageT[j], &catalog[i].secfilt[j*Nsecfilt], MAG_CLASS_PSF); 1096 1096 list[N] = Msys - Mcal - Mmos - Mgrid; 1097 1097 dlist[N] = MAX (catalog[i].measureT[m].dM, MIN_ERROR); … … 1138 1138 if (isnan(Mgrid)) continue; 1139 1139 1140 Msys = PhotSysTiny (&catalog[i].measureT[m], &catalog[i].averageT[j], &catalog[i].secfilt[j*Nsecfilt] );1140 Msys = PhotSysTiny (&catalog[i].measureT[m], &catalog[i].averageT[j], &catalog[i].secfilt[j*Nsecfilt], MAG_CLASS_PSF); 1141 1141 list[N] = Msys - Mcal - Mmos - Mgrid; 1142 1142 dlist[N] = MAX (catalog[i].measureT[m].dM, MIN_ERROR); -
branches/eam_branches/ipp-20140610/Ohana/src/relphot/src/bcatalog.c
r36903 r36910 143 143 144 144 /* select measurements by mag limit */ 145 mag = PhotCat (&catalog[0].measure[offset] );145 mag = PhotCat (&catalog[0].measure[offset], MAG_CLASS_PSF); 146 146 if (mag > MAG_LIM) { Nmag ++; continue; } 147 147 … … 151 151 /* select measurements by mag limit */ 152 152 if (ImagSelect) { 153 mag = PhotInst (&catalog[0].measure[offset] );153 mag = PhotInst (&catalog[0].measure[offset], MAG_CLASS_PSF); 154 154 if (mag < ImagMin) { Nimag ++; continue; } 155 155 if (mag > ImagMax) { Nimag ++; continue; } -
branches/eam_branches/ipp-20140610/Ohana/src/relphot/src/plot_scatter.c
r35759 r36910 51 51 52 52 xlist[N] = Mrel; 53 ylist[N] = PhotSysTiny (&catalog[i].measureT[m], &catalog[i].averageT[j], &catalog[i].secfilt[j*Nsecfilt] ) - Mcal - Mmos - Mgrid - Mrel;54 ilist[N] = PhotInstTiny (&catalog[i].measureT[m] );53 ylist[N] = PhotSysTiny (&catalog[i].measureT[m], &catalog[i].averageT[j], &catalog[i].secfilt[j*Nsecfilt], MAG_CLASS_PSF) - Mcal - Mmos - Mgrid - Mrel; 54 ilist[N] = PhotInstTiny (&catalog[i].measureT[m], MAG_CLASS_PSF); 55 55 N++; 56 56 } -
branches/eam_branches/ipp-20140610/Ohana/src/relphot/src/setMrelCatalog.c
r36903 r36910 166 166 167 167 // skip some absurd values NAN, < 0.0, > 30.0 168 Msys = PhotSysTiny (&measureT[k], &averageT[0], &secfilt[0] );168 Msys = PhotSysTiny (&measureT[k], &averageT[0], &secfilt[0], MAG_CLASS_PSF); 169 169 if (isnan(Msys)) SKIP_THIS_MEAS(Nsys); 170 170 if (Msys < 0.0) SKIP_THIS_MEAS(Nsys); … … 255 255 256 256 // Map (Maplist) and Mkron (Mkronlist,dkronlist) are used to calculate mean mags per filter 257 float Map = Phot AperCat (&measure[k]);257 float Map = PhotCat (&measure[k], MAG_CLASS_APER); 258 258 if (!isnan(Map)) { 259 259 Maplist[Nap] = Map - Mcal - Mmos - Mgrid; … … 263 263 } 264 264 265 float Mkron = Phot KronCat (&measure[k]);265 float Mkron = PhotCat (&measure[k], MAG_CLASS_KRON); 266 266 if (!isnan(Mkron)) { 267 267 Mkronlist[Nkron] = Mkron - Mcal - Mmos - Mgrid; … … 493 493 if (isnan(Mgrid)) SKIP_THIS_MEAS_STACK(Ngrid); 494 494 495 Msys = PhotSys (&measure[k], &average[0], &secfilt[0] );495 Msys = PhotSys (&measure[k], &average[0], &secfilt[0], MAG_CLASS_PSF); 496 496 if (isnan(Msys)) SKIP_THIS_MEAS_STACK(Nsys); 497 497 -
branches/eam_branches/ipp-20140610/Ohana/src/relphot/src/setMrelFinal.c
r35759 r36910 229 229 if ((pass < 4) && ImagSelect) { 230 230 if (Nim > -1) { 231 mag = PhotInst (&catalog[0].measure[m] );231 mag = PhotInst (&catalog[0].measure[m], MAG_CLASS_PSF); 232 232 if (mag < ImagMin) goto skip; 233 233 if (mag > ImagMax) goto skip; -
branches/eam_branches/ipp-20140610/Ohana/src/uniphot/src/update_catalog_setastrom.c
r35103 r36910 76 76 // correction may be Minst or Minst + 5.0*log(fwhm 77 77 float fwhm_maj = FromShortPixels(measure[0].FWx); 78 float Minst = PhotInst (measure );78 float Minst = PhotInst (measure, MAG_CLASS_PSF); 79 79 float MinstSB = Minst + 5.0*log10(fwhm_maj); 80 80
Note:
See TracChangeset
for help on using the changeset viewer.
