summaryrefslogtreecommitdiff
path: root/lang/dynamo/1.8.7/src/dyn.oszillator
diff options
context:
space:
mode:
authorLars-Dominik Braun <lars@6xq.net>2019-02-04 13:09:03 +0100
committerLars-Dominik Braun <lars@6xq.net>2019-02-04 13:09:03 +0100
commit04e68443040c7abad84d66477e98f93bed701760 (patch)
tree2b6202afae659e773bf6916157d23e83edfa44e3 /lang/dynamo/1.8.7/src/dyn.oszillator
downloadeumel-src-04e68443040c7abad84d66477e98f93bed701760.tar.gz
eumel-src-04e68443040c7abad84d66477e98f93bed701760.tar.bz2
eumel-src-04e68443040c7abad84d66477e98f93bed701760.zip
Initial import
Diffstat (limited to 'lang/dynamo/1.8.7/src/dyn.oszillator')
-rw-r--r--lang/dynamo/1.8.7/src/dyn.oszillator26
1 files changed, 26 insertions, 0 deletions
diff --git a/lang/dynamo/1.8.7/src/dyn.oszillator b/lang/dynamo/1.8.7/src/dyn.oszillator
new file mode 100644
index 0000000..3f1e815
--- /dev/null
+++ b/lang/dynamo/1.8.7/src/dyn.oszillator
@@ -0,0 +1,26 @@
+NOTE OSZILLATOR
+L X.K=X.J+Y.J*DT
+N X=2
+L Y.K=(Y.J+DT*(F/M-X.J*OMEGANULLQUADRAT.J))/(1+GAMMA.J*DT)
+N Y=3
+C M=5
+NOTE
+NOTE linearer harmonischer Oszillator mit BETA=0 und F=0
+NOTE
+NOTE gedaempfter Oszillator mit BETA<>0 und F=0
+NOTE
+NOTE allgemeiner Oszillator mit BETA<>0 und F=f(TIME)
+C BETA=0.5
+A GAMMA.K=BETA/M
+C F=0
+C K=1
+A OMEGANULLQUADRAT.K=K/M
+NOTE hier heisst eine Konstante"K". DYNAMO verwechselt das nicht mit .K !!
+C DT=0.01
+NOTE DT WIRD EXTRA SO KLEIN GEWAEHLT; DAMIT DIE ANNAEHERUNG GUT IST
+NOTE
+NOTE DAS GEHT AUF KOSTEN DER RECHENZEITEN !!!
+C LENGTH=68
+C PLTPER=1
+PLOT Y
+