Changeset 876 for trunk/src/sub_field.m

Timestamp:

Feb 22, 2015, 11:07:07 PM (9 years ago)

Author:

sommeria

Message:

deformation modified in civ_series and bug corrections

File:

• trunk/src/sub_field.m (modified) (4 diffs)

trunk/src/sub_field.m

@@ -43 +43 @@
     SubData=Field;
     return
+end
+if ~isfield(Field_1,'VarAttribute')
+    Field_1.VarAttribute={};
 end
 
@@ -107 +110 @@
 end
 
+
 %% rename the dimensions of the second field if identical to those of the first
 for ilist=1:numel(Field_1.VarDimName)
@@ -127 +131 @@
 ind_remove=false(size(Field_1.ListVarName));
 % loop on the variables of the second field Field_1
-for ilist=1:numel(Field_1.ListVarName)
+for ilist=1:numel(Field_1.VarAttribute)
     % case of variable with a single dimension
     if ~isempty(Field_1.VarAttribute{ilist}) && ~isempty(regexp(Field_1.VarAttribute{ilist}.Role,'^coord'))% if variable with Role coord... is found.
@@ -173 +177 @@
 ListVarNameNew=ListVarNameNew(~check_remove); % %list of renaimed varaibles corresponding to ListVarNameSub
 VarDimNameSub=Field_1.VarDimName(~check_remove);
+if numel(Field_1.VarAttribute)<max(find(~check_remove))
+    for ilist=numel(Field_1.VarAttribute)+1:max(find(~check_remove))
+        Field_1.VarAttribute{ilist}={};
+    end
+end
 VarAttributeSub=Field_1.VarAttribute(~check_remove);
 check_rename=check_rename(~check_remove);