;GIL-2
(
(
	:type                   :popup-window
	:name                   pop
	:owner                  nil
	:width                  376
	:height                 218
	:background-color       ""
	:foreground-color       ""
	:label                  "Type selection"
	:label-type             :string
	:mapped                 nil
	:show-footer            t
	:resizable              nil
	:pinned                 t
	:done-handler           nil
	:event-handler          nil
	:events                 ()
	:user-data              ()
)
(
	:type                   :control-area
	:name                   controls1
	:owner                  pop
	:help                   ""
	:x                      0
	:y                      0
	:width                  376
	:height                 218
	:background-color       ""
	:foreground-color       ""
	:show-border            nil
	:menu                   nil
	:event-handler          nil
	:events                 ()
	:user-data              ()
)
(
	:type                   :scrolling-list
	:name                   types_list
	:owner                  controls1
	:help                   ""
	:x                      8
	:y                      8
	:width                  200
	:height                 145
	:foreground-color       ""
	:label                  "Types available"
	:label-type             :string
	:layout-type            :vertical
	:rows                   6
	:read-only              t
	:multiple-selections    nil
	:selection-required     nil
	:menu                   nil
	:notify-handler         type_selection
	:event-handler          nil
	:events                 ()
	:user-data              ()
)
(
	:type                   :message
	:name                   message2
	:owner                  controls1
	:help                   ""
	:x                      244
	:y                      8
	:width                  73
	:height                 13
	:foreground-color       ""
	:label                  "Array size:"
	:label-type             :string
	:label-bold             t
	:event-handler          nil
	:events                 ()
	:user-data              ()
)
(
	:type                   :slider
	:name                   array_size_slider
	:owner                  controls1
	:help                   ""
	:x                      244
	:y                      24
	:width                  93
	:height                 145
	:value-x                253
	:value-y                24
	:slider-width           75
	:foreground-color       ""
	:label                  ""
	:label-type             :string
	:layout-type            :horizontal
	:orientation            :vertical
	:show-endboxes          t
	:show-range             t
	:show-value             t
	:min-value              0
	:max-value              1000
	:ticks                  0
	:notify-handler         array_size
	:event-handler          nil
	:events                 ()
	:user-data              ()
)
(
	:type                   :text-field
	:name                   type_field
	:owner                  controls1
	:help                   ""
	:x                      12
	:y                      160
	:width                  174
	:height                 15
	:foreground-color       ""
	:text-type              :alphanumeric
	:label                  "Type:"
	:label-type             :string
	:value-x                58
	:value-y                160
	:layout-type            :horizontal
	:value-length           16
	:stored-length          80
	:read-only              nil
	:notify-handler         type_typing
	:event-handler          nil
	:events                 ()
	:user-data              ()
)
(
	:type                   :message
	:name                   message1
	:owner                  controls1
	:help                   ""
	:x                      248
	:y                      172
	:width                  114
	:height                 13
	:foreground-color       ""
	:label                  "0 = variable size"
	:label-type             :string
	:label-bold             t
	:event-handler          nil
	:events                 ()
	:user-data              ()
)
(
	:type                   :button
	:name                   Done_button
	:owner                  controls1
	:help                   ""
	:x                      120
	:y                      188
	:constant-width         nil
	:button-type            :normal
	:width                  88
	:height                 20
	:foreground-color       ""
	:label                  "Assign type"
	:label-type             :string
	:menu                   nil
	:notify-handler         assign_type
	:event-handler          nil
	:events                 ()
	:user-data              ()
)
(
	:type                   :setting
	:name                   array_setting
	:owner                  controls1
	:help                   ""
	:x                      264
	:y                      188
	:width                  75
	:height                 23
	:value-x                273
	:value-y                188
	:layout-type            :horizontal
	:foreground-color       ""
	:setting-type           :check
	:rows                   1
	:columns                0
	:label                  ""
	:label-type             :string
	:notify-handler         to_array_or_not_to_array
	:event-handler          nil
	:events                 ()
	:choices                ("Array" )
	:choice-label-types     (:string )
	:choice-colors          ("" )
	:user-data              ()
)
)