Changeset 42

Timestamp:

09/21/09 15:05:35 (15 years ago)

Author:

pinsard

Message:

usage of contour instead of contoutf when octave 3.2.2 is running

Location:

trunk/RESULTATS

Files:

• carteetstd_SST.m (modified) (7 diffs)
• eof_NCEP_an.m (modified) (2 diffs)

trunk/RESULTATS/carteetstd_SST.m

@@ -77 +77 @@
 % sous octave : é se transforme en o barré.
 %
+% - fplod 2009-09-21T12:59:35Z aedon.locean-ipsl.upmc.fr (Darwin)
+%
+%   *  octave 3.2.2 line 0: Internal error : unknown tic type
+%
 % TODO
 % ====
@@ -82 +86 @@
 % improve description
 %
+% is there any way to call worldmap only once or at least read coast.m only
+% once
+%
 % EVOLUTIONS
 % ==========
 %
 % $Id$
+%
+% - fplod 2009-09-21T12:12:06Z 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:56:51Z aedon.locean-ipsl.upmc.fr (Darwin)
@@ -209 +222 @@
   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
@@ -279 +303 @@
   end
   z=squeeze(tab_an(:,:,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
@@ -347 +382 @@
 end
 z=std_mens;
-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
 whorldmap
-  % limites geographies et labels de longitude et de latitude
-  ylim([geo(3) geo(4)])
-  xlim([geo(1) geo(2)])
-  set(gca, 'Xtick', xti, 'Ytick', yti)
-  if (run_octave == 0)
-   [longstr, latstr] = contlab(xti, yti);
-   set(gca, 'Xticklabel', longstr, 'Yticklabel', latstr)
-  end;
-  xlabel('longitude')
-  ylabel('latitude')
+% limites geographies et labels de longitude et de latitude
+ylim([geo(3) geo(4)])
+xlim([geo(1) geo(2)])
+set(gca, 'Xtick', xti, 'Ytick', yti)
+if (run_octave == 0)
+ [longstr, latstr] = contlab(xti, yti);
+ set(gca, 'Xticklabel', longstr, 'Yticklabel', latstr)
+end;
+xlabel('longitude')
+ylabel('latitude')
 
 title('ecart-type mensuel moyen')
@@ -384 +430 @@
 subplot(2,2,2)
 z=std_an;
-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
 whorldmap
-  % limites geographies et labels de longitude et de latitude
-  ylim([geo(3) geo(4)])
-  xlim([geo(1) geo(2)])
-  set(gca, 'Xtick', xti, 'Ytick', yti)
-  if (run_octave == 0)
-   [longstr, latstr] = contlab(xti, yti);
-   set(gca, 'Xticklabel', longstr, 'Yticklabel', latstr)
-  end;
-  xlabel('longitude')
-  ylabel('latitude')
+% limites geographies et labels de longitude et de latitude
+ylim([geo(3) geo(4)])
+xlim([geo(1) geo(2)])
+set(gca, 'Xtick', xti, 'Ytick', yti)
+if (run_octave == 0)
+ [longstr, latstr] = contlab(xti, yti);
+ set(gca, 'Xticklabel', longstr, 'Yticklabel', latstr)
+end;
+xlabel('longitude')
+ylabel('latitude')
 
 title('écart-type interannuel')
@@ -409 +466 @@
   colorbar('East') %colorbar par defaut
 end;
-
-
 
 % sauvegarde de la figure

trunk/RESULTATS/eof_NCEP_an.m

@@ -83 +83 @@
 % propres.
 %
+% KNOWN PROBLEMS
+% ==============
+%
+% - fplod 2009-09-21T12:58:38Z aedon.locean-ipsl.upmc.fr (Darwin)
+%
+%   *  octave 3.2.2 line 0: Internal error : unknown tic type
+%
 % EVOLUTIONS
 % ==========
 %
 % $Id$
+%
+% - fplod 2009-09-21T12:57:36Z aedon.locean-ipsl.upmc.fr (Darwin)
+%
+%   * octave 3.2.2 contourf problem is not solved but a
+%     workaround allows (``contour`` instead of ``contourf``) to run this
+%     script till end.
 %
 % - fplod 2009-08-26T10:26:35Z aedon.locean-ipsl.upmc.fr (Darwin)
@@ -320 +333 @@
    end
    z=squeeze(TABEOF(:,:,i));
-   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