/[MITgcm]/MITgcm_contrib/gael/matlab_class/gcmfaces_misc/write2tex.m
ViewVC logotype

Diff of /MITgcm_contrib/gael/matlab_class/gcmfaces_misc/write2tex.m

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.10 by gforget, Fri Sep 12 20:18:23 2014 UTC revision 1.12 by gforget, Tue Dec 2 18:48:24 2014 UTC
# Line 110  if myStep==2; Line 110  if myStep==2;
110      figure(myFig);      figure(myFig);
111      drawnow;      drawnow;
112      myFigNumTex=myFigNumTex+1;      myFigNumTex=myFigNumTex+1;
113      [dirTex,fileTex,EXT] = fileparts(myFile)      [dirTex,fileTex,EXT] = fileparts(myFile);
114      %print the very figure      %print the very figure
115      if strcmp(frmt,'eps');      if strcmp(frmt,'eps');
116        print(myFig,'-depsc',[dirTex fileTex '_fig' num2str(myFigNumTex) '.eps']);        print(myFig,'-depsc',[dirTex fileTex '_fig' num2str(myFigNumTex) '.eps']);
117      elseif strcmp(frmt,'jpg');      elseif strcmp(frmt,'jpg');
118        print(myFig,'-djpeg90',[dirTex fileTex '_fig' num2str(myFigNumTex) '.jpg']);        print(myFig,'-djpeg90',[dirTex fileTex '_fig' num2str(myFigNumTex) '.jpg']);
119      elseif strcmp(frmt,'eps');      elseif strcmp(frmt,'png');
120        print(myFig,'-dpng',[dirTex fileTex '_fig' num2str(myFigNumTex) '.png']);        print(myFig,'-dpng',[dirTex fileTex '_fig' num2str(myFigNumTex) '.png']);
121      end      end
122      close;      close;
# Line 126  if myStep==2; Line 126  if myStep==2;
126      fprintf(fid,'\\begin{figure}[tbh] \\centering \n');      fprintf(fid,'\\begin{figure}[tbh] \\centering \n');
127  %     fprintf(fid,'\\includegraphics[width=\\textwidth,height=0.9\\textheight]');  %     fprintf(fid,'\\includegraphics[width=\\textwidth,height=0.9\\textheight]');
128      fprintf(fid,'\\includegraphics[width=0.75\\textwidth]');      fprintf(fid,'\\includegraphics[width=0.75\\textwidth]');
129      fprintf(fid,['{' fileTex '.fig' num2str(myFigNumTex) '}\n']);      fprintf(fid,['{' fileTex '_fig' num2str(myFigNumTex) '.' frmt '}\n']);
130      fprintf(fid,'\\caption{');      fprintf(fid,'\\caption{');
131      for ii=1:length(myText); fprintf(fid,[myText{ii} '\n']); end;      for ii=1:length(myText); fprintf(fid,[myText{ii} '\n']); end;
132      fprintf(fid,'} \\end{figure} \n');      fprintf(fid,'} \\end{figure} \n');
# Line 151  eval(['save ' myFile(1:end-4) '.mat myFi Line 151  eval(['save ' myFile(1:end-4) '.mat myFi
151  %compile  %compile
152  if myStep==5;  if myStep==5;
153      dirOrig=pwd;      dirOrig=pwd;
154      [PATHSTR,fileTex,EXT] = fileparts(myFile)      [PATHSTR,fileTex,EXT] = fileparts(myFile);
155      cd(PATHSTR);      cd(PATHSTR);
156      system(['latex ' fileTex]);      system(['latex ' fileTex]);
157      system(['latex ' fileTex]);      system(['latex ' fileTex]);
# Line 173  if myStep==6&~ispc; Line 173  if myStep==6&~ispc;
173      else;      else;
174          fileTex=myFile(1:end-4);          fileTex=myFile(1:end-4);
175      end;      end;
176      delete([fileTex '.fig*']);      delete([fileTex '_fig*']);
177      delete([fileTex '.aux']);      delete([fileTex '.aux']);
178      delete([fileTex '.log']);      delete([fileTex '.log']);
179      delete([fileTex '.out']);      delete([fileTex '.out']);
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.22