(command.CommandList
  children: [
    (command.AndOr
      ops: [Id.Op_DAmp]
      children: [
        (command.Simple
          words: [{<less>} {<-K>} {<-Ff>} {<'/dev/null'>}]
          redirects: [(redir op:<Id.Redir_Great '2>'> loc:(redir_loc.Fd fd:2) arg:{<'/dev/null'>})]
          more_env: []
          do_fork: T
        )
        (command.ShAssignment
          pairs: [
            (assign_pair
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'CTRL_C_EXITS='> name:CTRL_C_EXITS)
              op: assign_op.Equal
              rhs: {(DQ <-K>)}
              spids: [100]
            )
          ]
          redirects: []
        )
      ]
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'RED='> name:RED)
                  op: assign_op.Equal
                  rhs: {<1>}
                  spids: [106]
                )
              ]
              redirects: []
            )
          terminator: <Id.Op_Semi _>
        )
        (command.Sentence
          child: 
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'GREEN='> name:GREEN)
                  op: assign_op.Equal
                  rhs: {<2>}
                  spids: [110]
                )
              ]
              redirects: []
            )
          terminator: <Id.Op_Semi _>
        )
        (command.Sentence
          child: 
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'BLUE='> name:BLUE)
                  op: assign_op.Equal
                  rhs: {<4>}
                  spids: [114]
                )
              ]
              redirects: []
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          pairs: [
            (assign_pair
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'BRIGHT='> name:BRIGHT)
              op: assign_op.Equal
              rhs: {(SQ <'1;'>)}
              spids: [118]
            )
          ]
          redirects: []
        )
      ]
    )
    (command.ShFunction
      name: tputc
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.Sentence
              child: 
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'bright='> name:bright)
                      op: assign_op.Equal
                      rhs: {($ Id.VSub_Number 1)}
                      spids: [131]
                    )
                  ]
                  redirects: []
                )
              terminator: <Id.Op_Semi _>
            )
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'colour='> name:colour)
                  op: assign_op.Equal
                  rhs: {($ Id.VSub_Number 2)}
                  spids: [135]
                )
              ]
              redirects: []
            )
            (command.AndOr
              ops: [Id.Op_DAmp]
              children: [
                (C {<Id.Lit_LBracket '['>} {(DQ ($ Id.VSub_DollarName bright))} {<Id.Lit_RBracket ']'>})
                (C {<tput>} {<bold>})
              ]
            )
            (C {<tput>} {<setaf>} {($ Id.VSub_DollarName colour)})
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'DEL='> name:DEL)
          op: assign_op.Equal
          rhs: 
            {
              (DQ 
                (command_sub
                  left_token: <Id.Left_Backtick '`'>
                  child: (C {<tputc>} {($ Id.VSub_DollarName BRIGHT)} {($ Id.VSub_DollarName RED)})
                  right: <Id.Backtick_Right '`'>
                )
              )
            }
          spids: [163]
        )
      ]
      redirects: []
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'ADD='> name:ADD)
          op: assign_op.Equal
          rhs: 
            {
              (DQ 
                (command_sub
                  left_token: <Id.Left_Backtick '`'>
                  child: (C {<tputc>} {($ Id.VSub_DollarName BRIGHT)} {($ Id.VSub_DollarName GREEN)})
                  right: <Id.Backtick_Right '`'>
                )
              )
            }
          spids: [176]
        )
      ]
      redirects: []
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'CHG='> name:CHG)
          op: assign_op.Equal
          rhs: 
            {
              (DQ 
                (command_sub
                  left_token: <Id.Left_Backtick '`'>
                  child: (C {<tputc>} {($ Id.VSub_DollarName BRIGHT)} {($ Id.VSub_DollarName BLUE)})
                  right: <Id.Backtick_Right '`'>
                )
              )
            }
          spids: [189]
        )
      ]
      redirects: []
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'FIL='> name:FIL)
          op: assign_op.Equal
          rhs: 
            {
              (DQ 
                (command_sub
                  left_token: <Id.Left_Backtick '`'>
                  child: (C {<tput>} {<smso>})
                  right: <Id.Backtick_Right '`'>
                )
              )
            }
          spids: [202]
        )
      ]
      redirects: []
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'RST='> name:RST)
          op: assign_op.Equal
          rhs: 
            {
              (DQ 
                (command_sub
                  left_token: <Id.Left_Backtick '`'>
                  child: (C {<tput>} {<sgr0>})
                  right: <Id.Backtick_Right '`'>
                )
              )
            }
          spids: [216]
        )
      ]
      redirects: []
    )
    (command.Pipeline
      children: [
        (command.If
          arms: [
            (if_arm
              cond: 
                (condition.Shell
                  commands: [
                    (command.Sentence
                      child: 
                        (C {<Id.Lit_LBracket '['>} {(DQ ($ Id.VSub_Pound '#'))} {<-eq>} {(DQ <2>)} 
                          {<Id.Lit_RBracket ']'>}
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                )
              action: [(C {<diff>} {<-Naru>} {(DQ ($ Id.VSub_At '@'))})]
              spids: [228 245]
            )
          ]
          else_action: [(C {<cat>} {(DQ ($ Id.VSub_At '@'))})]
          redirects: []
        )
        (C {<sed>} 
          {
            (DQ <'\n'> <'s/^'> <Id.Lit_BadBackslash '\\'> <'*'> <Id.Lit_BadBackslash '\\'> <'{3'> 
              <Id.Lit_BadBackslash '\\'> <'}.*'> <Id.Lit_BadBackslash '\\'> <'*'> <Id.Lit_BadBackslash '\\'> <'{4'> <Id.Lit_BadBackslash '\\'> 
              <'}/'> ($ Id.VSub_DollarName CHG) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> <'  s/^-'> 
              <Id.Lit_BadBackslash '\\'> <'{3'> <Id.Lit_BadBackslash '\\'> <'}.*-'> <Id.Lit_BadBackslash '\\'> <'{4'> <Id.Lit_BadBackslash '\\'> 
              <'}/'> ($ Id.VSub_DollarName CHG) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> <'             s/^@.*/'> 
              ($ Id.VSub_DollarName CHG) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> <'         s/^[0-9].*/'> ($ Id.VSub_DollarName CHG) <'&'> 
              ($ Id.VSub_DollarName RST) <'/;t\n'> <'             s/^!.*/'> ($ Id.VSub_DollarName CHG) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> 
              <'\n'> <'             s/^-.*/'> ($ Id.VSub_DollarName DEL) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> 
              <'             s/^<.*/'> ($ Id.VSub_DollarName DEL) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> <'\n'> <'            s/^'> 
              <Id.Lit_BadBackslash '\\'> <'*.*/'> ($ Id.VSub_DollarName ADD) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> <'            s/^'> 
              <Id.Lit_BadBackslash '\\'> <'+.*/'> ($ Id.VSub_DollarName ADD) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> <'             s/^>.*/'> 
              ($ Id.VSub_DollarName ADD) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> <'\n'> <'       s/^Only in.*/'> ($ Id.VSub_DollarName FIL) <'&'> 
              ($ Id.VSub_DollarName RST) <'/;t\n'> <'       s/^Index: .*/'> ($ Id.VSub_DollarName FIL) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'> 
              <'         s/^diff .*/'> ($ Id.VSub_DollarName FIL) <'&'> ($ Id.VSub_DollarName RST) <'/;t\n'>
            )
          }
        )
        (C 
          {
            (braced_var_sub
              left: <Id.Left_DollarBrace '${'>
              token: <Id.VSub_Name PAGER>
              var_name: PAGER
              suffix_op: 
                (suffix_op.Unary
                  op: <Id.VTest_ColonHyphen _>
                  arg_word: {<'less -QRS '> ($ Id.VSub_DollarName CTRL_C_EXITS)}
                )
              right: <Id.Right_DollarBrace '}'>
            )
          }
        )
      ]
      negated: F
      stderr_indices: []
    )
  ]
)