(command.Pipeline
  children: [
    (C {(apropos)} {(DQ (_r))})
    (C {(sed)} {(-n)} {(SQ <'s#\\(.*\\)_r .*#\\1#p'>)})
    (C {(uniq)})
    (command.If
      arms: [
        (if_arm
          cond: [
            (command.Sentence
              child: 
                (C {(Lit_LBracket '[')} {(DQ ($ VSub_Pound '$#'))} {(KW_Bang '!') (Lit_Equals '=')} 
                  {(DQ (0))} {(Lit_RBracket ']')}
                )
              terminator: <Op_Semi ';'>
            )
          ]
          action: [
            (command.Simple
              words: [
                {(grep)}
                {(-F)}
                {(-f-)}
                {(-w)}
                {(-n)}
                {(--color) (Lit_Equals '=') (DQ (auto))}
                {(DQ ($ VSub_At '$@'))}
              ]
              more_env: [(env_pair name:LANG val:{(C)})]
            )
          ]
        )
      ]
      else_action: [(C {(cat)})]
    )
  ]
  negated: F
)