; Copyright (C) 1992, Digital Equipment Corporation                         
; All rights reserved.                                                      
; See the file COPYRIGHT for a full description.                            
;                                                                           
; Last modified on Thu Mar 28 17:07:59 PST 1996 by heydon                   
;      modified on Sun Jun 11 17:30:56 PDT 1995 by gnelson                  

(Rim (Pen 5)
  (Macro Gap () '(Glue 5 + Inf))
  (Macro VGap () '(Glue 5))
  (Macro LeftText BOA (t)
    `(HBox (Shape (Width 45 + 0) (Text RightAlign ,t)) (Glue 2)))
 (VBox
  (HBox
    (LeftText "Name:")
    (Frame Lowered (MyBrowserFont)
      (Shape (Width 100 + Inf)
        (TypeIn %declName FirstFocus (BgColor "White")))
    )
  )
  (VGap)
  (Radio %typeRadio
    (HBox
      (LeftText "Type:")
      (HBox
        Fill
        (Choice %procType "PROC") (Gap)
        (Filter (Choice %predType "PRED")) (Gap)
        (Choice %templType "Template")
        Fill
      )
    )
  )
  (VGap)
  (Radio %toolRadio
    (HBox
      (LeftText "Tool:")
      (HBox
        Fill
        (Choice %pointTool "Point") (Gap)
        (Choice %noTool    "None")
        Fill
      )
    )
  )
  (VGap)
  (HBox
    Fill
    (Button %foldOk "  OK  ")
    Fill
  )
))