//
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) ????-2008 - INRIA
//
// This file is distributed under the same license as the Scilab package.
//

function demredraw(alpha)
    global alpha0
    if alpha0 == [] then
        alpha0 = 30;
    end

    if done&abs(alpha-alpha0)>2 then
        done              = %f;
        a                 = gca();
        a.rotation_angles = [alpha,30];
        alpha0            = alpha;
        done              = %t;
    end

endfunction