# Special because of its priority on its terminal.
# Also note that the required default name is {}

proc ICON_global args {
  icon_setup $args {{origin {0 0}} {orient R0} {name {}}}
  icon_term -type output -origin {0 0} -name {$name} -priority global
  icon_line 0 0 0 10 -20 10 20 10
  icon_property -origin {-60 50} -type user -name name
  icon_property -origin {0 20} -label {$name} -anchor center
  icon_property -origin {-60 70} -type fixed -name primitive -text 1
}
