|
From: <le...@pr...> - 2005-01-22 03:15:12
|
Update of /cvsroot/meshdb/src/geo/alt In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13226 Modified Files: Tag: leonard-dev main.c Log Message: oops. didnt update d Index: main.c =================================================================== RCS file: /cvsroot/meshdb/src/geo/alt/main.c,v retrieving revision 1.3.2.4 retrieving revision 1.3.2.5 diff -u -d -r1.3.2.4 -r1.3.2.5 --- main.c 21 Jan 2005 23:12:45 -0000 1.3.2.4 +++ main.c 22 Jan 2005 03:15:03 -0000 1.3.2.5 @@ -297,7 +297,7 @@ #define LOS(x,y,xp,yp,xq,yq) \ if (-w2<(x) && (x)<w2 && -h2<(y) && (y)<h2) { \ float az, azprev, azmaxprev; \ - az = (H(x,y) - h0) / d; \ + az = (H(x,y) - h0) / d; \ if (isnanf(az)) az = ZENITH; \ azprev = AZ(xp,yp)*(p/n) + \ AZ(xq,yq)*(1-p/n); \ @@ -314,12 +314,14 @@ } for (p = 1; p <= n; p++) { + d = sqrt(n*n + p*p); LOS(n,p,n-1,p-1,n-1,p) /* ESE */ LOS(-p,n,-(p-1),n-1,-(p-1),n) /* SSW */ LOS(-n,-p,-(n-1),-(p-1),-(n-1),-p) /* WNW */ LOS(p,-n,p-1,-(n-1),p-1,-n) /* NNE */ } for (p = 0; p < n; p++) { + d = sqrt(n*n + p*p); LOS(n,-p,n-1,-(p-1),n-1,-p) /* ENE */ LOS(p,n,p-1,n-1,p-1,n) /* SSE */ LOS(-n,p,-(n-1),p-1,-(n-1),p) /* WSW */ |