No BSD License  

Highlights from
Clebsch Gordan Coefficient Solver GUI

image thumbnail
from Clebsch Gordan Coefficient Solver GUI by james jun
Easy to use Clebsch-Gordan coefficient solver for adding two angular momentums.

searchbycol( M, col )
function [ i ] = searchbycol( M, col )
%SEARCHBYCOL find a row in a matrix.   Matrix must be two dimension
%out
%   i: returns 0 if not found, returns the row index if a row matches M

[m n] = size(M);
 
for c=1:n
    if all(M(c,:), col)
        i = c;
        break;
    end
end
i = 0;

Contact us at files@mathworks.com