[Analog_Engine.git] / scripts / CompoundFunctions.LACE

# collection of compound functions which can be realized with THAT

# Open Amplifier
define openamp (weight*: variable-1, …) -> output
  isum (weight*: variable-1, …) -> output
    connect (FB:) -> GND
      
# Division
define idivide (numerator, denominator) -> -quotient
  openamp (numerator, product) -> -quotient
  multiply (-quotient, denominator) -> product
   
# Integration extension
define iintegrate (weight*: variable-1, …, ic: variable-IC, limit: gt0) -> variable-n
  iintegrate (weight*: variable-1, …) -> variable-n
    diode (cat:variable-n) -> DA
    connect (DA) -> sj
# diode and connect used to limit the result to values >0

# Building an additional integrator with the help of an openamp
define iintegrate.additional (variable) -> integral
   openamp variable -> integral
      connect SJ -> cp
   capacitor.100nF (integral) -> cp
# 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.

# Summing extension
define isum (weight*: variable-1, …, /divisor) -> -result
  isum (weight*: variable-1, …) -> -result
  connect (-result, …) -> IN
Commit	Line	Data
6d26a6bd P	1	# collection of compound functions which can be realized with THAT
	2
	3	# Open Amplifier
	4	define openamp (weight*: variable-1, …) -> output
	5	isum (weight*: variable-1, …) -> output
	6	connect (FB:) -> GND
	7
	8	# Division
	9	define idivide (numerator, denominator) -> -quotient
	10	openamp (numerator, product) -> -quotient
	11	multiply (-quotient, denominator) -> product
	12
	13	# Integration extension
	14	define 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
	21	define 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
	28	define isum (weight*: variable-1, …, /divisor) -> -result
	29	isum (weight*: variable-1, …) -> -result
	30	connect (-result, …) -> IN