function cprint(l, varargin)
% ---
% function cprint(l, varargin)
% 
% sprintfs statement varargin if verbosity level 
% globalvars.debug >= l 
%
% lvl 1: error / very important info
% lvl 2 : warning, mid-level runtime info
% lvl 3 : high-frequency runtime / debug info
%
% ---

    global globalvars;
    
    if isfield(globalvars, 'debug') && globalvars.debug >= l
        display(sprintf(varargin{:}));
    end
end