initial commit

2022-08-18 15:04:28 +02:00
commit 46dcf8e77c
591 changed files with 69282 additions and 0 deletions
--- a/tcl/calcurves/purge
+++ b/tcl/calcurves/purge
@@ -0,0 +1,8 @@
+#!/bin/tcsh
+foreach fil (*.inp)
+  set u=${fil:au:r}
+  if (-e $u.340) then
+    rm $fil
+    echo "$fil $u.340"
+  endif
+end