--* From BMT%WATSON.vnet.ibm.com@yktvmh.watson.ibm.com  Tue Oct 12 14:14:40 1993
--* Received: from yktvmh.watson.ibm.com by radical.watson.ibm.com (AIX 3.2/UCB 5.64/900524)
--*           id AA14264; Tue, 12 Oct 1993 14:14:40 -0400
--* Received: from watson.vnet.ibm.com by yktvmh.watson.ibm.com (IBM VM SMTP V2R3)
--*    with BSMTP id 7056; Tue, 12 Oct 93 14:20:36 EDT
--* Received: from YKTVMH by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id <A.BMT.NOTE.VAGENT2.4870.Oct.12.14:20:34.-0400>
--*           for asbugs@watson; Tue, 12 Oct 93 14:20:35 -0400
--* Received: from YKTVMH by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id 4868; Tue, 12 Oct 1993 14:20:33 EDT
--* Received: from cyst.watson.ibm.com by yktvmh.watson.ibm.com (IBM VM SMTP V2R3)
--*    with TCP; Tue, 12 Oct 93 14:20:31 EDT
--* Received: from spadserv.watson.ibm.com by cyst.watson.ibm.com (AIX 3.2/UCB 5.64/900528)
--*   id AA07284; Tue, 12 Oct 1993 14:19:57 -0400
--* Received: by spadserv.watson.ibm.com (AIX 3.2/UCB 5.64/900524)
--*           id AA16962; Tue, 12 Oct 1993 14:26:46 -0400
--* Date: Tue, 12 Oct 1993 14:26:46 -0400
--* From: bmt@spadserv.watson.ibm.com
--* X-External-Networks: yes
--* Message-Id: <9310121826.AA16962@spadserv.watson.ibm.com>
--* To: asbugs@watson.ibm.com
--* Subject: .asy files contain spurious (|Blank| ?) objects from With forms [/u/bmt/as2/basic.asy][31.2 (current)]

--@ Fixed  by:  SSD   Wed Oct 20 08:25:39 1993 
--@ Tested by:  none 
--@ Summary:    Empty 'with' arguments changed to '(|Comma|)' uniformly. 


