function v = phi(z,tipok,tensorial,C,R,LD)
%calcula elemento generico da base de aproximacao
%z(1),z(2) sao coordenadas absolutas do argumento
%C(1),C(2) eh o centro do elemento
%R(1),R(2) sao raios absolutos do elemento
%LD eh o tamanho do dominio
%se tensorial for true usa elemento tensorial senao usa elemento radial
%torna o elemento periodico por cossenoide
%supoe que psi-mae e phi_mae sao simetricas

for j =1:2
    %calcula argumento dz(j) relativo ao centros e escalado de modo que
    %o raio do elemento eh 1
     dz(j) = abs((z(j) - C(j))/R(j));
    %calcula o periodo TR(j) na mesma escala
    TR(j) = LD(j)/R(j);
end
if tensorial
    v = psi_mae(dz(1),tipok,TR(1))*psi_mae(dz(2),tipok,TR(2));
else
    v = phi_mae(dz(1),dz(2),tipok,TR(1),TR(2));
end