(command.CommandList
  children: [
    (C {<source>} {<'./virtualbox_env.sh'>})
    (command.ForEach
      iter_names: [i]
      iterable: 
        (for_iter.Words
          words: [{(command_sub left_token:<Id.Left_Backtick '`'> child:(C {<seq>} {<1>} {<3>}))}]
        )
      body: 
        (command.DoGroup
          children: [
            (C {($ Id.VSub_DollarName '$VBM')} {<controlvm>} {<bcpc-vm> ($ Id.VSub_DollarName '$i')} 
              {<poweroff>}
            )
            (C {($ Id.VSub_DollarName '$VBM')} {<snapshot>} {<bcpc-vm> ($ Id.VSub_DollarName '$i')} 
              {<restore>} {<initial-install>}
            )
            (command.AndOr
              ops: [Id.Op_DPipe]
              children: [
                (C {<vagrant>} {<ssh>} {<-c>} 
                  {
                    (DQ <'cd chef-bcpc && knife client delete -y bcpc-vm'> ($ Id.VSub_DollarName '$i') 
                      <.local.lan>
                    )
                  }
                )
                (C {<true>})
              ]
            )
            (command.AndOr
              ops: [Id.Op_DPipe]
              children: [
                (C {<vagrant>} {<ssh>} {<-c>} 
                  {
                    (DQ <'cd chef-bcpc && knife node delete -y bcpc-vm'> ($ Id.VSub_DollarName '$i') 
                      <.local.lan>
                    )
                  }
                )
                (C {<true>})
              ]
            )
            (C {($ Id.VSub_DollarName '$VBM')} {<startvm>} {<bcpc-vm> ($ Id.VSub_DollarName '$i')})
          ]
        )
    )
  ]
)