Changeset 56 for trunk/src/RUN_FIX.m


Ignore:
Timestamp:
Mar 17, 2010, 1:30:15 PM (11 years ago)
Author:
sommeria
Message:

uvmat: edit vector button activated
debugging and cleaning after modifications made with the windows version

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/RUN_FIX.m

    r47 r56  
    153153    netcdf.close(nc)
    154154else %old netcdf library
    155     nc=netcdf(filename,'write'); %open netcdf file for writing
    156     result=redef(nc);
    157     if isempty(result), msgbox_uvmat('ERROR','##Bad redef operation.'),end 
    158     if iter==1
    159         nc.fix=1;
    160     elseif iter==2
    161         nc.fix2=1;
    162     end
    163     nc{field.fixflag}=ncfloat(field.nb);
    164     fixflag_unit=Field.FF-10*floor(Field.FF/10); %unity term of fix_flag
    165     nc{field.fixflag}(:)=fixflag_unit+10*flagmagenta;
    166     close(nc);
     155    netcdf_toolbox(filename,Field,flagmagenta,iter,field)
    167156end
     157
     158function netcdf_toolbox(filename,Field,flagmagenta,iter,field)
     159nc=netcdf(filename,'write'); %open netcdf file for writing
     160result=redef(nc);
     161if isempty(result), msgbox_uvmat('ERROR','##Bad redef operation.'),end 
     162if iter==1
     163    nc.fix=1;
     164elseif iter==2
     165    nc.fix2=1;
     166end
     167nc{field.fixflag}=ncfloat(field.nb);
     168fixflag_unit=Field.FF-10*floor(Field.FF/10); %unity term of fix_flag
     169nc{field.fixflag}(:)=fixflag_unit+10*flagmagenta;
     170close(nc);
Note: See TracChangeset for help on using the changeset viewer.