From: rearman <rearman@r717.net>
Date: Mon, 8 Jan 2024 16:49:14 +0000 (-0500)
Subject: Remove unused defun
X-Git-Url: https://git.earman.xyz/?a=commitdiff_plain;h=2c56711d67aab7c957376e4ea8205b51f4261ac5;p=emacsinit.git

Remove unused defun

Got rid of pid tuning defun
---

diff --git a/init.org b/init.org
index 392ceb1..1edac44 100644
--- a/init.org
+++ b/init.org
@@ -1187,19 +1187,6 @@ With optional argument `ai', also calculate a final scaled value from an input."
     (if (eq nil ai)
 	(list div ofst)
       (list div ofst (+ ofst (/ ai div))))))
-
-(defun pid-tune (Ku Tu &optional loop-type)
-  "Use the Ziegler-Nichols method to tune a P, PI or PID loop.
-Takes Ku, Tu and optional loop-type (P, PI, or PID [default])
-as arguments, and returns appropriate kp, ki, and kd."
-  (cond ((or (equal 'p loop-type)
-	     (equal 'P loop-type))
-	 (list (* 0.5 Ku)))
-	((or (equal 'pi loop-type)
-	     (equal 'PI loop-type))
-	 (list (* 0.45 Ku) (/ (* 0.54 Ku) Tu)))
-	(t
-	 (list (* 0.6 Ku) (/ (* 1.2 Ku) Tu) (/ (* 3.0 Ku Tu) 40)))))
 #+END_SRC
 
 *** Refrigeration