function [U,RF] = readAbaqusOutput(fileName) debug = 0; if (debug) debug_file = fopen('debug.dat', 'wt'); end while exist(fileName,'file')==0 pause(0.1) end file = fileName; fidd = fopen(file); i = 0; pause(0.5) numSteps = 0; j=0; while ( ~feof(fidd) ) tline = fgetl(fidd); i = i+1; if (regexpi(tline, 'N O D E O U T P U T')>0) numSteps = numSteps + 1; tline = fgetl(fidd); i = i+1; j=0; while(isempty(str2num(tline))) tline = fgetl(fidd); i = i+1; end while(~isempty(str2num(tline))) j=j+1; data_f = sscanf(tline, '%d %e %e', [1,3]); if (debug) fprintf(debug_file, '%d\t%e\n', data_f(1), data_f(2), data_f(3)); end node_number=data_f(1); tline = fgetl(fidd); i = i+1; U=data_f(2); RF=data_f(3); %si NLGEON = YES il affiche plusieurs valeurs de node OUTPUT, %donc on lui faire remplir des tableaux qui prend toutes les %donnees puis on ne gardera que la derniere donnee end if (debug) fprintf(debug_file, '\n'); end end end if (debug) fclose(debug_file); end %pour prendre que la valeur final avec le NLGEON YES % Ux= UxStep(numSteps,:); % Uy= UyStep(numSteps,:); % U= UStep(numSteps,:); fclose(fidd); fclose all