- Timestamp:
- Jun 6, 2012, 9:16:29 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branches/ipp-20120601/Ohana/src/opihi/cmd.astro/rotcurve.c
r19823 r33985 8 8 double L, dL, Lo, V, Vo, dV, Bo, dB, Do, dD; 9 9 double xo, yo, Xo, Yo; 10 double sl, cl, wo, Ro, Rs, wr, r, fr,d, min;10 double sl, cl, wo, Ro, Rs, wr, r, d, min; 11 11 double R[100], T[100], W[100]; 12 12 FILE *f; … … 99 99 } 100 100 r = (wr - W[n]) * (R[n-1] - R[n]) / (W[n-1] - W[n]) + R[n]; 101 fr = (Ro/r);101 // fr = (Ro/r); 102 102 if (r < fabs(Rs)) { /* can't be on rotation curve */ 103 103 continue;
Note:
See TracChangeset
for help on using the changeset viewer.
