aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/PJ_krovak.c15
1 files changed, 15 insertions, 0 deletions
diff --git a/src/PJ_krovak.c b/src/PJ_krovak.c
index 0bffe188..8cdbda1f 100644
--- a/src/PJ_krovak.c
+++ b/src/PJ_krovak.c
@@ -30,6 +30,9 @@
******************************************************************************
*
* $Log$
+ * Revision 1.6 2006/09/14 13:10:50 fwarmerdam
+ * Add +czech flag to control reversal of signs (bug 1133,147)
+ *
* Revision 1.5 2006/03/30 01:22:48 fwarmerdam
* Removed win32 only debug hack.
*
@@ -139,6 +142,12 @@ FORWARD(s_forward); /* spheroid */
xy.y = ro * cos(eps) / a;
xy.x = ro * sin(eps) / a;
+ if( !pj_param(P -> params, "tczech").i )
+ {
+ xy.y *= -1.0;
+ xy.x *= -1.0;
+ }
+
return (xy);
}
@@ -188,6 +197,12 @@ INVERSE(s_inverse); /* spheroid */
xy.x=xy.y;
xy.y=xy0;
+ if( !pj_param(P -> params, "tczech").i )
+ {
+ xy.x *= -1.0;
+ xy.y *= -1.0;
+ }
+
ro = sqrt(xy.x * xy.x + xy.y * xy.y);
eps = atan2(xy.y, xy.x);
d = eps / sin(s0);