[Zarutian] 4. september: Subtext [http://subtextual.org/] is a visual programming language and enviroment.

First raugh draft of possible implemention in Tcl:
    * a node is a autonamed variable, possible traced
    * a function is servral nodes


  array set the_data_array {}
  array set the_prog_array {}

  proc get-value {identifier} {
    variable the_data_array
    variable the_prog_array

    set from_storage [set the_prog_array($identifier)]
    if {[lindex $from_storage 0] == "data"} {
      return 
    }
    if {[lindex $from_storage 0] == "function"} {
      set incoming_links [lindex $from_storage 2]
      set outgoing_links [lindex $from_storage 3]
      set program        [lindex $from_storage 4]
      eval $program
    }
  }