write.m 1.47 KB
 Houtan Bastani committed Feb 27, 2013 1 2 function o = write(o, fid) %function o = write(o, fid)  Houtan Bastani committed Feb 18, 2013 3 4 5 6 7 8 % Write Section object % % INPUTS % fid - int, file id % % OUTPUTS  Houtan Bastani committed Feb 27, 2013 9 % o - this  Houtan Bastani committed Feb 18, 2013 10 11 12 % % SPECIAL REQUIREMENTS % none  Houtan Bastani committed Feb 12, 2013 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30  % Copyright (C) 2013 Dynare Team % % This file is part of Dynare. % % Dynare is free software: you can redistribute it and/or modify % it under the terms of the GNU General Public License as published by % the Free Software Foundation, either version 3 of the License, or % (at your option) any later version. % % Dynare is distributed in the hope that it will be useful, % but WITHOUT ANY WARRANTY; without even the implied warranty of % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the % GNU General Public License for more details. % % You should have received a copy of the GNU General Public License % along with Dynare. If not, see .  Houtan Bastani committed Feb 18, 2013 31 32 assert(fid ~= -1);  Houtan Bastani committed Feb 27, 2013 33 fprintf(fid, '%% Section Object\n');  Houtan Bastani committed Mar 08, 2013 34 35 36 37 38 %fprintf(fid, '\\begin{table}[%shtpb]%%\n', o.align); fprintf(fid, ' \\vspace{15px}\n'); fprintf(fid, '\\centering\n'); fprintf(fid, '\\noindent\\maxsizebox{\\textwidth}{!}{%%\n'); fprintf(fid, '\\begin{tabular}[t]{');  Houtan Bastani committed Feb 27, 2013 39 40 41 42 for i=1:o.cols fprintf(fid, 'c'); end fprintf(fid, '}\n');  Houtan Bastani committed Feb 18, 2013 43 44 ne = numElements(o); for i=1:ne  Houtan Bastani committed Feb 27, 2013 45 46 47 48  o.elements(i).write(fid); if rem(i, o.cols) fprintf(fid, ' & '); else  Houtan Bastani committed Mar 08, 2013 49  fprintf(fid, ' \\\\\n');  Houtan Bastani committed Feb 27, 2013 50  end  Houtan Bastani committed Feb 12, 2013 51 end  Houtan Bastani committed Feb 18, 2013 52   Houtan Bastani committed Mar 08, 2013 53 54 55 fprintf(fid, '\\end{tabular}%%\n'); fprintf(fid, '}%%\n'); %fprintf(fid, '\\end{table}%%\n');  Houtan Bastani committed Feb 27, 2013 56 fprintf(fid, '%% End Section Object\n\n');  Houtan Bastani committed Feb 12, 2013 57 end