84坐标系 (WGS-84) 到火星坐标系 (GCJ-02) 的转换算法 C语言

参考链接1
参考链接2

整理成C代码：

 static bool outOfChina(double lat, double lon)
{
    if (lon < 72.004 || lon > 137.8347)
        return true;
    if (lat < 0.8293 || lat > 55.8271)
        return true;
    return false;
}


static double transformLat(double x, double y)
{
	const double pi = 3.14159265358979324;
	
    double ret = -100.0 + 2.0 * x + 3.0 * y + 0.2 * y * y + 0.1 * x * y + 0.2 * sqrt(abs(x));
    ret += (20.0 * sin(6.0 * x * pi) + 20.0 * sin(2.0 * x * pi)) * 2.0 / 3.0;
    ret += (20.0 * sin(y * pi) + 40.0 * sin(y / 3.0 * pi)) * 2.0 / 3.0;
    ret += (160.0 * sin(y / 12.0 * pi) + 320 * sin(y * pi / 30.0)) * 2.0 / 3.0;
    return ret;
}


static double transformLon(double x, double y)
{
	const double pi = 3.14159265358979324;
    double ret = 300.0 + x + 2.0 * y + 0.1 * x * x + 0.1 * x * y + 0.1 * sqrt(abs(x));
    ret += (20.0 * sin(6.0 * x * pi) + 20.0 * sin(2.0 * x * pi)) * 2.0 / 3.0;
    ret += (20.0 * sin(x * pi) + 40.0 * sin(x / 3.0 * pi)) * 2.0 / 3.0;
    ret += (150.0 * sin(x / 12.0 * pi) + 300.0 * sin(x / 30.0 * pi)) * 2.0 / 3.0;
    return ret;
}


void gps_transform( double wgLat, double wgLon, double *mgLat, double *mgLon)
{
	const double a = 6378245.0;
	const double ee = 0.00669342162296594323;
	const double pi = 3.14159265358979324;

if (outOfChina(wgLat, wgLon))
        {
            *mgLat = wgLat;
            *mgLon = wgLon;
            return;
        }
        double dLat = transformLat(wgLon - 105.0, wgLat - 35.0);
        double dLon = transformLon(wgLon - 105.0, wgLat - 35.0);
        double radLat = wgLat / 180.0 * pi;
        double magic = sin(radLat);
        magic = 1 - ee * magic * magic;
        double sqrtMagic = sqrt(magic);
        dLat = (dLat * 180.0) / ((a * (1 - ee)) / (magic * sqrtMagic) * pi);
        dLon = (dLon * 180.0) / (a / sqrtMagic * cos(radLat) * pi);
        *mgLat = wgLat + dLat;
        *mgLon = wgLon + dLon;
};


//
double trans_lon;
double trans_lat;
gps_transform(tempRampDataInfor.pos.lat,tempRampDataInfor.pos.lon,&trans_lat,&trans_lon);