function n = GetNodeNumber(Node,p)
% n = GetNodeNumber(Node,p)
%
% GetNodeNumber
%
%   n = number of nodes on the list;
%   Node = nodes list;
%   p = {'0' do not print, '1' print};
%

% Walter Ponge-Ferreira
% Cotia, 15.06.2018

[n,~] = size(Node);

if nargin<2,
  p = 0;
end

i = 1:n;
  
if p == 1,
  fprintf('No. \t X \t Y \t Cy \t Cz \n');
  for j = 1:length(i),
    fprintf('%d \t %g \t %g \t %d \t %d \n',i(j),Node(i(j),1),Node(i(j),2),Node(i(j),3),Node(i(j),4));
  end
  fprintf('\n');
end

endfunction