((|Declare|
    |error|
    (|Apply|
      ->
      (|Declare|
        |s|
        |String|
        ((|symeNameCode| . 200156) (|symeTypeCode| . 526496392)))
      |Exit|)
    ((|documentation| .
        " The error function displays a string and exits.
")
      (|symeNameCode| . 425417271)
      (|symeTypeCode| . 11667951)))
  (|Declare|
    |Pointer|
    (|With| (|Blank| ?) (|Blank| ?))
    ((|documentation| .
        " Pointer is the type of pointers to opaque objects.

 Author: A# library
 Date Created: 1992-93
 Keywords: pointer
")
      (|symeNameCode| . 195553216)
      (|symeTypeCode| . 1069685805)
      (|domExports|)))
  (|Declare|
    |String|
    (|With|
      (|Blank| ?)
      (|Sequence|
        (|Declare|
          |string|
          (|Apply| -> |Literal| %)
          ((|symeNameCode| . 585283853) (|symeTypeCode| . 794338558)))
        (|Declare|
          |apply|
          (|Apply| -> (|Comma| |OutPort| %) |OutPort|)
          ((|symeNameCode| . 306472243) (|symeTypeCode| . 672733286)))))
    ((|documentation| .
        " String is the type of character strings for natural language text.

 Author: A# library
 Date Created: 1992-93
 Keywords: string, text
")
      (|symeNameCode| . 585242861)
      (|symeTypeCode| . 304498409)
      (|domExports|
        (|Declare|
          |string|
          (|Apply| -> |Literal| %)
          ((|symeNameCode| . 585283853) (|symeTypeCode| . 794338558)))
        (|Declare|
          |apply|
          (|Apply| -> (|Comma| |OutPort| %) |OutPort|)
          ((|symeNameCode| . 306472243) (|symeTypeCode| . 672733286))))))
  (|Declare|
    |Character|
    (|With|
      (|Blank| ?)
      (|Sequence|
        (|Declare|
          |string|
          (|Apply| -> |Literal| %)
          ((|symeNameCode| . 585283853) (|symeTypeCode| . 794338558)))
        (|Declare|
          |ord|
          (|Apply| -> % |SingleInteger|)
          ((|symeNameCode| . 318070400) (|symeTypeCode| . 286270707)))
        (|Declare|
          |char|
          (|Apply| -> |SingleInteger| %)
          ((|symeNameCode| . 864294210) (|symeTypeCode| . 352135667)))
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |Char| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 464971664)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |Char| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 945787792)))))
    ((|documentation| .
        " Characters for natural language text.

 In the portable byte code files, characters are represented in ASCII.
 In a running program, characters are represented according to the
 machine's native character set, e.g. ASCII or EBCDIC.

 Author: A# library
 Date Created: 1992-93
 Keywords: character, text, ASCII, EBCDIC
")
      (|symeNameCode| . 803414590)
      (|symeTypeCode| . 696023212)
      (|domExports|
        (|Declare|
          |string|
          (|Apply| -> |Literal| %)
          ((|symeNameCode| . 585283853) (|symeTypeCode| . 794338558)))
        (|Declare|
          |ord|
          (|Apply| -> % |SingleInteger|)
          ((|symeNameCode| . 318070400) (|symeTypeCode| . 286270707)))
        (|Declare|
          |char|
          (|Apply| -> |SingleInteger| %)
          ((|symeNameCode| . 864294210) (|symeTypeCode| . 352135667)))
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |Char| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 464971664)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |Char| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 945787792))))))
  (|Declare|
    |Integer|
    (|With|
      (|Blank| ?)
      (|Sequence|
        (|Declare|
          |integer|
          (|Apply| -> |Literal| %)
          ((|symeNameCode| . 477900237) (|symeTypeCode| . 794338558)))
        (|Declare|
          |coerce|
          (|Apply| -> |SingleInteger| %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 352135667)))
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |BInt| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 49611647)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |BInt| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 587302527)))))
    ((|documentation| .
        " Integer implements infinite precision integers.

 Author: A# library
 Date Created: 1992-93
 Keywords: infinite precision integer
")
      (|symeNameCode| . 484208045)
      (|symeTypeCode| . 935522315)
      (|domExports|
        (|Declare|
          |integer|
          (|Apply| -> |Literal| %)
          ((|symeNameCode| . 477900237) (|symeTypeCode| . 794338558)))
        (|Declare|
          |coerce|
          (|Apply| -> |SingleInteger| %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 352135667)))
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |BInt| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 49611647)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |BInt| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 587302527))))))
  (|Declare|
    |SingleInteger|
    (|With|
      (|Blank| ?)
      (|Sequence|
        (|Declare|
          |coerce|
          (|Apply| -> |Boolean| %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 413621005)))
        (|Declare|
          |coerce|
          (|Apply| -> |Byte| %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 318437286)))
        (|Declare|
          |coerce|
          (|Apply| -> |HalfInteger| %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 933504058)))
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |SInt| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 738450064)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |SInt| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 991920784)))))
    ((|documentation| .
        " SingleInteger implements single-precision integers.  Typically 32 bits.

 Author: A# library
 Date Created: 1992-93
 Keywords: single-precision integer
")
      (|symeNameCode| . 142471813)
      (|symeTypeCode| . 374095743)
      (|domExports|
        (|Declare|
          |coerce|
          (|Apply| -> |Boolean| %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 413621005)))
        (|Declare|
          |coerce|
          (|Apply| -> |Byte| %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 318437286)))
        (|Declare|
          |coerce|
          (|Apply| -> |HalfInteger| %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 933504058)))
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |SInt| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 738450064)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |SInt| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 991920784))))))
  (|Declare|
    |HalfInteger|
    (|With|
      (|Blank| ?)
      (|Sequence|
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |HInt| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 352243077)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |HInt| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 923890309)))))
    ((|documentation| .
        " HalfInteger implements half-precision integers.  Typically 16 bits.

 Author: A# library
 Date Created: 1992-93
 Keywords: half-precision integer
")
      (|symeNameCode| . 907555788)
      (|symeTypeCode| . 964819828)
      (|domExports|
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |HInt| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 352243077)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |HInt| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 923890309))))))
  (|Declare|
    |Byte|
    (|With|
      (|Blank| ?)
      (|Sequence|
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |XByte| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 439022439)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |XByte| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 618706023)))))
    ((|documentation| .
        " Byte implements single byte integers. Typically 8 bits.

 Author: A# library
 Date Created: 1992-93
 Keywords: byte, single byte integer
")
      (|symeNameCode| . 988953400)
      (|symeTypeCode| . 951957304)
      (|domExports|
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |XByte| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 439022439)))
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |XByte| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 618706023))))))
  (|Declare|
    |Boolean|
    (|With|
      (|Blank| ?)
      (|Sequence|
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |Bool| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 352714910)))
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |Bool| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 58875550)))))
    ((|documentation| .
        " The Boolean data type supports logical operations.
 Both arguments of the binary operations are always evaluated.

 Author: A# library
 Date Created: 1992-93
 Keywords: logical operation
")
      (|symeNameCode| . 740244383)
      (|symeTypeCode| . 66886054)
      (|domExports|
        (|Declare|
          |coerce|
          (|Apply| -> (|Qualify| |Bool| |Machine|) %)
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 352714910)))
        (|Declare|
          |coerce|
          (|Apply| -> % (|Qualify| |Bool| |Machine|))
          ((|symeNameCode| . 770345191) (|symeTypeCode| . 58875550))))))
  (|Declare|
    |Generator|
    (|Apply|
      ->
      (|Declare|
        t
        |Type|
        ((|symeNameCode| . 200125)
          (|symeTypeCode| . 547582661)
          (|domExports|)))
      (|With| (|Blank| ?) (|Blank| ?)))
    ((|documentation| .
        " Generator(T) is a type which allows T values to be obtained serially
 in a `repeat' or `collect' form.

 Author: A# library
 Date Created: 1992-93
 Keywords: generator, step
")
      (|symeNameCode| . 83976792)
      (|symeTypeCode| . 415906972)
      (|domExports|)))
  (|Declare|
    |OutPort|
    (|With|
      (|Blank| ?)
      (|Sequence|
        (|Declare|
          |print|
          %
          ((|symeNameCode| . 828947258) (|symeTypeCode| . 1015195433)))
        (|Declare|
          |apply|
          (|Apply| -> % %)
          ((|symeNameCode| . 306472243) (|symeTypeCode| . 143998972)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % |Character|) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 613687994)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % |String|) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 378260073)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % (|Qualify| |SInt| |Machine|)) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 663553182)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % (|Qualify| |BInt| |Machine|)) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 1061504141)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % (|Qualify| |SFlo| |Machine|)) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 44033684)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % (|Qualify| |DFlo| |Machine|)) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 564037253)))))
    ((|documentation| .
        " `OutPort' is a type of writable text streams.

 Author: A# library
 Date Created: 1992-93
 Keywords: file, stream, text, output, write, print
")
      (|symeNameCode| . 968858812)
      (|symeTypeCode| . 905746031)
      (|domExports|
        (|Declare|
          |print|
          %
          ((|symeNameCode| . 828947258) (|symeTypeCode| . 1015195433)))
        (|Declare|
          |apply|
          (|Apply| -> % %)
          ((|symeNameCode| . 306472243) (|symeTypeCode| . 143998972)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % |Character|) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 613687994)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % |String|) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 378260073)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % (|Qualify| |SInt| |Machine|)) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 663553182)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % (|Qualify| |BInt| |Machine|)) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 1061504141)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % (|Qualify| |SFlo| |Machine|)) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 44033684)))
        (|Declare|
          |put|
          (|Apply| -> (|Comma| % (|Qualify| |DFlo| |Machine|)) %)
          ((|symeNameCode| . 318137236) (|symeTypeCode| . 564037253)))))))