%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Desenvolvido por Leonardo M. N. de Mattos. %
% www.mattos.eng.br                          %
% l (at) mattos.eng.br                       %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function [ dominio ] = ci_ret(H,L,deltax,deltay)
% ci_chapa Gera dominio de cálculo para um retângulo
% Gera valores iniciais para solução de transferência de calor em
% um retângulo

%dominio todo zerado
dominio = zeros(H/deltay,L/deltax);

%seta 100 graus para a borda de cima.
parfor m = 1:L/deltax
   dominio(1,m) = 100; 
end

end

