(List
  (Com {[LIT_OTHER ":"]} {[LIT_CHARS pax]} {[LIT_CHARS tests]})
  (Com {[LIT_CHARS integer]} {[LIT_VAR_LIKE "errors="] [LIT_CHARS 0] =} {[LIT_VAR_LIKE "tests="] [LIT_CHARS 0] =})
  (Com {[LIT_CHARS typeset]} {[LIT_CHARS -Z]} {[LIT_VAR_LIKE "TEST="] [LIT_CHARS 00] =})
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('bail', {[SQ ]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('clobber', {[LIT_CHARS 1]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('tmp', {[LIT_CHARS pax.tmp]})])
  (While
    (Com {[LIT_OTHER ":"]})
    (Case to_match={[VarSub 1]}, pat_word_list=[[{[LIT_OTHER "+"]}], [{[LIT_CHARS -]}], [{[LIT_CHARS .]}], [{[LIT_OTHER "*"]}]]
      (List
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('PS4', {[SQ <LIT_CHARS "+$LINENO+ ">]})])
        (Com {[LIT_CHARS shift]})
        (Com {[LIT_CHARS set]} {[LIT_CHARS -x]})
      )
      (List
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('clobber', {[SQ ]})])
        (Com {[LIT_CHARS shift]})
      )
      (List
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('bail', {[LIT_CHARS 1]})])
        (Com {[LIT_CHARS shift]})
      )
      (Com {[LIT_CHARS break]})
    )
  )
  (Case to_match={[VarSub 1]}, pat_word_list=[[{[LIT_OTHER "*"] [LIT_CHARS tar]}], [{[LIT_OTHER "*"]}]]
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('tar', {[VarSub 1]})])
      (Com {[LIT_CHARS shift]})
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('formats', {[DQ [LIT_CHARS tar.tar]]})])
    )
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('tar', {[SQ ]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('formats', {[DQ [LIT_CHARS "pax.pax pax:gzip.pgz cpio.cpio tar.tar tar:gzip.tgz"]]})])
    )
  )
  (Case to_match={[VarSub 1]}, pat_word_list=[[{[LIT_CHARS -] [LIT_OTHER "*"]}, {[SQ ]}]]
    (Com {[LIT_CHARS set]} {[LIT_CHARS pax]} {[DQ [VarSub @]]})
  )
  (Com {[LIT_CHARS set]} {[DQ [VarSub @]]} {[LIT_CHARS --physical]} {[LIT_CHARS --nosummary]} {[LIT_CHARS --noverify]})
  (Case to_match={[VarSub 1]}, pat_word_list=[[{[LIT_CHARS /] [LIT_OTHER "*"]}], [{[LIT_OTHER "*"]}]]
    (ElseTrue)
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('cmd', {[VarSub 1]})])
      (Com {[LIT_CHARS shift]})
      (Com {[LIT_CHARS set]} {[DQ [VarSub PWD][LIT_CHARS /][VarSub cmd]]} {[DQ [VarSub @]]})
    )
  )
  (Com {[LIT_CHARS print]} {[LIT_CHARS -u2]} {[DQ [LIT_CHARS "TEST\t"][VarSub @]]})
  (For format [{[VarSub formats]}])
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('suf', {[VarSub format transform_ops=[VS_UNARY_DPOUND {[LIT_CHARS "*."]}]]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('fmt', {[DQ [LIT_CHARS "--format="][VarSub format transform_ops=[VS_UNARY_PERCENT {[LIT_CHARS ".*"]}]]]})])
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS all]} {[LIT_CHARS files]} {[LIT_CHARS created]} {[LIT_CHARS in]} {[VarSub tmp]})
      (Com {[LIT_CHARS rm]} {[LIT_CHARS -rf]} {[VarSub tmp]})
      (Com {[LIT_CHARS mkdir]} {[VarSub tmp]})
      (Com {[LIT_CHARS cd]} {[VarSub tmp]})
      (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub tests]}} })
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 0]})])
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS old]} {[LIT_CHARS files]} {[LIT_CHARS and]} {[LIT_CHARS base]} {[LIT_CHARS archive]})
      (Com {[LIT_CHARS mkdir]} {[LIT_CHARS old]})
      (Com {[LIT_CHARS cd]} {[LIT_CHARS old]})
      (For i [{[LIT_CHARS a]}, {[LIT_CHARS b]}, {[LIT_CHARS c]}, {[LIT_CHARS d]}, {[LIT_CHARS e]}, {[LIT_CHARS f]}, {[LIT_CHARS g]}])
        (Com {[LIT_CHARS print]} {[VarSub i] [VarSub i] [VarSub i]}
          <
          (FilenameRedirectNode filename={[VarSub i]} <REDIR_GREAT ">"> 1),
          >
        )
      )
      (Com {[LIT_CHARS ln]} {[LIT_CHARS a]} {[LIT_CHARS i]})
      (Com {[LIT_CHARS ln]} {[LIT_CHARS b]} {[LIT_CHARS j]})
      (Com {[LIT_CHARS ln]} {[LIT_CHARS -s]} {[LIT_CHARS c]} {[LIT_CHARS k]})
      (Com {[LIT_CHARS ln]} {[LIT_CHARS -s]} {[LIT_CHARS d]} {[LIT_CHARS m]})
      (Com {[LIT_CHARS mkdir]} {[LIT_CHARS dirsub]})
      (Com {[LIT_CHARS print]} {[LIT_CHARS aha]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS dirsub/x]} <REDIR_GREAT ">"> 1),
        >
      )
      (Case to_match={[VarSub tar]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "*"]}]]
        (AndOr OP_OR_IF
          (Com {[DQ [VarSub @]]} {[LIT_CHARS -wf]} {[LIT_CHARS ../old.] [VarSub suf]} {[VarSub fmt]} {[LIT_OTHER "*"]})
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
        )
        (AndOr OP_OR_IF
          (Com {[VarSub tar]} {[LIT_CHARS cf]} {[LIT_CHARS ../old.] [VarSub suf]} {[LIT_CHARS .]})
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
        )
      )
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ..]})
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS new]} {[LIT_CHARS files]} {[LIT_CHARS and]} {[LIT_CHARS base]} {[LIT_CHARS archive]})
      (Com {[LIT_CHARS mkdir]} {[LIT_CHARS new]})
      (Com {[LIT_CHARS cd]} {[LIT_CHARS new]})
      (If
        (Com {[LIT_CHARS false]})
        (AndOr OP_OR_IF
          (Com {[DQ [VarSub @]]} {[LIT_CHARS -rf]} {[LIT_CHARS ../old.] [VarSub suf]})
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
        )
        (ElseTrue)
        (List
          (Com {[LIT_OTHER ":"]} {[LIT_CHARS directory]} {[LIT_CHARS link]} {[LIT_CHARS order]} {[LIT_CHARS matters] [LIT_OTHER "!"]})
          (For i [{[LIT_CHARS a]}, {[LIT_CHARS b]}, {[LIT_CHARS c]}, {[LIT_CHARS d]}, {[LIT_CHARS e]}, {[LIT_CHARS f]}, {[LIT_CHARS g]}])
            (Com {[LIT_CHARS print]} {[VarSub i] [VarSub i] [VarSub i]}
              <
              (FilenameRedirectNode filename={[VarSub i]} <REDIR_GREAT ">"> 1),
              >
            )
          )
          (Com {[LIT_CHARS ln]} {[LIT_CHARS a]} {[LIT_CHARS i]})
          (Com {[LIT_CHARS ln]} {[LIT_CHARS b]} {[LIT_CHARS j]})
          (Com {[LIT_CHARS ln]} {[LIT_CHARS -s]} {[LIT_CHARS c]} {[LIT_CHARS k]})
          (Com {[LIT_CHARS ln]} {[LIT_CHARS -s]} {[LIT_CHARS d]} {[LIT_CHARS m]})
          (Com {[LIT_CHARS print]} {[DQ [LIT_CHARS xxxx]]}
            <
            (FilenameRedirectNode filename={[LIT_CHARS ca]} <REDIR_GREAT ">"> 1),
            >
          )
          (Com {[LIT_OTHER ":"]} {[LIT_CHARS have]} {[LIT_CHARS a]} {[LIT_CHARS dir]} {[LIT_CHARS alphabetically]} {[LIT_CHARS between]} {[LIT_CHARS file1]} {[LIT_CHARS and]} {[LIT_CHARS file2]})
          (Com {[LIT_CHARS mkdir]} {[LIT_CHARS csubdir]})
          (Com {[LIT_CHARS print]} {[DQ [LIT_CHARS ccc]]}
            <
            (FilenameRedirectNode filename={[LIT_CHARS csubdir/h]} <REDIR_GREAT ">"> 1),
            >
          )
          (Com {[LIT_CHARS mkdir]} {[LIT_CHARS dirsub]})
          (Com {[LIT_OTHER ":"]} {[LIT_CHARS have]} {[LIT_CHARS file1]} {[LIT_CHARS alphabetically]} {[LIT_CHARS less]} {[LIT_CHARS than]} {[LIT_CHARS file2]})
          (Com {[LIT_CHARS ln]} {[LIT_CHARS ca]} {[LIT_CHARS dirsub/y]})
          (Com {[LIT_CHARS print]} {[LIT_CHARS aha]}
            <
            (FilenameRedirectNode filename={[LIT_CHARS dirsub/x]} <REDIR_GREAT ">"> 1),
            >
          )
        )
      )
      (Com {[LIT_CHARS rm]} {[LIT_CHARS a]})
      (Com {[LIT_CHARS sleep]} {[LIT_CHARS 1]})
      (Com {[LIT_CHARS print]} {[LIT_CHARS DDD]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS d]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS print]} {[LIT_CHARS zzz]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS z]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS rm]} {[LIT_CHARS m]})
      (Com {[LIT_CHARS ln]} {[LIT_CHARS -s]} {[LIT_CHARS e]} {[LIT_CHARS m]})
      (Com {[LIT_CHARS mkdir]} {[LIT_CHARS beta]})
      (Com {[LIT_CHARS print]} {[LIT_CHARS ppp]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS beta/p]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS print]} {[LIT_CHARS qqq]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS beta/q]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS print]} {[LIT_CHARS rrr]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS beta/r]} <REDIR_GREAT ">"> 1),
        >
      )
      (Case to_match={[VarSub tar]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "*"]}]]
        (AndOr OP_OR_IF
          (Com {[DQ [VarSub @]]} {[LIT_CHARS -wf]} {[LIT_CHARS ../new.] [VarSub suf]} {[VarSub fmt]} {[LIT_OTHER "*"]})
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
        )
        (AndOr OP_OR_IF
          (Com {[VarSub tar]} {[LIT_CHARS cf]} {[LIT_CHARS ../new.] [VarSub suf]} {[LIT_CHARS .]})
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
        )
      )
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ..]})
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS delta]} {[LIT_CHARS archive]})
      (AndOr OP_OR_IF
        (Com {[DQ [VarSub @]]} {[LIT_CHARS -rf]} {[LIT_CHARS new.] [VarSub suf]} {[LIT_CHARS -wf]} {[LIT_CHARS old-new.] [VarSub suf]} {[VarSub fmt]} {[LIT_CHARS -z]} {[LIT_CHARS old.] [VarSub suf]})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS replicate]} {[LIT_CHARS new]} {[LIT_CHARS archive]})
      (AndOr OP_OR_IF
        (Com {[DQ [VarSub @]]} {[LIT_CHARS -rf]} {[LIT_CHARS old-new.] [VarSub suf]} {[LIT_CHARS -z]} {[LIT_CHARS old.] [VarSub suf]} {[LIT_CHARS -wf]} {[LIT_CHARS rep.] [VarSub suf]} {[VarSub fmt]})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS verify]} {[LIT_CHARS replica]})
      (Com {[LIT_CHARS mkdir]} {[LIT_CHARS rep]})
      (Com {[LIT_CHARS cd]} {[LIT_CHARS rep]})
      (AndOr OP_OR_IF
        (Com {[DQ [VarSub @]]} {[LIT_CHARS -rf]} {[LIT_CHARS ../rep.] [VarSub suf]})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ..]})
      (Com {[LIT_CHARS diff]} {[LIT_CHARS -r]} {[LIT_CHARS new]} {[LIT_CHARS rep]})
      (Case to_match={[VarSub status] [VarSub ?]}, pat_word_list=[[{[LIT_CHARS 00]}], [{[LIT_OTHER "*"]}]]
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[SQ ]})])
        (List
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[DQ [LIT_CHARS " FAILED"]]})])
          (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub errors]}} })
        )
      )
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('TEST', {[VarSub tests]})])
      (Com {[LIT_CHARS print]} {[LIT_CHARS -u2]} {[DQ [VarSub TEST][LIT_CHARS "\tbase "][VarSub fmt][VarSub result]]})
      (Case to_match={[VarSub bail] [LIT_OTHER ":"] [VarSub result]}, pat_word_list=[[{[LIT_CHARS 1] [LIT_OTHER ":"] [LIT_OTHER "?"] [LIT_OTHER "*"]}]]
        (Com {[LIT_CHARS exit]} {[LIT_CHARS 1]})
      )
      (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub tests]}} })
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 0]})])
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS add]} {[LIT_CHARS subdir]} {[LIT_CHARS to]} {[LIT_CHARS old]})
      (Com {[LIT_CHARS sleep]} {[LIT_CHARS 1]})
      (Com {[LIT_CHARS mkdir]} {[LIT_CHARS old/asub]})
      (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS zzz]]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS old/asub/w]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS add]} {[LIT_CHARS same]} {[LIT_CHARS subdir]} {[LIT_CHARS to]} {[LIT_CHARS new]} {[LIT_CHARS but]} {[LIT_CHARS with]} {[LIT_CHARS newer]} {[LIT_CHARS time]})
      (Com {[LIT_CHARS sleep]} {[LIT_CHARS 1]})
      (Com {[LIT_CHARS mkdir]} {[LIT_CHARS new/asub]})
      (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS zzz]]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS new/asub/w]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS redo]} {[LIT_CHARS the]} {[LIT_CHARS old]} {[LIT_CHARS and]} {[LIT_CHARS new]} {[LIT_CHARS base]} {[LIT_CHARS archives]})
      (Com {[LIT_CHARS cd]} {[LIT_CHARS old]})
      (Case to_match={[VarSub tar]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "*"]}]]
        (AndOr OP_OR_IF
          (Com {[DQ [VarSub @]]} {[LIT_CHARS -wf]} {[LIT_CHARS ../old.] [VarSub suf]} {[VarSub fmt]} {[LIT_OTHER "*"]})
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
        )
        (AndOr OP_OR_IF
          (Com {[VarSub tar]} {[LIT_CHARS cf]} {[LIT_CHARS ../old.] [VarSub suf]} {[LIT_CHARS .]})
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
        )
      )
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ../new]})
      (Case to_match={[VarSub tar]}, pat_word_list=[[{[SQ ]}], [{[LIT_OTHER "*"]}]]
        (AndOr OP_OR_IF
          (Com {[DQ [VarSub @]]} {[LIT_CHARS -wf]} {[LIT_CHARS ../new.] [VarSub suf]} {[VarSub fmt]} {[LIT_OTHER "*"]})
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
        )
        (AndOr OP_OR_IF
          (Com {[VarSub tar]} {[LIT_CHARS cf]} {[LIT_CHARS ../new.] [VarSub suf]} {[LIT_CHARS .]})
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
        )
      )
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ..]})
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS delta]} {[LIT_CHARS archive]})
      (AndOr OP_OR_IF
        (Com {[DQ [VarSub @]]} {[LIT_CHARS -rf]} {[LIT_CHARS new.] [VarSub suf]} {[LIT_CHARS -wf]} {[LIT_CHARS old-new.] [VarSub suf]} {[VarSub fmt]} {[LIT_CHARS -z]} {[LIT_CHARS old.] [VarSub suf]})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS replicate]} {[LIT_CHARS new]} {[LIT_CHARS archive]})
      (AndOr OP_OR_IF
        (Com {[DQ [VarSub @]]} {[LIT_CHARS -rf]} {[LIT_CHARS old-new.] [VarSub suf]} {[LIT_CHARS -z]} {[LIT_CHARS old.] [VarSub suf]} {[LIT_CHARS -wf]} {[LIT_CHARS rep.] [VarSub suf]} {[VarSub fmt]})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS verify]} {[LIT_CHARS replica]})
      (Com {[LIT_CHARS rm]} {[LIT_CHARS -rf]} {[LIT_CHARS rep]})
      (Com {[LIT_CHARS mkdir]} {[LIT_CHARS rep]})
      (Com {[LIT_CHARS cd]} {[LIT_CHARS rep]})
      (AndOr OP_OR_IF
        (Com {[DQ [VarSub @]]} {[LIT_CHARS -rf]} {[LIT_CHARS ../rep.] [VarSub suf]})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ..]})
      (Com {[LIT_CHARS diff]} {[LIT_CHARS -r]} {[LIT_CHARS new]} {[LIT_CHARS rep]})
      (Case to_match={[VarSub status] [VarSub ?]}, pat_word_list=[[{[LIT_CHARS 00]}], [{[LIT_OTHER "*"]}]]
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[SQ ]})])
        (List
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[DQ [LIT_CHARS " FAILED"]]})])
          (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub errors]}} })
        )
      )
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('TEST', {[VarSub tests]})])
      (Com {[LIT_CHARS print]} {[LIT_CHARS -u2]} {[DQ [VarSub TEST][LIT_CHARS "\tdelta "][VarSub fmt][VarSub result]]})
      (Case to_match={[VarSub bail] [LIT_OTHER ":"] [VarSub result]}, pat_word_list=[[{[LIT_CHARS 1] [LIT_OTHER ":"] [LIT_OTHER "?"] [LIT_OTHER "*"]}]]
        (Com {[LIT_CHARS exit]} {[LIT_CHARS 1]})
      )
      (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub tests]}} })
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 0]})])
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS verify]} {[LIT_CHARS dir]} {[LIT_CHARS to]} {[LIT_CHARS ar]} {[LIT_CHARS to]} {[LIT_CHARS dir]} {[LIT_CHARS to]} {[LIT_CHARS ar]})
      (Com {[LIT_CHARS cd]} {[LIT_CHARS old]})
      (AndOr OP_OR_IF
        (Com {[DQ [VarSub @]]} {[LIT_CHARS -wf]} {[LIT_CHARS ../o]} {[LIT_CHARS .]})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ../new]})
      (Com {[LIT_CHARS rm]} {[LIT_CHARS -r]} {[LIT_OTHER "*"]})
      (AndOr OP_OR_IF
        (Com {[DQ [VarSub @]]} {[LIT_CHARS -rf]} {[LIT_CHARS ../o]})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (AndOr OP_OR_IF
        (Com {[DQ [VarSub @]]} {[LIT_CHARS -wf]} {[LIT_CHARS ../n]} {[LIT_CHARS .]})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ..]})
      (AndOr OP_OR_IF
        (Pipeline
          (Com {[DQ [VarSub @]]} {[LIT_CHARS -vf]} {[LIT_CHARS o]}
            <
            (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT "2>"> 2),
            >
          )
          (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[SQ <LIT_CHARS "/^l/s/ ... [ 0-9][0-9] [0-9][0-9]:[0-9][0-9] / /">]}
            <
            (FilenameRedirectNode filename={[LIT_CHARS oo]} <REDIR_GREAT ">"> 1),
            >
          )
        )
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (AndOr OP_OR_IF
        (Pipeline
          (Com {[DQ [VarSub @]]} {[LIT_CHARS -vf]} {[LIT_CHARS n]}
            <
            (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT "2>"> 2),
            >
          )
          (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[SQ <LIT_CHARS "/^l/s/ ... [ 0-9][0-9] [0-9][0-9]:[0-9][0-9] / /">]}
            <
            (FilenameRedirectNode filename={[LIT_CHARS nn]} <REDIR_GREAT ">"> 1),
            >
          )
        )
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
      )
      (Com {[LIT_CHARS diff]} {[LIT_CHARS oo]} {[LIT_CHARS nn]})
      (Case to_match={[VarSub status] [VarSub ?]}, pat_word_list=[[{[LIT_CHARS 00]}], [{[LIT_OTHER "*"]}]]
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[SQ ]})])
        (List
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[DQ [LIT_CHARS " FAILED"]]})])
          (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub errors]}} })
        )
      )
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('TEST', {[VarSub tests]})])
      (Com {[LIT_CHARS print]} {[LIT_CHARS -u2]} {[DQ [VarSub TEST][LIT_CHARS "\tio "][VarSub fmt][VarSub result]]})
      (Case to_match={[VarSub bail] [LIT_OTHER ":"] [VarSub result]}, pat_word_list=[[{[LIT_CHARS 1] [LIT_OTHER ":"] [LIT_OTHER "?"] [LIT_OTHER "*"]}]]
        (Com {[LIT_CHARS exit]} {[LIT_CHARS 1]})
      )
      (Com {[LIT_OTHER ":"]} {[LIT_CHARS back]} {[LIT_CHARS to]} {[LIT_CHARS parent]} {[LIT_CHARS of]} {[VarSub tmp]})
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ..]})
    )
  )
  (Com {[LIT_CHARS cd]} {[VarSub tmp]})
  (Com {[LIT_OTHER ":"]} {[LIT_CHARS rw]} {[LIT_CHARS test]})
  (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub tests]}} })
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 0]})])
  (Com {[LIT_CHARS mkdir]} {[LIT_CHARS cpy]})
  (AndOr OP_OR_IF
    (Com {[DQ [VarSub @]]} {[LIT_CHARS -rw]} {[LIT_CHARS new]} {[LIT_CHARS cpy]})
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('status', {[LIT_CHARS 1]})])
  )
  (Com {[LIT_CHARS diff]} {[LIT_CHARS -r]} {[LIT_CHARS new]} {[LIT_CHARS cpy/new]})
  (Case to_match={[VarSub status] [VarSub ?]}, pat_word_list=[[{[LIT_CHARS 00]}], [{[LIT_OTHER "*"]}]]
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[SQ ]})])
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[DQ [LIT_CHARS " FAILED"]]})])
      (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub errors]}} })
    )
  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('TEST', {[VarSub tests]})])
  (Com {[LIT_CHARS print]} {[LIT_CHARS -u2]} {[DQ [VarSub TEST][LIT_CHARS "\tcopy new cpy"][VarSub result]]})
  (Case to_match={[VarSub bail] [LIT_OTHER ":"] [VarSub result]}, pat_word_list=[[{[LIT_CHARS 1] [LIT_OTHER ":"] [LIT_OTHER "?"] [LIT_OTHER "*"]}]]
    (Com {[LIT_CHARS exit]} {[LIT_CHARS 1]})
  )
  (Com {[LIT_OTHER ":"]} {[LIT_CHARS conversion]} {[LIT_CHARS test]})
  (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub tests]}} })
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('x', {[LIT_CHARS ascii]})])
  (Com {[LIT_CHARS echo]} {[VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x] [VarSub x]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS a]} <REDIR_GREAT ">"> 1),
    >
  )
  (For i [{[LIT_CHARS 1]}, {[LIT_CHARS 2]}, {[LIT_CHARS 3]}, {[LIT_CHARS 4]}])
    (List
      (Com {[LIT_CHARS cat]} {[LIT_CHARS a]} {[LIT_CHARS a]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS b]} <REDIR_GREAT ">"> 1),
        >
      )
      (Com {[LIT_CHARS cat]} {[LIT_CHARS b]} {[LIT_CHARS b]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS a]} <REDIR_GREAT ">"> 1),
        >
      )
    )
  )
  (Com {[DQ [VarSub @]]} {[LIT_CHARS -wf]} {[LIT_CHARS a.pax]} {[LIT_CHARS -s]} {[LIT_COMMA ","] [LIT_CHARS a] [LIT_COMMA ","] [LIT_CHARS b] [LIT_COMMA ","]} {[LIT_CHARS --to] [LIT_OTHER "="] [LIT_CHARS ebcdic3]} {[LIT_CHARS a]})
  (Com {[DQ [VarSub @]]} {[LIT_CHARS -rf]} {[LIT_CHARS a.pax]} {[LIT_CHARS --from] [LIT_OTHER "="] [LIT_CHARS ebcdic3]})
  (If
    (Com {[LIT_CHARS cmp]} {[LIT_CHARS -s]} {[LIT_CHARS a]} {[LIT_CHARS b]})
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[SQ ]})])
    (ElseTrue)
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('result', {[DQ [LIT_CHARS " FAILED"]]})])
      (DParen {A1 AS_OP_DPLUS {A Atom NODE_ARITH_WORD {[VarSub errors]}} })
    )
  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('TEST', {[VarSub tests]})])
  (Com {[LIT_CHARS print]} {[LIT_CHARS -u2]} {[DQ [VarSub TEST][LIT_CHARS "\tcodeset conversion"][VarSub result]]})
  (Case to_match={[VarSub bail] [LIT_OTHER ":"] [VarSub result]}, pat_word_list=[[{[LIT_CHARS 1] [LIT_OTHER ":"] [LIT_OTHER "?"] [LIT_OTHER "*"]}]]
    (Com {[LIT_CHARS exit]} {[LIT_CHARS 1]})
  )
  (Com {[LIT_OTHER ":"]} {[LIT_CHARS clean]} {[LIT_CHARS up]})
  (Case to_match={[VarSub clobber]}, pat_word_list=[[{[LIT_OTHER "?"] [LIT_OTHER "*"]}]]
    (List
      (Com {[LIT_CHARS cd]} {[LIT_CHARS ..]})
      (Com {[LIT_CHARS rm]} {[LIT_CHARS -rf]} {[VarSub tmp]})
    )
  )
  (Case to_match={[VarSub errors]}, pat_word_list=[[{[LIT_CHARS 1]}], [{[LIT_OTHER "*"]}]]
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('plural', {[SQ ]})])
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('plural', {[LIT_CHARS s]})])
  )
  (Com {[LIT_CHARS print]} {[LIT_CHARS -u2]} {[DQ [LIT_CHARS "TEST\t"][VarSub 1][LIT_CHARS ", "][VarSub tests][LIT_CHARS " tests, "][VarSub errors][LIT_CHARS " error"][VarSub plural]]})
)