summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Parapt.sci
diff options
context:
space:
mode:
Diffstat (limited to 'texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Parapt.sci')
-rw-r--r--texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Parapt.sci12
1 files changed, 0 insertions, 12 deletions
diff --git a/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Parapt.sci b/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Parapt.sci
deleted file mode 100644
index 5adb4837..00000000
--- a/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Parapt.sci
+++ /dev/null
@@ -1,12 +0,0 @@
-// 08.07.11
-// 10.01.02
-
-function Out=Parapt(P)
- global PHI THETA
- x=P(1);
- y=P(2);
- z=P(3);
- Xz=-x*sin(PHI)+y*cos(PHI);
- Yz=-x*cos(PHI)*cos(THETA)-y*sin(PHI)*cos(THETA)+z*sin(THETA);
- Out=[Xz,Yz];
-endfunction