(saveFormat "2.3")
(date "Mon 03/Mar/1997 16:44:49 MST")
(veerev "4.0")
(platform "HP9000s700")
(execMode fast)
(filterNAN 0)
(workspaceStackingOrder M)
(SaveCF no)
(device 0 ROOTCONTEXT
(properties
(trigMode deg)
(nextID 17)
(popupTitleText "Extracting Values from an Array")
(popupMoveable 1)
(popupTitleTextColor "Black")
(popupTitleBackgroundColor "Gray")
(deleteGlobals 0))
(deviceList
(device 2 TEXTDISPLAY
(properties
(name "SubAry"))
(interface
(input 1
(name "Data"))))
(device 3 FROMARRAY
(properties
(expr 1 "Ary[3:5]"))
(interface
(input 1
(name "Ary")
(tag "Ary"))
(output 1
(name "Result")
(tag "Result")
(lock name constraints)
(optional yes))
(output 2
(name "Type")
(tag "Type"))
(output 3
(name "NumDims")
(tag "NumDims"))
(output 4
(name "DimSizes")
(tag "DimSizes"))
(output 5
(name "TotSize")
(tag "TotSize"))))
(device 4 TEXTDISPLAY
(properties
(name "Type"))
(interface
(input 1
(name "Data"))))
(device 5 TEXTDISPLAY
(properties
(name "NumDims"))
(interface
(input 1
(name "Data"))))
(device 6 TEXTDISPLAY
(properties
(name "DimSizes"))
(interface
(input 1
(name "Data"))))
(device 7 TEXTDISPLAY
(properties
(name "TotSize"))
(interface
(input 1
(name "Data"))))
(device 13 LITERALCONSTANT
(properties
(name "Text"))
(interface
(output 1
(name "Text")
(lock name constraints)))
(implementation
(value Text
(numDims 1)
(size 9)
(data  [ "Mercury" "Venus" "Earth" "Mars" "Jupiter" "Saturn" "Uranus" "Neptune"
"Pluto" ]))
(initValue Text
(data  ""))))
(device 14 NOTE)
(device 15 NOTE
(properties
(name "Information")
(text2 10 "This example shows how to use the Get Values object"
"to extract values from a text constant array."
"The expression Ary[3:5] extracts a sub-array using"
"elements at indexes 3-5.  Additionally, the array type,"
"number of dimensions, dimension size, and total array" "size are output." ""
"For more information, see the \"HP VEE Help\" topic,"
"\"To Extract Values from an Array\"." "")))
(configuration
(connect D1:1 D0:1)
(connect D6:1 D1:1)
(connect D1:2 D2:1)
(connect D1:3 D3:1)
(connect D1:4 D4:1)
(connect D1:5 D5:1)))
(contextCarrier
(wndOrigin 2 2)
(wndState res)
(active detail)
(detail
(extent 910 554)
(anchorPt 736 288)
(configuration
(devCarrierFor 2
(active open)
(icon
(extent 50 0))
(open
(extent 116 73))
(pinCenter 0 0))
(devCarrierFor 3
(active open)
(icon
(extent 77 57)
(iconImage "unbuild.icn"))
(open
(extent 121 110))
(terminals on)
(pinCenter -460 80))
(devCarrierFor 4
(active open)
(icon
(extent 36 0))
(open
(extent 131 28))
(pinCenter -170 50))
(devCarrierFor 5
(active open)
(icon
(extent 64 0))
(open
(extent 131 28))
(pinCenter -170 110))
(devCarrierFor 6
(active open)
(icon
(extent 62 0))
(open
(extent 131 28))
(pinCenter -170 170))
(devCarrierFor 7
(active open)
(icon
(extent 51 0))
(open
(extent 131 28))
(pinCenter -150 230))
(devCarrierFor 13
(active open)
(icon)
(open
(extent 136 160))
(pinCenter -650 80))
(devCarrierFor 14
(active icon)
(icon
(extent 338 48)
(iconImage "disclaim.icn")
(label off))
(open
(extent 200 100)
(editing enabled))
(pinCenter -10 -110))
(devCarrierFor 15
(active open)
(icon
(extent 77 0)
(iconImage "notepad.icn"))
(open
(extent 524 187)
(editing disabled))
(title off)
(pinCenter -460 -180))
(connect D1:1 D0:1
(points 4 -317 40 -300 40 -300 0 -61 0))
(connect D6:1 D1:1
(points 2 -580 80 -563 80))
(connect D1:2 D2:1
(points 4 -317 60 -300 60 -300 50 -238 50))
(connect D1:3 D3:1
(points 4 -317 80 -300 80 -300 110 -238 110))
(connect D1:4 D4:1
(points 6 -317 100 -310 100 -310 120 -300 120 -300 170 -238 170))
(connect D1:5 D5:1
(points 4 -317 120 -310 120 -310 230 -218 230)))
(stackingOrder 0 2 3 4 5 1 6 7 8))
(numberFormats
(realFormat standard)
(realSigDigits 6)
(realRadixSpec 4)
(integerBase decimal))))
