#! /usr/lib/veetest/veetest -r
(revision "B.00.00")
(date "Tue 25/May/1993")
(component 0 "ROOTCONTEXT"
 (implementation
  (component 0 "CONTEXT"
   (name "GetParm")
   (interface
    (sequence in)
    (sequence out)
    (input 1
     (type data)
     (name "File Name")
     (requires
      (datatype Text)
      (shape "Scalar")
     )
     (optional yes)
    )
    (input 2
     (type data)
     (name "ParmWanted")
     (requires
      (datatype Text)
     )
     (optional yes)
    )
    (output 1
     (type data)
     (name "Value")
     (lock constraints)
     (optional yes)
    )
    (output 2
     (type data)
     (name "Check")
     (lock constraints)
     (optional yes)
    )
   )
   (implementation
    (locked no)
    (trigMode deg)
    (nextID 17)
    (component 0 "FROMFILE"
     (interface
      (sequence in)
      (sequence out)
      (input 1
       (type control)
       (name "File Name")
       (requires
        (datatype Text)
        (shape "Scalar")
       )
       (lock name constraints)
       (optional yes)
      )
     )
     (implementation
      (attr iopath file read "/usr/local/amp/parm/83018A06.s"
       (readTerm "\n")
       (fs " ")
       (eol "\n")
       (multiField fullSyntax)
       (arrayFormat block)
      )
      (procedure
        EXECUTE REWIND
      )
     )
     (views
      (icon
       (origin 275 278)
       (extent 110 25)
      )
      (detail
       (origin 324 246)
       (extent 322 148)
      )
      (terminals on)
      (active icon)
     )
    )
    (component 1 "REPEATUNTILBREAK"
     (interface
      (sequence in)
      (sequence out)
      (output 1
       (type data)
       (name "Continuous")
       (lock name constraints)
      )
     )
     (implementation
     )
     (views
      (icon
       (origin 275 338)
       (extent 110 25)
      )
      (detail
      )
      (terminals on)
      (active icon)
     )
    )
    (component 2 "FROMFILE"
     (interface
      (sequence in)
      (sequence out)
      (input 1
       (type control)
       (name "File Name")
       (requires
        (datatype Text)
        (shape "Scalar")
       )
       (lock name constraints)
       (optional yes)
      )
      (output 1
       (type data)
       (name "X")
       (lock constraints)
       (optional yes)
      )
      (output 2
       (type exception)
       (name "Error")
       (lock name constraints)
       (optional yes)
      )
     )
     (implementation
      (attr iopath file read "/usr/local/amp/parm/83018A06.s"
       (readTerm "\n")
       (fs " ")
       (eol "\n")
       (multiField fullSyntax)
       (arrayFormat block)
      )
      (procedure
        READ TEXT x STR
      )
     )
     (views
      (icon
       (origin 345 388)
       (extent 110 25)
      )
      (detail
       (origin 122 251)
       (extent 322 148)
      )
      (terminals on)
      (active icon)
     )
    )
    (component 3 "CONSTANT"
     (name "NotFound")
     (subType "Integer")
     (interface
      (sequence in)
      (sequence out)
      (output 1
       (type data)
       (name "Int32")
       (lock name constraints)
      )
     )
     (implementation
      (component value Int32
       (name "NotFound")
       (datum 0)
      )
      (component autoTrigger off)
      (component initializeAtPrerun off)
      (component initializeAtActivate off)
      (component initValue Int32
       (name "LongInt")
       (datum 0)
      )
     )
     (views
      (icon
       (origin 465 548)
       (extent 110 25)
      )
      (detail
       (origin 808 643)
       (extent 144 34)
       (showFormat int)
      )
      (active icon)
     )
    )
    (component 4 "CONSTANT"
     (name "Zero")
     (subType "Real")
     (interface
      (sequence in)
      (sequence out)
      (output 1
       (type data)
       (name "Real")
       (lock name constraints)
      )
     )
     (implementation
      (component value Real
       (name "Zero")
       (datum 0)
      )
      (component autoTrigger off)
      (component initializeAtPrerun off)
      (component initializeAtActivate off)
      (component initValue Real
       (name "Real")
       (datum 0)
      )
     )
     (views
      (icon
       (origin 497 498)
       (extent 46 25)
      )
      (detail
       (origin 995 453)
       (extent 110 34)
       (showFormat real)
      )
      (active icon)
     )
    )
    (component 5 "BREAK"
     (interface
      (sequence in)
     )
     (implementation
     )
     (views
      (icon
       (origin 481 608)
       (extent 78 25)
      )
      (detail
      )
      (terminals on)
      (active icon)
     )
    )
    (component 6 "GATE"
     (interface
      (sequence in)
      (sequence out)
      (input 1
       (type data)
       (name "A")
       (tag "InData")
      )
      (output 1
       (type data)
       (name "X")
       (tag "OutData")
       (lock name constraints)
      )
     )
     (implementation
     )
     (views
      (icon
       (origin 557 288)
       (extent 46 25)
      )
      (detail
      )
      (terminals on)
      (active icon)
     )
    )
    (component 7 "LITERALCONSTANT"
     (name "#")
     (interface
      (sequence in)
      (sequence out)
      (output 1
       (type data)
       (name "Text")
       (lock name constraints)
      )
     )
     (implementation
      (component value Text
       (name "#")
       (datum "#")
      )
      (component autoTrigger off)
      (component initializeAtPrerun off)
      (component initializeAtActivate off)
      (component initValue Text
       (name "CString")
       (datum "")
      )
     )
     (views
      (icon
       (origin 477 208)
       (extent 46 25)
      )
      (detail
       (origin 374 214)
       (extent 192 32)
      )
      (active icon)
     )
    )
    (component 8 "FORMULA"
     (name "strPosChar(str,char)")
     (interface
      (sequence in)
      (sequence out)
      (input 1
       (type data)
       (name "str")
       (lock name constraints)
      )
      (input 2
       (type data)
       (name "char")
       (lock name constraints)
      )
      (output 1
       (type data)
       (name "index")
       (lock name constraints)
      )
     )
     (implementation
      (component isLocked yes)
      (component expr 1 "strPosChar(str,char)")
     )
     (views
      (icon
       (origin 555 198)
       (extent 190 25)
      )
      (detail
       (origin 558 214)
       (extent 214 112)
      )
      (terminals on)
      (active icon)
     )
    )
    (component 9 "IFTHENELSE"
     (name "comment?")
     (interface
      (sequence in)
      (sequence out)
      (input 1
       (type data)
       (name "A")
       (optional yes)
      )
      (output 1
       (type data)
       (name "Then")
       (lock name constraints)
      )
      (output 2
       (type data)
       (name "Else")
       (lock name constraints)
      )
     )
     (implementation
      (component isLocked no)
      (component expr "A<0")
     )
     (views
      (icon
       (origin 765 198)
       (extent 110 25)
      )
      (detail
       (origin 818 214)
       (extent 55 72)
      )
      (terminals on)
      (active icon)
     )
    )
    (component 10 "JUNCTION"
     (name "JCT")
     (interface
      (input 1
       (type data)
       (name "A")
       (lock name constraints)
      )
      (input 2
       (type data)
       (name "B")
       (lock name constraints)
      )
      (output 1
       (type data)
       (name "Data")
       (lock name constraints)
      )
     )
     (implementation
     )
     (views
      (icon
       (origin 967 348)
       (extent 46 25)
      )
      (detail
      )
      (terminals on)
      (active icon)
     )
    )
    (component 11 "GATE"
     (name "Gate")
     (interface
      (sequence in)
      (sequence out)
      (input 1
       (type data)
       (name "ParameterValue")
       (tag "InData")
       (requires
        (datatype Text)
        (shape "Scalar")
       )
      )
      (output 1
       (type data)
       (name "X")
       (tag "OutData")
       (lock name constraints)
      )
     )
     (implementation
     )
     (views
      (icon
       (origin 857 338)
       (extent 46 25)
      )
      (detail
       (origin 820 209)
       (extent 44 62)
      )
      (terminals on)
      (active icon)
     )
    )
    (component 12 "CONSTANT"
     (name "Found")
     (subType "Integer")
     (interface
      (sequence in)
      (sequence out)
      (output 1
       (type data)
       (name "Int32")
       (lock name constraints)
      )
     )
     (implementation
      (component value Int32
       (name "Found")
       (datum 1)
      )
      (component autoTrigger off)
      (component initializeAtPrerun off)
      (component initializeAtActivate off)
      (component initValue Int32
       (name "LongInt")
       (datum 0)
      )
     )
     (views
      (icon
       (origin 841 408)
       (extent 78 25)
      )
      (detail
       (origin 810 553)
       (extent 140 34)
       (showFormat int)
      )
      (active icon)
     )
    )
    (component 13 "BREAK"
     (interface
      (sequence in)
     )
     (implementation
     )
     (views
      (icon
       (origin 841 448)
       (extent 78 25)
      )
      (detail
      )
      (terminals on)
      (active icon)
     )
    )
    (component 14 "JUNCTION"
     (name "JCT")
     (interface
      (input 1
       (type data)
       (name "A")
       (lock name constraints)
      )
      (input 2
       (type data)
       (name "B")
       (lock name constraints)
      )
      (output 1
       (type data)
       (name "Data")
       (lock name constraints)
      )
     )
     (implementation
     )
     (views
      (icon
       (origin 957 538)
       (extent 46 25)
      )
      (detail
      )
      (terminals on)
      (active icon)
     )
    )
    (component 15 "IFTHENELSE"
     (name "Match?")
     (interface
      (sequence in)
      (sequence out)
      (input 1
       (type data)
       (name "ParmRead")
       (requires
        (datatype Text)
       )
       (optional yes)
      )
      (input 2
       (type data)
       (name "ParmWanted")
       (requires
        (datatype Text)
       )
       (optional yes)
      )
      (output 1
       (type data)
       (name "Then")
       (lock name constraints)
      )
      (output 2
       (type data)
       (name "Else")
       (lock name constraints)
      )
     )
     (implementation
      (component isLocked no)
      (component expr "ParmRead==ParmWanted")
     )
     (views
      (icon
       (origin 781 298)
       (extent 78 25)
      )
      (detail
       (origin 916 528)
       (extent 208 104)
      )
      (terminals on)
      (active icon)
     )
    )
    (component 16 "FROMSTRING"
     (interface
      (sequence in)
      (sequence out)
      (input 1
       (type data)
       (name "AString")
       (requires
        (datatype Text)
       )
       (lock name constraints)
      )
      (output 1
       (type data)
       (name "value")
       (lock constraints)
       (optional yes)
      )
      (output 2
       (type data)
       (name "label")
       (lock constraints)
       (optional yes)
      )
      (output 3
       (type data)
       (name "X")
       (lock constraints)
       (optional yes)
      )
     )
     (implementation
      (attr iopath string read "string"
       (readTerm "\n")
       (fs " ")
       (eol "\n")
       (multiField fullSyntax)
       (arrayFormat block)
      )
      (procedure
        READ TEXT label TOKEN EXCLUDE:" =\t"
        READ TEXT x TOKEN INCLUDE:" =\t"
        READ TEXT value TOKEN EXCLUDE:"\n "
      )
     )
     (views
      (icon
       (origin 625 283)
       (extent 110 34)
      )
      (detail
       (origin 294 262)
       (extent 278 107)
      )
      (terminals on)
      (active icon)
     )
    )
    (configuration
     (connect I1:1 D0:1)
     (connect D0:0 D1:0)
     (connect D1:1 D2:0)
     (connect I1:1 D2:1)
     (connect D4:0 D3:0)
     (connect D2:2 D4:0)
     (connect D3:0 D5:0)
     (connect D9:1 D6:0)
     (connect D2:1 D6:1)
     (connect D2:1 D8:1)
     (connect D7:1 D8:2)
     (connect D8:1 D9:1)
     (connect D11:1 D10:1)
     (connect D4:1 D10:2)
     (connect D15:1 D11:0)
     (connect D16:1 D11:1)
     (connect D11:0 D12:0)
     (connect D12:0 D13:0)
     (connect D12:1 D14:1)
     (connect D3:1 D14:2)
     (connect D16:2 D15:1)
     (connect I2:1 D15:2)
     (connect D6:1 D16:1)
     (connect D10:1 O1:1)
     (connect D14:1 O2:1)
    )
   )
   (views
    (icon
     (origin 561 148)
     (extent 78 25)
    )
    (detail
     (origin 222 172)
     (extent 826 476)
     (configuration
      (connect I1:1 D0:1
       (Point 224 290)
       (Point 272 290)
      )
      (connect D0:0 D1:0
       (Point 330 305)
       (Point 330 335)
      )
      (connect D1:1 D2:0
       (Point 387 350)
       (Point 400 350)
       (Point 400 385)
      )
      (connect I1:1 D2:1
       (Point 224 290)
       (Point 260 290)
       (Point 260 400)
       (Point 342 400)
      )
      (connect D4:0 D3:0
       (Point 520 525)
       (Point 520 545)
      )
      (connect D2:2 D4:0
       (Point 457 410)
       (Point 520 410)
       (Point 520 495)
      )
      (connect D3:0 D5:0
       (Point 520 575)
       (Point 520 605)
      )
      (connect D9:1 D6:0
       (Point 877 200)
       (Point 890 200)
       (Point 890 240)
       (Point 580 240)
       (Point 580 285)
      )
      (connect D2:1 D6:1
       (Point 457 390)
       (Point 470 390)
       (Point 470 300)
       (Point 554 300)
      )
      (connect D2:1 D8:1
       (Point 457 390)
       (Point 470 390)
       (Point 470 300)
       (Point 460 300)
       (Point 460 190)
       (Point 540 190)
       (Point 540 200)
       (Point 552 200)
      )
      (connect D7:1 D8:2
       (Point 525 220)
       (Point 552 220)
      )
      (connect D8:1 D9:1
       (Point 747 210)
       (Point 762 210)
      )
      (connect D11:1 D10:1
       (Point 905 350)
       (Point 964 350)
      )
      (connect D4:1 D10:2
       (Point 545 510)
       (Point 950 510)
       (Point 950 370)
       (Point 964 370)
      )
      (connect D15:1 D11:0
       (Point 861 300)
       (Point 880 300)
       (Point 880 335)
      )
      (connect D16:1 D11:1
       (Point 737 290)
       (Point 750 290)
       (Point 750 350)
       (Point 854 350)
      )
      (connect D11:0 D12:0
       (Point 880 365)
       (Point 880 405)
      )
      (connect D12:0 D13:0
       (Point 880 435)
       (Point 880 445)
      )
      (connect D12:1 D14:1
       (Point 921 420)
       (Point 940 420)
       (Point 940 540)
       (Point 954 540)
      )
      (connect D3:1 D14:2
       (Point 577 560)
       (Point 954 560)
      )
      (connect D16:2 D15:1
       (Point 737 300)
       (Point 778 300)
      )
      (connect I2:1 D15:2
       (Point 224 550)
       (Point 450 550)
       (Point 450 400)
       (Point 760 400)
       (Point 760 320)
       (Point 778 320)
      )
      (connect D6:1 D16:1
       (Point 605 300)
       (Point 622 300)
      )
      (connect D10:1 O1:1
       (Point 1015 360)
       (Point 1030 360)
       (Point 1030 290)
       (Point 1045 290)
      )
      (connect D14:1 O2:1
       (Point 1005 550)
       (Point 1045 550)
      )
     )
     (stackingOrder 7 9 8 11 15 12 13 10 14 5
       3 4 16 6 1 2 0)
    )
    (terminals on)
    (active icon)
   )
  )
  (configuration
  )
 )
 (views
  (detail
   (configuration
   )
  )
 )
)
