]>
Commit | Line | Data |
---|---|---|
1 | # CompoundFunctions.LACE | |
2 | # collection of compound functions which can be realized with THAT | |
3 | ||
4 | # Open Amplifier | |
5 | define openamp (weight*: variable-1, …) -> output | |
6 | isum (weight*: variable-1, …) -> output | |
7 | connect (FB:) -> GND | |
8 | ||
9 | # Division | |
10 | define idivide (numerator, denominator) -> -quotient | |
11 | openamp (numerator, product) -> -quotient | |
12 | multiply (-quotient, denominator) -> product | |
13 | ||
14 | # Integration extension | |
15 | define iintegrate (weight*: variable-1, …, ic: variable-IC, limit: gt0) -> variable-n | |
16 | iintegrate (weight*: variable-1, …) -> variable-n | |
17 | diode (cat:variable-n) -> DA | |
18 | connect (DA) -> sj | |
19 | # diode and connect used to limit the result to values >0 | |
20 | ||
21 | # Building an additional integrator with the help of an openamp | |
22 | define iintegrate.additional (variable) -> integral | |
23 | openamp variable -> integral | |
24 | connect SJ -> cp | |
25 | capacitor.100nF (integral) -> cp | |
26 | # 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. | |
27 | ||
28 | # Summing extension | |
29 | define isum (weight*: variable-1, …, /divisor) -> -result | |
30 | isum (weight*: variable-1, …) -> -result | |
31 | connect (-result, …) -> IN |