[Gvsig_english] new jCRS, slovak coordinate system wrong implementation again

[ivan minčík]

Halo.
I am very glad to hear about the new release of CRS. I already posted 
message about the wrong implementation of Czech and Slovak coordinate 
system some time ago, but with no answer. (whole original e-mail is 
above). Is it possible to fix it to next release?

this is the whole message

I would like to also draw attention to one very important bug in the
point of view of Slovak and Czech users in old versions of proj library
(used currently in gvSIG) which was for years held in the source code.
This bug was finnaly fixed after the serious effort of some czech guys
last year in 4.5.0 version. (I can explain workaround in another mail if
You wish...)

As Krovak projection is basic projection in former czechoslovakia the
older versions of proj than 4.5.0 is unusable for us without patching
the source. gvSIG is using proj from year 2002. 

We need only simple change in X and Y axis to -1, so it can be simple to
fix it in new version of CRS.


diff from current version of PJ_krovak.c used in gvSIG to new version is
only this 




2c2
<  * $Id: PJ_krovak.c,v 1.6 2006/09/14 13:10:50 fwarmerdam Exp $
---

> >  * $Id: PJ_krovak.c,v 1.4 2002/12/15 22:31:04 warmerda Exp $
>   
33,38d32
<  * 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.
<  *
58c52
< PJ_CVSID("$Id: PJ_krovak.c,v 1.6 2006/09/14 13:10:50 fwarmerdam Exp
$");
---

> > PJ_CVSID("$Id: PJ_krovak.c,v 1.4 2002/12/15 22:31:04 warmerda Exp $");
>   
145,149c139,151
<         if( !pj_param(P -> params, "tczech").i )
<         {
<           xy.y *= -1.0;
<           xy.x *= -1.0;
<         }
---

> > #ifdef DEBUG
> >       strcpy(errmess,"a: ");
> >       strcpy(tmp,"        ");
> >       ltoa((long)(a*1000000000),tmp,10);
> >       strcat(errmess,tmp);
> >       strcat(errmess,"e2: ");
> >       strcpy(tmp,"        ");
> >       ltoa((long)(e2*1000000000),tmp,10);
> >       strcat(errmess,tmp);
> >
> >       MessageBox(NULL, errmess, NULL, 0);
> > #endif
> >
>   
200,205d201
<         if( !pj_param(P -> params, "tczech").i )
<         {
<           xy.x *= -1.0;
<           xy.y *= -1.0;
<         }
<





Thanks 
Ivan