chenmh_gsvd.m

来自「Frequently used algorithms for numerical」· M 代码 · 共 5 行

function [U,V,D,X] = Chenmh_GSVD(G,r);
m = size(G,1);
[Q,R] = qr(G,0);
[U,V,D] = Chenmh_CSD(Q,r);
X = (V'*R)';