Changeset 33662 for trunk/Ohana/src/opihi/cmd.astro
- Timestamp:
- Apr 1, 2012, 3:24:39 PM (14 years ago)
- Location:
- trunk/Ohana/src/opihi/cmd.astro
- Files:
-
- 3 edited
- 6 copied
-
Makefile (modified) (2 diffs)
-
coords.c (modified) (3 diffs)
-
fiximage.c (copied) (copied from branches/eam_branches/ipp-20111122/Ohana/src/opihi/cmd.astro/fiximage.c )
-
init.c (modified) (4 diffs)
-
mkclusters.c (copied) (copied from branches/eam_branches/ipp-20111122/Ohana/src/opihi/cmd.astro/mkclusters.c )
-
specpairfit.c (copied) (copied from branches/eam_branches/ipp-20111122/Ohana/src/opihi/cmd.astro/specpairfit.c )
-
spex1dgas.c (copied) (copied from branches/eam_branches/ipp-20111122/Ohana/src/opihi/cmd.astro/spex1dgas.c )
-
spex2dgas.c (copied) (copied from branches/eam_branches/ipp-20111122/Ohana/src/opihi/cmd.astro/spex2dgas.c )
-
spexseq.c (copied) (copied from branches/eam_branches/ipp-20111122/Ohana/src/opihi/cmd.astro/spexseq.c )
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/opihi/cmd.astro/Makefile
r32632 r33662 32 32 $(SRC)/fixwrap.$(ARCH).o \ 33 33 $(SRC)/fixcols.$(ARCH).o \ 34 $(SRC)/fiximage.$(ARCH).o \ 34 35 $(SRC)/gauss.$(ARCH).o \ 35 $(SRC)/getvel.$(ARCH).o \36 $(SRC)/getlst.$(ARCH).o \36 $(SRC)/getvel.$(ARCH).o \ 37 $(SRC)/getlst.$(ARCH).o \ 37 38 $(SRC)/medianmap.$(ARCH).o \ 38 39 $(SRC)/mkgauss.$(ARCH).o \ … … 51 52 $(SRC)/precess.$(ARCH).o \ 52 53 $(SRC)/profile.$(ARCH).o \ 53 $(SRC)/radec.$(ARCH).o \54 $(SRC)/region.$(ARCH).o \54 $(SRC)/radec.$(ARCH).o \ 55 $(SRC)/region.$(ARCH).o \ 55 56 $(SRC)/rotcurve.$(ARCH).o \ 56 57 $(SRC)/scale.$(ARCH).o \ 57 58 $(SRC)/sexigesimal.$(ARCH).o \ 58 59 $(SRC)/spec.$(ARCH).o \ 60 $(SRC)/specpairfit.$(ARCH).o \ 61 $(SRC)/spexseq.$(ARCH).o \ 62 $(SRC)/spex1dgas.$(ARCH).o \ 63 $(SRC)/spex2dgas.$(ARCH).o \ 64 $(SRC)/mkclusters.$(ARCH).o \ 59 65 $(SRC)/star.$(ARCH).o \ 60 $(SRC)/transform.$(ARCH).o \66 $(SRC)/transform.$(ARCH).o \ 61 67 $(SRC)/imsub.$(ARCH).o \ 62 68 $(SRC)/imfit.$(ARCH).o \ -
trunk/Ohana/src/opihi/cmd.astro/coords.c
r29540 r33662 83 83 } 84 84 if (mode == PIXEL) { 85 Xin = ohana_normalize_angle_to_midpoint (Xin, coords.crval1); 85 86 RD_to_XY (&Xout, &Yout, Xin, Yin, &coords); 86 87 if (!Quiet) gprint (GP_LOG, "%7.2f %7.2f\n", Xout, Yout); … … 92 93 if (mode == SKY) { 93 94 for (i = 0; i < xvec[0].Nelements; i++) { 94 XY_to_RD (&xvec[0].elements.Flt[i], &yvec[0].elements.Flt[i], xvec[0].elements.Flt[i], yvec[0].elements.Flt[i], &coords); 95 double Xin = xvec[0].elements.Flt[i]; 96 double Yin = yvec[0].elements.Flt[i]; 97 xvec[0].elements.Flt[i] = NAN; 98 yvec[0].elements.Flt[i] = NAN; 99 XY_to_RD (&xvec[0].elements.Flt[i], &yvec[0].elements.Flt[i], Xin, Yin, &coords); 95 100 } 96 101 return (TRUE); … … 98 103 if (mode == PIXEL) { 99 104 for (i = 0; i < xvec[0].Nelements; i++) { 100 RD_to_XY (&xvec[0].elements.Flt[i], &yvec[0].elements.Flt[i], xvec[0].elements.Flt[i], yvec[0].elements.Flt[i], &coords); 105 double Xin = xvec[0].elements.Flt[i]; 106 double Yin = yvec[0].elements.Flt[i]; 107 xvec[0].elements.Flt[i] = NAN; 108 yvec[0].elements.Flt[i] = NAN; 109 Xin = ohana_normalize_angle_to_midpoint (Xin, coords.crval1); 110 RD_to_XY (&xvec[0].elements.Flt[i], &yvec[0].elements.Flt[i], Xin, Yin, &coords); 101 111 } 102 112 return (TRUE); -
trunk/Ohana/src/opihi/cmd.astro/init.c
r32632 r33662 15 15 int flux PROTO((int, char **)); 16 16 int fixwrap PROTO((int, char **)); 17 int fiximage PROTO((int, char **)); 17 18 int fixcols PROTO((int, char **)); 18 19 int fixrows PROTO((int, char **)); … … 45 46 int sexigesimal PROTO((int, char **)); 46 47 int spec PROTO((int, char **)); 48 int specpairfit PROTO((int, char **)); 49 int spexseq PROTO((int, char **)); 50 int spex1dgas PROTO((int, char **)); 51 int spex2dgas PROTO((int, char **)); 52 int mkclusters PROTO((int, char **)); 47 53 int star PROTO((int, char **)); 48 54 int times PROTO((int, char **)); … … 64 70 {1, "flux", flux, "flux in a convex contour"}, 65 71 {1, "fixwrap", fixwrap, "fix megacam over-wrapped pixels"}, 72 {1, "fiximage", fiximage, "fix pixels in an image by interpolation"}, 66 73 {1, "fixcols", fixcols, "fix bad columns by comparing with others"}, 67 74 {1, "fixrows", fixrows, "fix bad rows by comparing with others"}, … … 93 100 {1, "sexigesimal", sexigesimal, "convert to/from sexigesimal/decimal"}, 94 101 {1, "spec", spec, "extract a spectrum"}, 102 {1, "specpairfit", specpairfit, "fit spectrum to another spectrum"}, 103 {1, "spexseq", spexseq, "generate the spectral sequence"}, 104 {1, "spex1dgas", spex1dgas, "minimize distances in 1D"}, 105 {1, "spex2dgas", spex2dgas, "minimize distances in 2D"}, 106 {1, "mkclusters", mkclusters, "group spectra by distance"}, 95 107 {1, "star", star, "star stats at rough coords"}, 96 108 {1, "transform", transform, "geometric transformation of image"},
Note:
See TracChangeset
for help on using the changeset viewer.
