function print_parameters(params, units) align = 32; names = fieldnames(params); for n=1:length(names), fprintf('%s', names{n}); remain = align - length(names{n}); if remain < 0 error('Invalid variable length!'); else for j=1:remain fprintf(' '); end fprintf('= %g %s\n', params.(names{n}), units.(names{n})); end end endfunction