Blindaje Primario

function Xp = Primario(alfa, beta, gamma, N, T, U, Kp, P, dp)
Res = (1/(alfa*gamma));
A = (((N*T*U*Kp)/(P*(dp)^2))^gamma)+(beta/alfa);
B = (1+(beta/alfa));
L = log(A/B);
Xp = Res*L;