PROGRAM{
  DECLPROC __tact_verify_address
  DECLPROC __tact_store_address
  DECLPROC __gen_write_AddressList
  DECLPROC __gen_write_Distribution
  DECLPROC __gen_write_Foundation
  DECLPROC __gen_AddressList_from_tuple
  DECLPROC __gen_Distribution_from_tuple
  DECLPROC $__gen_Foundation_init
  107886 DECLMETHOD init
  DECLPROC main
  __tact_verify_address PROCINLINE:<{
    SBITS
    267 PUSHINT
    NEQ
    136 THROWIFNOT
  }>
  __tact_store_address PROCINLINE:<{
    STSLICER
  }>
  __gen_write_AddressList PROCINLINE:<{
    s0 s2 XCHG
    STDICT
    257 PUSHINT
    STIX
  }>
  __gen_write_Distribution PROCINLINE:<{
    3 -ROLL
    __gen_write_AddressList INLINECALLDICT
    STDICT
  }>
  __gen_write_Foundation PROCINLINE:<{
    s10 s9 s8 XCHG3
    __gen_write_AddressList INLINECALLDICT
    NEWC
    s6 s1 s3 XCHG3
    s5 s4 XCHG2
    __gen_write_Distribution INLINECALLDICT
    SWAP
    __tact_store_address INLINECALLDICT
    s1 s2 XCHG
    STDICT
    s0 s4 XCHG
    NEWC
    STDICT
    s1 s3 XCHG
    STDICT
    257 PUSHINT
    STIX
    ENDC
    ROT
    STREF
    ENDC
    SWAP
    STREF
  }>
  __gen_AddressList_from_tuple PROCINLINE:<{
    2 UNTUPLE
  }>
  __gen_Distribution_from_tuple PROCINLINE:<{
    2 UNTUPLE
    SWAP
    __gen_AddressList_from_tuple INLINECALLDICT
    ROT
  }>
  $__gen_Foundation_init PROC:<{
    PUSHNULL
    PUSHNULL
    PUSHNULL
    0 PUSHINT
    s0 s10 XCHG
    NEWC
    STREF
    s0 s10 XCHG
    s6 s9 XCHG
    4 5 REVERSE
    s5 s6 XCHG
    __gen_write_Foundation INLINECALLDICT
    ENDC
  }>
  init PROC:<{
    s0 s2 XCHG
    __gen_Distribution_from_tuple INLINECALLDICT
    s0 s3 XCHG
    __gen_AddressList_from_tuple INLINECALLDICT
    s3 s5 XCHG
    s1 s0 s4 XCHG3
    s0 s3 XCHG
    $__gen_Foundation_init CALLDICT
  }>
  main PROC:<{
  }>
}END>c