p2r.m

i hope use every file i put here to evry one and thank >

function [r] = p2r(mag,ang)

real = cos(ang) * mag;
imag = sin(ang) * mag;

r = real + j * imag;