write.m 1.47 KB
Newer Older
Houtan Bastani's avatar
Houtan Bastani committed
1
2
function o = write(o, fid)
%function o = write(o, fid)
Houtan Bastani's avatar
Houtan Bastani committed
3
4
5
6
7
8
% Write Section object
%
% INPUTS
%   fid - int, file id
%
% OUTPUTS
Houtan Bastani's avatar
Houtan Bastani committed
9
%   o   - this
Houtan Bastani's avatar
Houtan Bastani committed
10
11
12
%
% SPECIAL REQUIREMENTS
%   none
Houtan Bastani's avatar
Houtan Bastani committed
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 <http://www.gnu.org/licenses/>.

Houtan Bastani's avatar
Houtan Bastani committed
31
32
assert(fid ~= -1);

Houtan Bastani's avatar
Houtan Bastani committed
33
fprintf(fid, '%% Section Object\n');
Houtan Bastani's avatar
Houtan Bastani committed
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's avatar
Houtan Bastani committed
39
40
41
42
for i=1:o.cols
    fprintf(fid, 'c');
end
fprintf(fid, '}\n');
Houtan Bastani's avatar
Houtan Bastani committed
43
44
ne = numElements(o);
for i=1:ne
Houtan Bastani's avatar
Houtan Bastani committed
45
46
47
48
    o.elements(i).write(fid);
    if rem(i, o.cols)
        fprintf(fid, ' & ');
    else
Houtan Bastani's avatar
Houtan Bastani committed
49
        fprintf(fid, ' \\\\\n');
Houtan Bastani's avatar
Houtan Bastani committed
50
    end
Houtan Bastani's avatar
Houtan Bastani committed
51
end
Houtan Bastani's avatar
Houtan Bastani committed
52

Houtan Bastani's avatar
Houtan Bastani committed
53
54
55
fprintf(fid, '\\end{tabular}%%\n');
fprintf(fid, '}%%\n');
%fprintf(fid, '\\end{table}%%\n');
Houtan Bastani's avatar
Houtan Bastani committed
56
fprintf(fid, '%% End Section Object\n\n');
Houtan Bastani's avatar
Houtan Bastani committed
57
end