Mercurial > hg > ishara
annotate general/numerical/scalar/rpsi.m @ 29:61921dceded1
More documentation on type system.
| author | samer |
|---|---|
| date | Sat, 19 Jan 2013 17:56:21 +0000 |
| parents | db7f4afd27c5 |
| children |
| rev | line source |
|---|---|
| samer@4 | 1 function Y=rpsi(a,b) |
| samer@4 | 2 % rpsi - Version of PSI that returns the same shape array as supplied |
| samer@4 | 3 % |
| samer@4 | 4 % rpsi :: [[Size]->real] -> [[Size]->real]. |
| samer@4 | 5 if nargin==1 |
| samer@4 | 6 Y=reshape(psi(a),size(a)); |
| samer@4 | 7 else |
| samer@4 | 8 Y=reshape(psi(a,b),size(b)); |
| samer@4 | 9 end |
| samer@4 | 10 |