19 lines
630 B
Mathematica
19 lines
630 B
Mathematica
|
%%****************************************************
|
||
|
|
%% mcpschur: compute schur matrix of HKM or NT direction
|
||
|
|
%% for MCP and maxG problems.
|
||
|
|
%%
|
||
|
|
%% [schurmat] = mcpschur(X,Zinv,schurfun_par);
|
||
|
|
%%
|
||
|
|
%% Ak= -ek*ek';
|
||
|
|
%%*****************************************************************
|
||
|
|
%% SDPT3: version 4.0
|
||
|
|
%% Copyright (c) 1997 by
|
||
|
|
%% Kim-Chuan Toh, Michael J. Todd, Reha H. Tutuncu
|
||
|
|
%% Last Modified: 16 Sep 2004
|
||
|
|
%%*****************************************************************
|
||
|
|
|
||
|
|
function [schurmat] = mcpschur(X,Zinv,schurfun_pars);
|
||
|
|
|
||
|
|
schurmat = X .* Zinv;
|
||
|
|
%%****************************************************
|