sf-mx/PBSwissMX
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

checking coordinate transform

Browse Source
This commit is contained in:
zamofing_t
2018-04-05 08:44:37 +02:00
parent 99b45f47b6
commit 85414a7acf
9 changed files with 474 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
cfg/MX3_coordTrf.py
View File

@@ -73,11 +73,11 @@ open forward
//X=D^-1*S
X=+.5*S1 -.5*S2 +(r+.5)*S3 +(r-.5)*S4 +(.5-r)*$sqrt2*S5
Y=+.5*S1 +.5*S2 +.25*S3 +.25*S4 +.25*$sqrt2*S5
U= -.5*S3 -.5*S4 +.5*$sqrt2*S5
V=-.5*S1 +1.*S2 +1.5*S3 -.5*S4 -.5*$sqrt2*S5
W=-.5*S1 -1.*S2 +.5*S3 +.5*S4 +.5*$sqrt2*S5
X=+.5*S1 -.5*S2 +(r+.25)*S3 +(r-.75)*S4 +(.25-r)*$sqrt2*S5
Y=+.5*S1 +.5*S2 +.25*S3 +.25*S4 +.25*$sqrt2*S5
U= +1.*S3 +1.*S4 -1.*$sqrt2*S5
V=-1.*S1 +1.*S2 +1.5*S3 -.5*S4 -.5*$sqrt2*S5
W=-1.*S1 -1.*S2 +.5*S3 +.5*S4 +.5*$sqrt2*S5
send 1"fwd_res %f %f %f %f %f\\n",X,Y,U,V,W
@@ -97,11 +97,11 @@ open inverse
r=$height/$width
S1=+.5*X +.5*Y +(0) *U -.5*V +.5*W
S2=-.5*X +.5*Y +(0) *U +.5*V +.5*W
S3=+.5*X +.5*Y -(.5) *U +.5*V -.5*W
S4=-.5*X +.5*Y -(.5) *U -.5*V -.5*W
S5= .5*$sqrt2*Y +.5*$sqrt2*U -.5*$sqrt2*W
S1=+.5*X +.5*Y +(.25-.5*r)*U -.25*V -.25*W
S2=-.5*X +.5*Y +(.5*r-.25)*U +.25*V -.25*W
S3=+.5*X +.5*Y +(.25-.5*r)*U +.25*V +.25*W
S4=-.5*X +.5*Y +(.25+.5*r)*U -.25*V +.25*W
S5= .5*$sqrt2*Y -.25*$sqrt2*U +.25*$sqrt2*W
scl=$sqrt2/$exc
AA1=asin(S1*scl)/$camSf