Changeset 120 for trunk/src/name2display.m

Timestamp:

Nov 9, 2010, 5:27:00 PM (13 years ago)

Author:

gostiaux

Message:

gedit

File:

• trunk/src/name2display.m (modified) (2 diffs)

trunk/src/name2display.m

@@ -96 +96 @@
     str_a=last_str; %put appendix a,b,c....
     indcur=indcur-1;
-    nom_type='#A';   
     num=1;count=0; % extract the numerical appendix
     while num==1;
@@ -106 +105 @@
         end
     end
+    if strcmp('0',RootFile(indcur+1)); % select the non-numerical characters
+        nom_type=['%0' num2str(length(RootFile(indcur+1:end-1))) 'dA'];
+    else
+        nom_type='#A';
+    end  
+   
     if count~=0             
             field_count=RootFile(indcur+1:indcur+count);% set the selected field number
     end   
-    indcur=indcur-1;
+%     indcur=indcur-1;
 elseif strcmp(filelit(end-2:end),'-_-_')%new  nomenclature appendix num1-num2_num_a-num_b
     field_count=num0;