]> permondes.de Git - Analog_Engine.git/commitdiff
Mass on Sphere, open amplifier, division
authorPermondes <machen@permondes.de>
Wed, 24 Jan 2024 18:38:55 +0000 (19:38 +0100)
committerPermondes <machen@permondes.de>
Wed, 24 Jan 2024 18:38:55 +0000 (19:38 +0100)
Moved scripts to sub-directory AESL
Technical: added open amplifier, division
Applications: ccc

AESL/Charge in em field.AESL [moved from Charge in em field.AESL with 96% similarity]
AESL/Damped Harmonic Osciallator scaled.AESL [moved from Damped Harmonic Osciallator scaled.AESL with 98% similarity]
AESL/Damped Harmonic Oscillator.AESL [moved from Damped Harmonic Oscillator.AESL with 98% similarity]
AESL/MassOnSphere.AESL [new file with mode: 0644]
AESL/Radioactive Decay.AESL [moved from Radioactive Decay.AESL with 95% similarity]
Analog Engine Example Applications.odt
Analog Engine Technical Topics.odt

similarity index 96%
rename from Charge in em field.AESL
rename to AESL/Charge in em field.AESL
index 47d2847ddba625969ac8d3d422a63099dfbce9d3..0ca5f07390f5b4c4a851e4c39dae824437d452a2 100644 (file)
@@ -8,7 +8,7 @@ COMMENT good start settings are omega=0,92, a*omega^2=0,05
 
 ENVIRONMENT DIVISION
 ENGINE Anabrid-THAT
 
 ENVIRONMENT DIVISION
 ENGINE Anabrid-THAT
-TIMEBASE 1ms
+TIMEBASE 1ms # corresponds to 1s
 REQUIRES INTEGRATOR 4
 REQUIRES INVERTER 1
 REQUIRES COEFFICIENT 3
 REQUIRES INTEGRATOR 4
 REQUIRES INVERTER 1
 REQUIRES COEFFICIENT 3
similarity index 98%
rename from Damped Harmonic Osciallator scaled.AESL
rename to AESL/Damped Harmonic Osciallator scaled.AESL
index cc766f2906c7cb735a13eeaaf1390583170acf4a..06a7a9e83a493275558b608a083c3c088f6896f5 100644 (file)
@@ -10,7 +10,7 @@ REQUIRES INVERTER 1
 REQUIRES SUMMER 2
 
 DATA DIVISION
 REQUIRES SUMMER 2
 
 DATA DIVISION
-OUTPUT OUT.U y
+OUTPUT OUTPUT.U y
 ALIAS COEFFICIENT.1 InitialPosition
 ALIAS COEFFICIENT.2 InitialSpeed
 ALIAS COEFFICIENT.3 SpringForce
 ALIAS COEFFICIENT.1 InitialPosition
 ALIAS COEFFICIENT.2 InitialSpeed
 ALIAS COEFFICIENT.3 SpringForce
similarity index 98%
rename from Damped Harmonic Oscillator.AESL
rename to AESL/Damped Harmonic Oscillator.AESL
index 5dbe3336620abdae8af38abdd86c107a132e0a60..12a995e7dbb08f701d23a26076401e45bf31712f 100644 (file)
@@ -9,7 +9,7 @@ REQUIRES INVERTER 1
 REQUIRES SUMMER 2
 
 DATA DIVISION
 REQUIRES SUMMER 2
 
 DATA DIVISION
-OUTPUT OUT.U y
+OUTPUT OUTPUT.U y
 ALIAS COEFFICIENT.1 InitialPosition
 ALIAS COEFFICIENT.2 InitialSpeed
 ALIAS COEFFICIENT.3 SpringForce
 ALIAS COEFFICIENT.1 InitialPosition
 ALIAS COEFFICIENT.2 InitialSpeed
 ALIAS COEFFICIENT.3 SpringForce
