diff options
Diffstat (limited to 'texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/SetstereoL.sci')
-rw-r--r-- | texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/SetstereoL.sci | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/SetstereoL.sci b/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/SetstereoL.sci deleted file mode 100644 index cb6c79ae..00000000 --- a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/SetstereoL.sci +++ /dev/null @@ -1,12 +0,0 @@ -// 08.08.12 -// 08.09.21 -// 09.03.09 - -function SetstereoL(R,T,P,H) - X=R*sin(T*%pi/180)*cos(P*%pi/180); - Y=R*sin(T*%pi/180)*sin(P*%pi/180); - Z=R*cos(T*%pi/180); - Eye=[X+H/2*Y/(X^2+Y^2),Y-H/2*X/(X^2+Y^2),Z]; - Setpers([0,0,0],Eye); -endfunction - |