]> permondes.de Git - Analog_Engine.git/blame - scripts/CompoundFunctions.LACE
Throwing a stone on earth, starting a rocket from earth
[Analog_Engine.git] / scripts / CompoundFunctions.LACE
CommitLineData
6d26a6bd
P
1# collection of compound functions which can be realized with THAT
2
3# Open Amplifier
4define openamp (weight*: variable-1, …) -> output
5 isum (weight*: variable-1, …) -> output
6 connect (FB:) -> GND
7
8# Division
9define idivide (numerator, denominator) -> -quotient
10 openamp (numerator, product) -> -quotient
11 multiply (-quotient, denominator) -> product
12
13# Integration extension
14define iintegrate (weight*: variable-1, …, ic: variable-IC, limit: gt0) -> variable-n
15 iintegrate (weight*: variable-1, …) -> variable-n
16 diode (cat:variable-n) -> DA
17 connect (DA) -> sj
18# diode and connect used to limit the result to values >0
19
20# Building an additional integrator with the help of an openamp
21define iintegrate.additional (variable) -> integral
22 openamp variable -> integral
23 connect SJ -> cp
24 capacitor.100nF (integral) -> cp
25# NB: The 100 nF capacitor is available on a THAT. This capacitance corresponds to those of the SLOW settings. In order to use the standard time constant an external 1 nF capacitor has to be used.
26
27# Summing extension
28define isum (weight*: variable-1, …, /divisor) -> -result
29 isum (weight*: variable-1, …) -> -result
30 connect (-result, …) -> IN