(List
  (Com {[LIT_CHARS source]} {[LIT_CHARS ./virtualbox_env.sh]}  )
  (For i [{[ComSub (Com {[LIT_CHARS seq]} {[LIT_CHARS 1]} {[LIT_CHARS 3]})]}])
    (List
      (Com {[VarSub VBM]} {[LIT_CHARS controlvm]} {[LIT_CHARS bcpc-vm] [VarSub i]} {[LIT_CHARS poweroff]}      )
      (Com {[VarSub VBM]} {[LIT_CHARS snapshot]} {[LIT_CHARS bcpc-vm] [VarSub i]} {[LIT_CHARS restore]} {[LIT_CHARS initial-install]}      )
      (AndOr OP_OR_IF
        (Com {[LIT_CHARS vagrant]} {[LIT_CHARS ssh]} {[LIT_CHARS -c]} {[DQ [LIT_CHARS "cd chef-bcpc && knife client delete -y bcpc-vm"][VarSub i][LIT_CHARS .local.lan]]}        )
        (Com {[LIT_CHARS true]}        )
      )
      (AndOr OP_OR_IF
        (Com {[LIT_CHARS vagrant]} {[LIT_CHARS ssh]} {[LIT_CHARS -c]} {[DQ [LIT_CHARS "cd chef-bcpc && knife node delete -y bcpc-vm"][VarSub i][LIT_CHARS .local.lan]]}        )
        (Com {[LIT_CHARS true]}        )
      )
      (Com {[VarSub VBM]} {[LIT_CHARS startvm]} {[LIT_CHARS bcpc-vm] [VarSub i]}      )
    )
  )
)