Home > tt2 > core > ind2sub2.m

ind2sub2

PURPOSE ^

function [sub]=ind2sub2(siz,ind)

SYNOPSIS ^

function [sub]=ind2sub2(siz,ind)

DESCRIPTION ^

 function [sub]=ind2sub2(siz,ind)
 WORKING, bljat', ind2sub
 Splits integer index IND to a multiindex SUB according to dimensions SIZ

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function [sub]=ind2sub2(siz,ind)
0002 % function [sub]=ind2sub2(siz,ind)
0003 % WORKING, bljat', ind2sub
0004 % Splits integer index IND to a multiindex SUB according to dimensions SIZ
0005 
0006 d = max(size(siz));
0007 sub = zeros(1,d);
0008 curnum = ind-1;
0009 for i=d:-1:2
0010     sub(i) = floor(curnum/prod(siz(1:i-1)))+1;
0011     curnum = mod(curnum, prod(siz(1:i-1)));
0012 end;
0013 sub(1)=curnum+1;
0014 
0015 end

Generated on Wed 08-Feb-2012 18:20:24 by m2html © 2005