From: Dietmar Hiller <machen@permondes.de>
Date: Sat, 11 Apr 2026 13:54:23 +0000 (+0200)
Subject: Forced harmonic oscillator
X-Git-Url: https://permondes.de/gitweb/Analog_Engine.git/commitdiff_plain/refs/heads/main?hp=1f703b8ff31bd982c5ea6d00a09f10e33a0fe03c

Forced harmonic oscillator

Added very low and very high frequencies to the forced harmonic
oscillator.
---

diff --git a/Analog Engine Example Applications.odt b/Analog Engine Example Applications.odt
index ba5cfc2..9628d96 100644
Binary files a/Analog Engine Example Applications.odt and b/Analog Engine Example Applications.odt differ
diff --git a/scripts/EP1 10.02 Forced Harmonic Oscillator.LACE b/scripts/EP1 10.02 Forced Harmonic Oscillator.LACE
index 6e51b64..c9ea1ac 100644
--- a/scripts/EP1 10.02 Forced Harmonic Oscillator.LACE	
+++ b/scripts/EP1 10.02 Forced Harmonic Oscillator.LACE	
@@ -1,10 +1,10 @@
 # Forced Damped_Harmonic Oscillator
-# x'' + 2*delta*x' + omega.0^2*x = A cos (omega.f t)
+# x'' + 2*delta*x' + omega.0^2*x = b cos (omega t)
 
-# generating oscillation with omega.f
-# f'' = -omega.f^2*f
+# generating oscillation with omega
+# f'' = -omega^2*f
 coefficient.1(-1) -> -f0      # amplitude
-coefficient.2     -> omega^2
+coefficient.3     -> omega^2
 iintegrate f'' -> -f'
 iintegrate -f' -> f
   IC: -f0
@@ -12,7 +12,7 @@ cmultiply f, omega^2 -> omega^2*f
 invert omega^2*f -> -omega^2*f
 assign -omega^2*f -> f''
 invert f -> -f
-output f -> y
+output f -> out.y
 
 # forced damped harmonic oscillation
 # x'' = -(2*delta*x' + omega.0^2*x) + A cos (omega.f t)
@@ -30,4 +30,4 @@ cmultiply x, omega.0^2 -> omega.0^2*x
 isum 2*delta*x', omega.0^2*x, -f -> -(2*delta*x'+omega.0^2*x)-f
 assign -(2*delta*x'+omega.0^2*x)-f -> x''
 
-output(x) -> x
+output x -> out.x