expwriteasvertices

PURPOSE ^

EXPWRITEASVERTIVES - write an Argus file from a structure given in input

SYNOPSIS ^

function expwriteasvertices(a,filename);

DESCRIPTION ^

EXPWRITEASVERTIVES - write an Argus file from a structure given in input

   This routine write an Argus file form a structure containing the fields:
   x and y of the coordinates of the points.
   The first argument is the structure containing the points coordinates 
   and the second one the file to be write.

   Usage:
      expwriteasvertices(a,filename)
 
   Example:
      expwriteasvertices(coordstruct,'domainoutline.exp')

   See also EXPDOC, EXPREAD, EXPWRITE

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function expwriteasvertices(a,filename);
0002 %EXPWRITEASVERTIVES - write an Argus file from a structure given in input
0003 %
0004 %   This routine write an Argus file form a structure containing the fields:
0005 %   x and y of the coordinates of the points.
0006 %   The first argument is the structure containing the points coordinates
0007 %   and the second one the file to be write.
0008 %
0009 %   Usage:
0010 %      expwriteasvertices(a,filename)
0011 %
0012 %   Example:
0013 %      expwriteasvertices(coordstruct,'domainoutline.exp')
0014 %
0015 %   See also EXPDOC, EXPREAD, EXPWRITE
0016 
0017 fid=fopen(filename,'w');
0018 for n=1:length(a.x),
0019    
0020     fprintf(fid,'%s\n','## Name:');
0021     fprintf(fid,'%s\n','## Icon:0');
0022     fprintf(fid,'%s\n','# Points Count  Value');
0023     fprintf(fid,'1 1.\n');
0024     fprintf(fid,'%s\n','# X pos Y pos');
0025     fprintf(fid,'%f %f\n\n',[a.x(n) a.y(n)]);
0026 
0027 end
0028 fclose(fid);

Generated on Sun 29-Mar-2009 20:22:55 by m2html © 2003