home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / SYMBOL / Neurons / otherwise < prev    next >
Encoding:
Text File  |  1998-10-23  |  609 b   |  23 lines  |  [TEXT/ScoM]
  1. otherwise action
  2.  
  3. This is used within neurons to trigger action if none of the rules are triggered. The output action can be any function call, or in/out reference to the neuron currently under processing.
  4.  
  5. (def-neuron test3
  6.    (and (in 1 'a) (in 2 'a)) ; test
  7.    'a                        ; fire if true
  8.    (and (in 1 'b) (in 2 'a) (out 'a -1))
  9.    'x
  10.    (otherwise '=)
  11. )
  12.  
  13. Here otherwise picks from the in 1 pattern the current symbol.
  14.  
  15. (def-neuron test3
  16.    (and (in 1 'a) (in 2 'a)) ; test
  17.    'a                        ; fire if true
  18.    (and (in 1 'b) (in 2 'a) (out 'a -1))
  19.    'x
  20.    (otherwise (in 1 0))
  21. )
  22.  
  23.