1## Copyright (C) 1998-2003 Joao Cardoso. 2## 3## This program is free software; you can redistribute it and/or modify it 4## under the terms of the GNU General Public License as published by the 5## Free Software Foundation; either version 2 of the License, or (at your 6## option) any later version. 7## 8## This program is distributed in the hope that it will be useful, but 9## WITHOUT ANY WARRANTY; without even the implied warranty of 10## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 11## General Public License for more details. 12## 13## This file is part of plplot_octave. 14 15function p6 16 17 [x y z] = rosenbrock; z = log(z); 18 19 global pl_automatic_replot 20 t = pl_automatic_replot; 21 pl_automatic_replot = 0; 22 23 as = autostyle; 24 autostyle "off"; 25 26 title("Contour example"); 27 contour(x,y,z) 28 29 autostyle(as); 30 pl_automatic_replot = t; 31 32endfunction 33