;;;;
;;;; PLplot example 10
;;;;
;;;; hazen 07/10
;;;;

(in-package :plplot-examples)

(defun example10 (&optional (dev default-dev))
  (plsdev dev)
  (plinit)

  (pladv 0)
  (plvpor 0.0 1.0 0.0 1.0)
  (plwind 0.0 1.0 0.0 1.0)
  (plbox "bc" 0.0 0 "bc" 0.0 0)

  (plsvpa 50.0 150.0 50.0 100.0)
  (plwind 0.0 1.0 0.0 1.0)
  (plbox "bc" 0.0 0 "bc" 0.0 0)
  (plptex 0.5 0.5 1.0 0.0 0.5 "BOX at (50,150,50,100)")
  
  (plend1))

;;;;
;;;; Copyright (c) 2010 Hazen P. Babcock
;;;;
;;;; Permission is hereby granted, free of charge, to any person obtaining a copy 
;;;; of this software and associated documentation files (the "Software"), to 
;;;; deal in the Software without restriction, including without limitation the 
;;;; rights to use, copy, modify, merge, publish, distribute, sublicense, and/or 
;;;; sell copies of the Software, and to permit persons to whom the Software is 
;;;; furnished to do so, subject to the following conditions:
;;;;
;;;; The above copyright notice and this permission notice shall be included in 
;;;; all copies or substantial portions of the Software.
;;;;
;;;; THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 
;;;; IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 
;;;; FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE 
;;;; AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 
;;;; LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING 
;;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS 
;;;; IN THE SOFTWARE.
;;;;