diff --git a/AESL/MassOnSphere.AESL b/AESL/MassOnSphere.AESL
new file mode 100644 (file)
index 0000000..74f2c51
--- /dev/null
@@ -0,0 +1,58 @@
+IDENTIFICATION DIVISION
+PROGRAM-ID MassOnSphere
+VERSION 20240124
+COMMENT A mass m rests at the apex on a fixed sphere with radius a.
+COMMENT With a slight displacement, it slides down the sphere without friction
+COMMENT x'' = C1*x*y - C3*x
+COMMENT y'' = C2*y*y - C4*y - g
+COMMENT Scaling: measuring distances in dm (10¹ m)
+COMMENT Initial condition: slightly off the top of the sphere to get the mass rolling.
+COMMENT    Note: x0 is a function of y0 with x0² + y0² = a²
+COMMENT    Note: ICs have to be negative as the integrator is inverting
+
+ENVIRONMENT DIVISION
+ENGINE Anabrid-THAT
+TIMEBASE 1ms
+REQUIRES COEFFICIENT 7
+REQUIRES INTEGRATOR 4
+REQUIRES MULTIPLIER 2
+REQUIRES INVERTER 4
+REQUIRES SUMMER 2
+
+DATA DIVISION
+OUTPUT OUTPUT.X x
+OUTPUT OUTPUT.Y y
+# Example values based on a=1
+COEFFICIENT.1 3g/a² for xy e.g. 2,943
+COEFFICIENT.2 3g/a² for y² 
+COEFFICIENT.3 2g/a  for x  e.g. 1,962
+COEFFICIENT.4 2g/a  for y
+COEFFICIENT.5 g            e.g. 0,981
+COEFFICIENT.6 a initial condition y e.g. 0,957
+COEFFICIENT.7 0 initial condition x, slightly above 0 to start motion, e.g. 0,290
+
+PROGRAM DIVISION
+-1 -> COEFFICIENT.5 -> -g
+-1 -> COEFFICIENT.6 -> -y0
+-1 -> COEFFICIENT.7 -> -x0
+
+x'' -> INTEGRATOR.1 -> -x'
+-x', IC:-x0 -> INTEGRATOR.2 -> x
+y'' -> INTEGRATOR.3 -> -y'
+-y', IC:-y0 -> INTEGRATOR.4 -> y
+x,y -> MULTIPLIER.1 -> x*y
+y,y -> MULTIPLIER.2 -> y^2
+x*y -> COEFFICIENT.1 -> 3g/a²*x*y/10
+y^2 -> COEFFICIENT.2 -> 3g/a²*y^2/10
+x -> COEFFICIENT.3 -> 2g/a*x/10
+y -> COEFFICIENT.4 -> 2g/a*y/10
+2g/a*x/10 -> INVERTER.1 -> -2g/a*x/10
+2g/a*y/10 -> INVERTER.2 -> -2g/a*y/10
+10:3g/a²*x*y/10, 10:-2g/a*x/10 -> SUMMER.1 -> -x''
+-x'' -> INVERTER.3 -> x''
+10:3g/a²*y^2/10, 10:-2g/a*y/10, 1:-g -> SUMMER.2 -> -y''
+-y'' -> INVERTER.4 -> y''
+
+OPERATION DIVISION
+MODE REPEAT
+OP-TIME 0,024 # after that, the mass would jump off the sphere, which is not included in this model
similarity index 95%
rename from Radioactive Decay.AESL
rename to AESL/Radioactive Decay.AESL
index 34b3acfa3331191a3598de34b6b64bac6aa31830..e225eef3b37195e5debd94219ebce0563717b46d 100644 (file)
@@ -8,7 +8,7 @@ REQUIRES Integrator 1
 REQUIRES Inverter 1
 
 DATA DIVISION
 REQUIRES Inverter 1
 
 DATA DIVISION
-OUTPUT OUT.X N
+OUTPUT OUTPUT.X N
 ALIAS COEFFICIENT.1 InitialValue
 ALIAS COEFFICIENT.2 Decay 
 
 ALIAS COEFFICIENT.1 InitialValue
 ALIAS COEFFICIENT.2 Decay 
 
index 226f3e4a8f9c10d169668425b84d643a4407a9a5..17fca23b19763cdd52e7a52b0f5378bdf48fc5bc 100644 (file)
Binary files a/Analog Engine Example Applications.odt and b/Analog Engine Example Applications.odt differ
index 96b6dd1f474b605ff6d6e5dbae7568414aab2e11..1d3b30af28a0562879b787212dbfe9737c783982 100644 (file)
Binary files a/Analog Engine Technical Topics.odt and b/Analog Engine Technical Topics.odt differ