Changeset 26 for trunk/PROGRAMMES/initfig.m

Timestamp:

08/26/09 11:54:01 (15 years ago)

Author:

pinsard

Message:

production de .ps au lieu de .eps

File:

• trunk/PROGRAMMES/initfig.m (modified) (2 diffs)

trunk/PROGRAMMES/initfig.m

@@ -42 +42 @@
 % $Id$
 %
+% - fplod 2009-08-25T16:41:34Z aedon.locean-ipsl.upmc.fr (Darwin)
+%
+%  * ajout pour octave 3.2 (uniquement sous 
+%    /usr/local_linux/octave/64/3.2.2/bin/octave donc dedale)
+%
 % - fplod 2009-08-17T12:39:51Z aedon.locean-ipsl.upmc.fr (Darwin)
 %
@@ -56 +61 @@
  set(gcf,'PaperPosition',[0,0,1,1]);
 else
- warning('www : octave can not initialise Units, position, PaperType PaperUnits PaperPosition');
+ switch OCTAVE_VERSION
+  case {'3.0.2'}
+   warning('www : octave 3.0.2 can not initialise Units, position, PaperType PaperUnits PaperPosition');
+  case {'3.2.2'}
+   set(gcf,'Units','normalized');
+   set(gcf,'position',[0.1 0.08,0.5,0.8])
+   set(gcf,'PaperType', 'a4');
+   set(gcf,'PaperUnits','normalized');
+   set(gcf,'PaperPosition',[0,0,1,1]);
+  otherwise
+   warning('www : do no know about octave initialise Units, position, PaperType PaperUnits PaperPosition');
+  end
 end