annotate general/numerical/array/proddims.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 A=proddims(A,dims)
|
|
samer@4
|
2 % proddims - Product over multiple dimensions
|
|
samer@4
|
3 %
|
|
samer@4
|
4 % proddims ::
|
|
samer@4
|
5 % [Size:[[1,E]]->A] ~'E dimensional array',
|
|
samer@4
|
6 % Dims:[[K]->1..E] ~'dims to prod over'
|
|
samer@4
|
7 % -> [Size1->A] :- Size1=arrset(Size,Dims,1).
|
|
samer@4
|
8 %
|
|
samer@4
|
9 % Result is same size as input except for summed dimensions
|
|
samer@4
|
10 % which are collapsed to a size of 1.
|
|
samer@4
|
11 for i=dims, A=prod(A,i); end
|
