4
4
if rhs<>1 then error(39), end
5
5
ta=g('tail');he=g('head');n=g('node_number');np1=n+1;
7
[lp,la,ls] = adj_lists(i,n,ta,he);
7
[lp,la,ln] = adj_lists(i,n,ta,he);
8
8
outdegree=lp(2:np1)-lp(1:n);
9
[lp,la,ls] = adj_lists(i,n,he,ta);
9
[lp,la,ln] = adj_lists(i,n,he,ta);
10
10
indegree=lp(2:np1)-lp(1:n);