int main()
{
double x_ccd,x2,x_targy,y,y2,y_targy,b,t,v,c,tan_a;
c=3e8; //fenysebesseg
v=c*0.3;//fotogep sebessege
x_targy=5000.0;//targy tavolsaga allo IRben (terbeli koordinata)
y_targy=100.0;//targy nagysaga, magassaga, nem koordinata
t=-fabs(x_targy/c);//ido koordinata, a fenyjel ekkor indult minusz, mert
//amikor a lencsen atmegy a targyrol indult feny az lesz a (0,0) koordinata
printf("tavolsag:%f \n",x_targy);//targy tavolsaga allo rendszerben
b=1.0/sqrt(1.0-(v*v)/(c*c));
printf("specrel:%f \n",(x_targy-v*t)*b);//Lorentz transzformacio
//megvaltozott tavolsag a mozgo inerciarendszerben a specialis relativitas szerint
x_ccd=1000.0;//ccd-lencse tavolsag, (ccd a kep keletkezesenek helye)
x_targy*=b;//a hosszak rovidultek, emiatt az esemenyek tavolsagai megnottek mozgasiranyban
x_ccd*=b;
tan_a=y_targy/x_targy;//tangens alfa, ilyen szog alatt latszik a targy allo IRben (szog tangense)
t=x_ccd/(v+c);//ido ameddig a mozgo ccd es a feny talalkozik
x2=c*t;//feny-ccd talalkozasi pont a lencsetol szamolva
//x2=x-v*t; // ugyan az a ccd mozgasabol szamolva
y2=x2*tan_a;//keletkezo kep merete /kisebb mint az allo kep /
tan_a=y2/x_ccd;// a lencse is mozog jobbra, mint a ccd, emiatt a fotogeppel egyutt mozogva a szog atan(y2/x_ccd)
printf("foto :%f \n",y_targy/tan_a);// megvaltozott tavolsag a mozgo fotogep kepe alapjan
#1212
