DMCA

NonExit=Table[Apply[And,Table[c[[i,j]]==0, {i,1,Ix[1,Q-1,Q-1,B-1,B-1]+1}]], {j,1,Ix[1,Q-1,Q-1,B-1,B-1]+1}] (*ZeroCol=Table[First[Rest[d[[j]]]]==0, {j,1,Ix[1,Q-1,Q-1,B-1,B-1]+1}]

Cached

Download Links

by Unknown Authors