filterin.m

ABAQUS is a general purpose finite element analysis program which is widely used to analyses mechani

function [x,tmp_mat]= ...
	filtering(res_node,results,out_node,coord,MODEL);
% INPUT
% big_mat		:	all the output of the resulats
% small_node		:	The node number for the case
% big_node		: 	All the node number for the results 	
% big_coord		: 	All the coordinates
	

len_node=length(res_node);
len_tmp_node=length(out_node);
len_MODEL=length(MODEL);
for i=1:len_node,
	for j=1:len_tmp_node
		if res_node(i)==out_node(j) 
			tmp_mat(j,:)=results(i,:);
		end,
	end,
end,

	for i=1:len_tmp_node
		tmp_coord(:,i)=coord(:,out_node(i));
	    end,
	x=tmp_coord(1,:);	
end %%%% function %%%