Něco pro matematiky
Zasláno: ne 30. březen 2008 19:08
Pánové, dokážete někdo převrátit tento výpočet?
kód: $b=$b/180*pi();$l=$l/180*pi();
$a=6377397.15508; $e=0.081696831215303; $n=0.97992470462083; $konst_u_ro=12310230.12797036;
$sinUQ=0.863499969506341; $cosUQ=0.504348889819882; $sinVQ=0.420215144586493; $cosVQ=0.907424504992097;
$alfa=1.000597498371542; $k_2=1.00685001861538;
$sinB=sin($b); $t=(1-$e*$sinB)/(1+$e*$sinB);
$t=pow(1+$sinB,2)/(1-pow($sinB,2))*exp($e*log($t)); $t=$k_2*exp($alfa*log($t));
$sinU=($t-1)/($t+1); $cosU=sqrt(1-pow($sinU,2));
$v=$alfa*$l; $sinV=sin($v); $cosV=cos($v);
$cosDV=$cosVQ*$cosV+$sinVQ*$sinV; $sinDV=$sinVQ*$cosV-$cosVQ*$sinV;
$sinS=$sinUQ*$sinU+$cosUQ*$cosU*$cosDV; $cosS=sqrt(1-pow($sinS,2));
$sinD=$sinDV*$cosU/$cosS; $D=atan($sinD/sqrt(1-pow($sinD,2)));
$epsilon=$n*$D; $ro=$konst_u_ro*exp(-$n*log((1+$sinS)/$cosS));
$x=$ro*cos($epsilon); $y=$ro*sin($epsilon);
$x=($x-940652.7008)/399585.36585*100000;
$y=(908006.8965-$y)/740408.6551*100000;
Tj, potřeboval bych z proměnných x a y opět dostat zpět proměnné b a l.