;;;
;;;
;;;>	Author:	Henry C. Francis
;;;>		425 N. Ashe St.
;;;>		Southern Pines, NC 28387
;;;>		http://paracadd.com
;;;>		All rights reserved.
;;;
;;;>		COPYRIGHT: 
;;;>		   EDITED: 09-10-2002
;;;
(defun c:dv0 ()
  (command ".dview" "" "tw" 0 "CL" "F" 0 "CL" "B" 0 "CL" "O" "")
  (if (eq (if c:tsnap
	    nil
	    (load "tsnap" "\nError: tsnap.lsp not found")
	  )
	  "Error: tsnap.lsp not found"
      )
    (princ "\nError: tsnap.lsp not found")
    (c:tsnap)
  )
  (princ)
)