(command.CommandList
  children: [
    (command.If
      if_kw: <Id.KW_If if>
      arms: [
        (IfArm
          keyword: <Id.KW_If if>
          cond: 
            (condition.Shell
              commands: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <Id.Lit_LBracket '['>
                      more_env: []
                      words: [
                        {<Id.Lit_LBracket '['>}
                        {($ Id.VSub_Pound '#')}
                        {<-ne>}
                        {<3>}
                        {<Id.Lit_RBracket ']'>}
                      ]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
            )
          then_kw: <Id.KW_Then then>
          action: [
            (command.Simple
              blame_tok: <echo>
              more_env: []
              words: [
                {<echo>}
                {
                  (DQ <'Usage: '> 
                    (CommandSub
                      left_token: <Id.Left_DollarParen '$('>
                      child: 
                        (command.Simple
                          blame_tok: <basename>
                          more_env: []
                          words: [{<basename>} {($ Id.VSub_Number 0)}]
                          redirects: []
                          do_fork: T
                        )
                      right: <Id.Eof_RParen _>
                    ) <' mon day year'>
                  )
                }
              ]
              redirects: [(Redir op:<Id.Redir_GreatAnd '>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
              do_fork: T
            )
            (command.Simple
              blame_tok: <echo>
              more_env: []
              words: [{<echo>} {(DQ <'  with just numerical values (ex: 7 7 1776)'>)}]
              redirects: [(Redir op:<Id.Redir_GreatAnd '>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
              do_fork: T
            )
            (command.ControlFlow keyword:<Id.ControlFlow_Exit exit> arg_word:{<1>})
          ]
          spids: [7 21]
        )
      ]
      else_action: []
      fi_kw: <Id.KW_Fi fi>
      redirects: []
    )
    (command.Simple
      blame_tok: <date>
      more_env: []
      words: [{<date>} {<--version>}]
      redirects: [
        (Redir op:<Id.Redir_Great '>'> loc:(redir_loc.Fd fd:1) arg:{<'/dev/null'>})
        (Redir op:<Id.Redir_GreatAnd '2>&'> loc:(redir_loc.Fd fd:2) arg:{<1>})
      ]
      do_fork: T
    )
    (command.ShAssignment
      left: <Id.Lit_VarLike 'baddate='>
      pairs: [
        (AssignPair
          left: <Id.Lit_VarLike 'baddate='>
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'baddate='> name:baddate)
          op: assign_op.Equal
          rhs: {(DQ ($ Id.VSub_QMark '?'))}
        )
      ]
      redirects: []
    )
    (command.If
      if_kw: <Id.KW_If if>
      arms: [
        (IfArm
          keyword: <Id.KW_If if>
          cond: 
            (condition.Shell
              commands: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <Id.Lit_LBracket '['>
                      more_env: []
                      words: [
                        {<Id.Lit_LBracket '['>}
                        {<Id.KW_Bang '!'>}
                        {($ Id.VSub_DollarName baddate)}
                        {<Id.Lit_RBracket ']'>}
                      ]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
            )
          then_kw: <Id.KW_Then then>
          action: [
            (command.Simple
              blame_tok: <date>
              more_env: []
              words: [
                {<date>}
                {<-d>}
                {($ Id.VSub_Number 1) <'/'> ($ Id.VSub_Number 2) <'/'> ($ Id.VSub_Number 3)}
                {<Id.Lit_Other '+'> (DQ <'That was a %A.'>)}
              ]
              redirects: []
              do_fork: T
            )
          ]
          spids: [80 92]
        )
      ]
      else_kw: <Id.KW_Else else>
      else_action: [
        (command.If
          if_kw: <Id.KW_If if>
          arms: [
            (IfArm
              keyword: <Id.KW_If if>
              cond: 
                (condition.Shell
                  commands: [
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <Id.Lit_LBracket '['>
                          more_env: []
                          words: [
                            {<Id.Lit_LBracket '['>}
                            {($ Id.VSub_Number 2)}
                            {<-lt>}
                            {<10>}
                            {<Id.Lit_RBracket ']'>}
                          ]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                )
              then_kw: <Id.KW_Then then>
              action: [
                (command.ShAssignment
                  left: <Id.Lit_VarLike 'pattern='>
                  pairs: [
                    (AssignPair
                      left: <Id.Lit_VarLike 'pattern='>
                      lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'pattern='> name:pattern)
                      op: assign_op.Equal
                      rhs: {(DQ <' '> ($ Id.VSub_Number 2) <'[^0-9]'>)}
                    )
                  ]
                  redirects: []
                )
              ]
              spids: [114 128]
            )
          ]
          else_kw: <Id.KW_Else else>
          else_action: [
            (command.ShAssignment
              left: <Id.Lit_VarLike 'pattern='>
              pairs: [
                (AssignPair
                  left: <Id.Lit_VarLike 'pattern='>
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'pattern='> name:pattern)
                  op: assign_op.Equal
                  rhs: {(DQ ($ Id.VSub_Number 2) <'[^0-9]'>)}
                )
              ]
              redirects: []
            )
          ]
          fi_kw: <Id.KW_Fi fi>
          redirects: []
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'dayofweek='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'dayofweek='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'dayofweek='> name:dayofweek)
              op: assign_op.Equal
              rhs: 
                {
                  (DQ 
                    (CommandSub
                      left_token: <Id.Left_DollarParen '$('>
                      child: 
                        (command.Pipeline
                          children: [
                            (command.Simple
                              blame_tok: <ncal>
                              more_env: []
                              words: [{<ncal>} {($ Id.VSub_Number 1)} {($ Id.VSub_Number 3)}]
                              redirects: []
                              do_fork: T
                            )
                            (command.Simple
                              blame_tok: <grep>
                              more_env: []
                              words: [{<grep>} {(DQ ($ Id.VSub_DollarName pattern))}]
                              redirects: []
                              do_fork: T
                            )
                            (command.Simple
                              blame_tok: <cut>
                              more_env: []
                              words: [{<cut>} {<-c1-2>}]
                              redirects: []
                              do_fork: T
                            )
                          ]
                          ops: [<Id.Op_Pipe _> <Id.Op_Pipe _>]
                        )
                      right: <Id.Eof_RParen _>
                    )
                  )
                }
            )
          ]
          redirects: []
        )
        (command.Case
          case_kw: <Id.KW_Case case>
          to_match: (case_arg.Word w:{($ Id.VSub_DollarName dayofweek)})
          arms_start: <Id.KW_In in>
          arms: [
            (CaseArm
              left: <Su>
              pattern: (pat.Words words:[{<Su>}])
              middle: <Id.Right_CasePat _>
              action: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <echo>
                      more_env: []
                      words: [{<echo>} {(DQ <'That was a Sunday'>)}]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
              right: <Id.Op_DSemi _>
            )
            (CaseArm
              left: <Mo>
              pattern: (pat.Words words:[{<Mo>}])
              middle: <Id.Right_CasePat _>
              action: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <echo>
                      more_env: []
                      words: [{<echo>} {(DQ <'That was a Monday'>)}]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
              right: <Id.Op_DSemi _>
            )
            (CaseArm
              left: <Tu>
              pattern: (pat.Words words:[{<Tu>}])
              middle: <Id.Right_CasePat _>
              action: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <echo>
                      more_env: []
                      words: [{<echo>} {(DQ <'That was a Tuesday'>)}]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
              right: <Id.Op_DSemi _>
            )
            (CaseArm
              left: <We>
              pattern: (pat.Words words:[{<We>}])
              middle: <Id.Right_CasePat _>
              action: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <echo>
                      more_env: []
                      words: [{<echo>} {(DQ <'That was a Wednesday'>)}]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
              right: <Id.Op_DSemi _>
            )
            (CaseArm
              left: <Th>
              pattern: (pat.Words words:[{<Th>}])
              middle: <Id.Right_CasePat _>
              action: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <echo>
                      more_env: []
                      words: [{<echo>} {(DQ <'That was a Thursday'>)}]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
              right: <Id.Op_DSemi _>
            )
            (CaseArm
              left: <Fr>
              pattern: (pat.Words words:[{<Fr>}])
              middle: <Id.Right_CasePat _>
              action: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <echo>
                      more_env: []
                      words: [{<echo>} {(DQ <'That was a Friday'>)}]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
              right: <Id.Op_DSemi _>
            )
            (CaseArm
              left: <Sa>
              pattern: (pat.Words words:[{<Sa>}])
              middle: <Id.Right_CasePat _>
              action: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <echo>
                      more_env: []
                      words: [{<echo>} {(DQ <'That was a Saturday'>)}]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
              right: <Id.Op_DSemi _>
            )
          ]
          arms_end: <Id.KW_Esac esac>
          redirects: []
        )
      ]
      fi_kw: <Id.KW_Fi fi>
      redirects: []
    )
    (command.ControlFlow keyword:<Id.ControlFlow_Exit exit> arg_word:{<0>})
  ]
)