(List
  (Com {[LIT_CHARS source]} {[LIT_CHARS ./vmware_env.sh]})
  (If
    (DBracket {B1 UNARY_STRING_z {[DQ [VarSub VMRUN]]}})
    (List
      (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "vmrun not found!"]]}
        <
        (DescriptorRedirectNode target={[LIT_CHARS 2]} <REDIR_GREATAND ">&"> 1),
        >
      )
      (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "  Please ensure VMWare is installed and vmrun is accessible."]]}
        <
        (DescriptorRedirectNode target={[LIT_CHARS 2]} <REDIR_GREATAND ">&"> 1),
        >
      )
      (Com {[LIT_CHARS exit]} {[LIT_CHARS 1]})
    )
  )
  (For i [{[ComSub (Com {[LIT_CHARS seq]} {[LIT_CHARS 1]} {[LIT_CHARS 3]})]}])
    (List
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('VM_PATH', {[ComSub (Com {[LIT_CHARS ls]} {[LIT_CHARS -d]} {[LIT_CHARS .vagrant/machines/bcpc_vm] [VarSub i] [LIT_CHARS /vmware_fusion/] [LIT_OTHER "*"] [LIT_CHARS /]})]})])
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('VMX_PATH', {[VarSub VM_PATH] [LIT_CHARS /precise64.vmx]})])
      (If
        (Com {[LIT_OTHER "["]} {[LIT_OTHER "!"]} {[LIT_CHARS -f]} {[VarSub VMX_PATH]} {[LIT_OTHER "]"]})
        (List
          (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "Unable to find VM "][VarSub i][LIT_CHARS " - "][VarSub VMX_PATH][LIT_CHARS "! Exiting."]]})
          (Com {[LIT_CHARS exit]} {[LIT_CHARS 1]})
        )
      )
      (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "Restoring bcpc-vm"][VarSub i][LIT_CHARS " from snapshot"]]})
      (Com {[DQ [VarSub VMRUN]]} {[LIT_CHARS stop]} {[VarSub VMX_PATH]})
      (Com {[DQ [VarSub VMRUN]]} {[LIT_CHARS revertToSnapshot]} {[VarSub VMX_PATH]} {[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 {[DQ [VarSub VMRUN]]} {[LIT_CHARS start]} {[VarSub VMX_PATH]})
    )
  )
)