summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Diagcelldata.sci
diff options
context:
space:
mode:
Diffstat (limited to 'texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Diagcelldata.sci')
-rw-r--r--texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Diagcelldata.sci15
1 files changed, 0 insertions, 15 deletions
diff --git a/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Diagcelldata.sci b/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Diagcelldata.sci
deleted file mode 100644
index b6a53b62..00000000
--- a/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Diagcelldata.sci
+++ /dev/null
@@ -1,15 +0,0 @@
-// 10.03.28
-
-function Out=Diagcelldata(Tb,Nc,Nr)
- Tmp=Findcell(Tb,Nc,Nr);
- C=Tmp(1);
- Dx=Tmp(2);
- Dy=Tmp(3);
- Pne=C+[Dx,Dy];
- Pnw=C+[-Dx,Dy];
- Psw=C+[-Dx,-Dy];
- Pse=C+[Dx,-Dy];
- Tmp1=Listplot(Pnw,Pse);
- Tmp2=Listplot(Pne,Psw);
- Out=list(Tmp1,Tmp2);
-endfunction; \ No newline at end of file