Changeset 153 for trunk/src/plot_field.m

Timestamp:

Dec 9, 2010, 11:31:04 PM (13 years ago)

Author:

sommeria

Message:

civ.m: bug on field numbers repaired
other: various cleaning and bug repair for the creation of a new object

File:

• trunk/src/plot_field.m (modified) (7 diffs)

trunk/src/plot_field.m

@@ -310 +310 @@
 
 hfig=get(haxes,'parent');
-AxeData=data;
+AxeData=[];%data;
 
 ColorOrder=[1 0 0;0 0.5 0;0 0 1;0 0.75 0.75;0.75 0 0.75;0.75 0.75 0;0.25 0.25 0.25];
@@ -516 +516 @@
 end
 AxeData.NbDim=2;
-if isfield(Data,'ObjectCoord')
-    AxeData.ObjectCoord=Data.ObjectCoord;
-end
+% if isfield(Data,'ObjectCoord')
+%     AxeData.ObjectCoord=Data.ObjectCoord;
+% end
 errormsg=[];%default
 test_ima=0; %default: test for image or map plot
@@ -858 +858 @@
         AxeData=[];
     end
-    AxeData.A=A;
-    AxeData.AX=[AX(1) AX(end)];
-    AxeData.AY=[AY(1) AY(end)];
+%     AxeData.A=A;
+%     AxeData.AX=[AX(1) AX(end)];
+%     AxeData.AY=[AY(1) AY(end)];
     test_ima=1;
     
@@ -912 +912 @@
        delete(hcol)
     end
-    AxeData.A=[];
-    AxeData.AX=[];
-    AxeData.AY=[];
+%     AxeData.A=[];
+%     AxeData.AX=[];
+%     AxeData.AY=[];
     PlotParamOut=rmfield(PlotParamOut,'Scalar');
 end
@@ -960 +960 @@
         vec_C=ones(1,numel(vec_X));
     end
-    AxeData.X=vec_X';
-    AxeData.Y=vec_Y';
-    AxeData.U=vec_U';
-    AxeData.V=vec_V';
-    AxeData.C=vec_C';
-    if isempty(ivar_F)
-        AxeData.F=[];
-    else
-        AxeData.F=vec_F';
-    end
-    if isempty(ivar_FF)
-        AxeData.FF=[];
-    else
-        AxeData.FF=vec_FF';
-    end
+%     AxeData.X=vec_X';
+%     AxeData.Y=vec_Y';
+%     AxeData.U=vec_U';
+%     AxeData.V=vec_V';
+%     AxeData.C=vec_C';
+%     if isempty(ivar_F)
+%         AxeData.F=[];
+%     else
+%         AxeData.F=vec_F';
+%     end
+%     if isempty(ivar_FF)
+%         AxeData.FF=[];
+%     else
+%         AxeData.FF=vec_FF';
+%     end
     
     %decimate by a factor 2 in vector mesh(4 in nbre of vectors)
@@ -1034 +1034 @@
         delete(hvec);
     end
-    AxeData.X=[];
-    AxeData.Y=[];
-    AxeData.U=[];
-    AxeData.V=[];
-    AxeData.C=[];
-    AxeData.W=[];
-    AxeData.F=[];
-     AxeData.FF=[];
+%     AxeData.X=[];
+%     AxeData.Y=[];
+%     AxeData.U=[];
+%     AxeData.V=[];
+%     AxeData.C=[];
+%     AxeData.W=[];
+%     AxeData.F=[];
+%      AxeData.FF=[];
 %     AxeData.Mesh=[];
     PlotParamOut=rmfield(PlotParamOut,'Vectors');
 end
-if isfield(Data,'Z')
-    AxeData.Z=Data.Z;% A REVOIR
-end
+% if isfield(Data,'Z')
+%     AxeData.Z=Data.Z;% A REVOIR
+% end
 listfields={'AY','AX','A','X','Y','U','V','C','W','F','FF'};
 listdim={'AY','AX',{'AY','AX'},'nb_vectors','nb_vectors','nb_vectors','nb_vectors','nb_vectors','nb_vectors','nb_vectors','nb_vectors'};
@@ -1053 +1053 @@
 %ind_select=[];
 nbvar=0;
-AxeData.ListVarName={};
-AxeData.VarDimName={};
-AxeData.VarAttribute={};
-for ilist=1:numel(listfields)
-    eval(['testvar=isfield(AxeData,listfields{ilist}) && ~isempty(AxeData.' listfields{ilist} ');'])
-    if testvar
-        nbvar=nbvar+1;
-        AxeData.ListVarName{nbvar}=listfields{ilist};
-        AxeData.VarDimName{nbvar}=listdim{ilist};
-        AxeData.VarAttribute{nbvar}.Role=Role{ilist};
-    end
-end
+% AxeData.ListVarName={};
+% AxeData.VarDimName={};
+% AxeData.VarAttribute={};
+% for ilist=1:numel(listfields)
+%     eval(['testvar=isfield(AxeData,listfields{ilist}) && ~isempty(AxeData.' listfields{ilist} ');'])
+%     if testvar
+%         nbvar=nbvar+1;
+%         AxeData.ListVarName{nbvar}=listfields{ilist};
+%         AxeData.VarDimName{nbvar}=listdim{ilist};
+%         AxeData.VarAttribute{nbvar}.Role=Role{ilist};
+%     end
+% end
 %store the coordinate extrema occupied by the field
 test_lim=0;