view general/numerical/scalar/rpsi.m @ 17:cb249ba61e9e

Moved from parent directory.
author samer
date Thu, 17 Jan 2013 13:21:46 +0000
parents db7f4afd27c5
children
line wrap: on
line source
function Y=rpsi(a,b)
% rpsi - Version of PSI that returns the same shape array as supplied
%
% rpsi :: [[Size]->real] -> [[Size]->real].
if nargin==1
	Y=reshape(psi(a),size(a));
else
	Y=reshape(psi(a,b),size(b));
end