+Val
    
    (gui '(+Val +NumField) '((N) (* N N)) 10)
    +Var
    
    "Occupation" (gui 'job '(+Var +TextField) '*PrsJob 20)
    +View
    +Lock, view is a prefix class that disables a GUI
    component. However, +View can take a functional argument:
    
    (gui '(+Sgn +View +FixField) '(sum> (: home obj)) 2 12) ) )