Daniel@0: function dbprint(l, varargin)
Daniel@0: 
Daniel@0:     global DEBUG;
Daniel@0: 
Daniel@0:     if DEBUG >= l
Daniel@0:         display(sprintf(varargin{:}));
Daniel@0:     end
Daniel@0: end
Daniel@0: