Changeset 41

Timestamp:

09/21/09 14:09:06 (15 years ago)

Author:

pinsard

Message:

usage of contour instead of contoutf when octave 3.2.2 is running

Location:

trunk/PROGRAMMES

Files:

• carte_SST.m (modified) (7 diffs)
• eof_NCEP_sais.m (modified) (2 diffs)

trunk/PROGRAMMES/carte_SST.m

@@ -66 +66 @@
 % improve description
 %
-% is there any way to call worldmap only once or at least read coast.m only 
+% is there any way to call worldmap only once or at least read coast.m only
 % once
 %
@@ -72 +72 @@
 % ==============
 %
+% - fplod 2009-09-21T11:57:50Z aedon.locean-ipsl.upmc.fr (Darwin)
+%
+%   * Postcript affreux sous octave 3.2.2 : tout est tassé dans le coin
+%     bas gauche !
+%
 % - fplod 2009-08-26T08:46:48Z aedon.locean-ipsl.upmc.fr (Darwin)
 %
-%   * ne fonctionne pas sous octave 3.2.2
+%   * ne fonctionne pas sous octave 3.2.2 à cause de ``contourf``
 %     ::
 %     error: gnuplot (as of v4.2) only supports 3D filled triangular patches
@@ -90 +95 @@
 % $Id$
 %
+% - fplod 2009-09-21T11:50:23Z aedon.locean-ipsl.upmc.fr (Darwin)
+%
+%   * octave 3.2.2 contourf problem is not solved (see KNOWN PROBLEMS) but a
+%     workaround allows (``contour`` instead of ``contourf``) to run this
+%     script till end.
+%
 % - fplod 2009-08-26T09:00:11Z aedon.locean-ipsl.upmc.fr (Darwin)
 %
@@ -102 +113 @@
 %     ``zeus$ lpr -o job-sheets='none' carte_SST.ps``, mais aucune feuille ne
 %     sort.
-% 
+%
 %     Pour info dans le fichier .eps produit par matlab, on pouvait lire
 %     ``%!PS-Adobe-2.0 EPSF-1.2``. Aucun souci d'impression avec ce fichier !
@@ -112 +123 @@
 %
 %   * suppression d'appel à contlab et colorbartype sous octave
-% 
+%
 % - fplod 2009-08-25T10:40:16Z aedon.locean-ipsl.upmc.fr (Darwin)
 %
@@ -125 +136 @@
 %     fixent pas les même limites par défaut
 %   * utilisation de ``contlab`` pour ++
-% 
+%
 % - fplod 2009-08-17T12:39:51Z aedon.locean-ipsl.upmc.fr (Darwin)
 %
@@ -212 +223 @@
   end
   z=squeeze(tab_mens(:,:,iplot));
-  contourf(x,y,z,lev)
+  if (run_octave == 0)
+   contourf(x,y,z,lev)
+  else
+   switch OCTAVE_VERSION
+    case {'3.0.2','3.0.5'}
+     contourf(x,y,z,lev)
+    case {'3.2.2'}
+     contour(x,y,z,lev)
+    otherwise
+     contourf(x,y,z,lev)
+   end
+  end
   caxis(clip_lev)
   hold on

trunk/PROGRAMMES/eof_NCEP_sais.m

@@ -89 +89 @@
 % comprendre le pb octave 3.2.2
 %
+%
+% KNOWN PROBLEMS
+% ==============
+%
+% - fplod 2009-09-21T11:57:50Z aedon.locean-ipsl.upmc.fr (Darwin)
+%
+%   * Postcripts affreux sous octave 3.2.2 : tout est tassé dans le coin
+%     bas gauche !
+%
 % EVOLUTIONS
 % ==========
 %
 % $Id$
+%
+% - fplod 2009-09-21T12:06:35Z aedon.locean-ipsl.upmc.fr (Darwin)
+%
+%   * octave 3.2.2 contourf problem is not solved (see KNOWN PROBLEMS) but a
+%     workaround allows (``contour`` instead of ``contourf``) to run this
+%     script till end.
 %
 % - fplod 2009-08-26T16:34:59Z aedon.locean-ipsl.upmc.fr (Darwin)
@@ -345 +360 @@
     contourf(x,y,z,lev);
    else
+    [x,y]=meshgrid(lon,lat);
     switch OCTAVE_VERSION
-     case {'3.0.2'}
-      [x,y]=meshgrid(lon,lat);
+     case {'3.0.2','3.0.5'}
       contourf(x,y,z,lev);
      case {'3.2.2'}
-      warning('www : do no know about octave 3.2.2 contourf usage');
-%  A(I): Index exceeds matrix dimension ++
+      contour(x,y,z,lev);
      otherwise
-      warning('www : do no know about octave contourf usage');
+      contourf(x,y,z,lev);
      end
    end