Sophie

Sophie

distrib > Fedora > 14 > x86_64 > by-pkgid > df736a3bc446df5b16150bebb7296274 > files > 94

DSDP-devel-5.8-2.fc14.i686.rpm

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<title>DSDP: src/sdp/dsdpdsmat.c Source File</title>
<link href="tabs.css" rel="stylesheet" type="text/css"/>
<link href="doxygen.css" rel="stylesheet" type="text/css"/>
</head>
<body>
<!-- Generated by Doxygen 1.7.4 -->
<div id="top">
<div id="titlearea">
<table cellspacing="0" cellpadding="0">
 <tbody>
 <tr style="height: 56px;">
  <td style="padding-left: 0.5em;">
   <div id="projectname">DSDP</div>
  </td>
 </tr>
 </tbody>
</table>
</div>
  <div id="navrow1" class="tabs">
    <ul class="tablist">
      <li><a href="index.html"><span>Main&#160;Page</span></a></li>
      <li><a href="pages.html"><span>Related&#160;Pages</span></a></li>
      <li><a href="modules.html"><span>Modules</span></a></li>
      <li><a href="annotated.html"><span>Data&#160;Structures</span></a></li>
      <li class="current"><a href="files.html"><span>Files</span></a></li>
      <li><a href="dirs.html"><span>Directories</span></a></li>
    </ul>
  </div>
  <div id="navrow2" class="tabs2">
    <ul class="tablist">
      <li><a href="files.html"><span>File&#160;List</span></a></li>
      <li><a href="globals.html"><span>Globals</span></a></li>
    </ul>
  </div>
  <div id="nav-path" class="navpath">
    <ul>
      <li class="navelem"><a class="el" href="dir_23046874d7fed141927c769a66d8e3a5.html">src</a>      </li>
      <li class="navelem"><a class="el" href="dir_2c21778722bc8593635d5ebd154ac3f7.html">sdp</a>      </li>
    </ul>
  </div>
</div>
<div class="header">
  <div class="headertitle">
<div class="title">dsdpdsmat.c</div>  </div>
</div>
<div class="contents">
<a href="dsdpdsmat_8c.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="preprocessor">#include &quot;<a class="code" href="dsdpdsmat__impl_8h.html" title="Structure of function pointers that each SDP Delta S matrix type (sparse, dense, diagonal, ...) must implement.">dsdpdsmat_impl.h</a>&quot;</span>
<a name="l00002"></a>00002 <span class="preprocessor">#include &quot;<a class="code" href="dsdpdsmat_8h.html" title="The interface between the SDPCone and the Delta S matrix.">dsdpdsmat.h</a>&quot;</span>
<a name="l00003"></a>00003 <span class="preprocessor">#include &quot;<a class="code" href="dsdpsys_8h.html" title="Error handling, printing, and profiling.">dsdpsys.h</a>&quot;</span>
<a name="l00008"></a>00008 <span class="preprocessor">#define DSDPNoOperationError(a);  { DSDPSETERR1(1,&quot;Delta S Matrix type: %s, Operation not defined\n&quot;,(a).dsdpops-&gt;matname); }</span>
<a name="l00009"></a>00009 <span class="preprocessor"></span><span class="preprocessor">#define DSDPChkMatError(a,b);  { if (b){ DSDPSETERR1(b,&quot;Delta S Matrix type: %s,\n&quot;,(a).dsdpops-&gt;matname); } }</span>
<a name="l00010"></a>00010 <span class="preprocessor"></span>
<a name="l00011"></a>00011 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00012"></a>00012 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatGetType&quot;</span>
<a name="l00013"></a>00013 <span class="preprocessor"></span><span class="keywordtype">int</span> DSDPDSMatGetType(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> A, <span class="keywordtype">int</span> *<span class="keywordtype">id</span>){
<a name="l00014"></a>00014   DSDPFunctionBegin;
<a name="l00015"></a>00015   *<span class="keywordtype">id</span>=A.dsdpops-&gt;id;
<a name="l00016"></a>00016   DSDPFunctionReturn(0); 
<a name="l00017"></a>00017 }
<a name="l00018"></a>00018 
<a name="l00019"></a>00019 
<a name="l00020"></a>00020 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00021"></a>00021 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatSetData&quot;</span>
<a name="l00022"></a>00022 <span class="preprocessor"></span>
<a name="l00031"></a><a class="code" href="dsdpdsmat_8h.html#a79b66391a81fc78b8ec00e50e98f45b9">00031</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#a80146b03ed5cc899e53fbb5b8dcb4504" title="Set the opaque pointer and function pointers to the matrix.">DSDPDSMatSetData</a>(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> *M, <span class="keyword">struct</span> <a class="code" href="structDSDPDSMat__Ops.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat_Ops</a>* ops,  <span class="keywordtype">void</span>*data){
<a name="l00032"></a>00032   <span class="keywordtype">int</span> info;
<a name="l00033"></a>00033   DSDPFunctionBegin;
<a name="l00034"></a>00034   (*M).dsdpops=ops;
<a name="l00035"></a>00035   (*M).matdata=data;
<a name="l00036"></a>00036   info=DSDPDSMatTest(*M); DSDPChkMatError(*M,info);
<a name="l00037"></a>00037   DSDPFunctionReturn(0); 
<a name="l00038"></a>00038 }
<a name="l00039"></a>00039 
<a name="l00040"></a>00040 
<a name="l00041"></a>00041 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00042"></a>00042 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatGetSize&quot;</span>
<a name="l00043"></a>00043 <span class="preprocessor"></span>
<a name="l00050"></a><a class="code" href="dsdpdsmat_8h.html#a5d252fb4dffc6dc4be3e8197a0912486">00050</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#aaf32f9f16b391070534ceeca5f6ffa03" title="Set the opaque pointer and function pointers to the matrix.">DSDPDSMatGetSize</a>(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> A,<span class="keywordtype">int</span>*n){
<a name="l00051"></a>00051   <span class="keywordtype">int</span> info;
<a name="l00052"></a>00052   DSDPFunctionBegin;
<a name="l00053"></a>00053   <span class="keywordflow">if</span> (A.dsdpops-&gt;matgetsize){
<a name="l00054"></a>00054     info=(A.dsdpops-&gt;matgetsize)(A.matdata,n); DSDPChkMatError(A,info);
<a name="l00055"></a>00055   } <span class="keywordflow">else</span> {
<a name="l00056"></a>00056     DSDPNoOperationError(A);
<a name="l00057"></a>00057   }
<a name="l00058"></a>00058   DSDPFunctionReturn(0);
<a name="l00059"></a>00059 }
<a name="l00060"></a>00060 
<a name="l00061"></a>00061 
<a name="l00062"></a>00062 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00063"></a>00063 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatDestroy&quot;</span>
<a name="l00064"></a>00064 <span class="preprocessor"></span>
<a name="l00070"></a><a class="code" href="dsdpdsmat_8h.html#ad101a38e147cc120fdbb98d01b51043b">00070</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#ab3e28c12ae70491cc1fb6d0e4024757a" title="Free the data structure.">DSDPDSMatDestroy</a>(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> *A){
<a name="l00071"></a>00071   <span class="keywordtype">int</span> info;
<a name="l00072"></a>00072   DSDPFunctionBegin;
<a name="l00073"></a>00073   <span class="keywordflow">if</span> (!(*A).dsdpops){ <span class="keywordflow">return</span> 0;}
<a name="l00074"></a>00074   <span class="keywordflow">if</span> ((*A).dsdpops-&gt;matdestroy){
<a name="l00075"></a>00075     info=((*A).dsdpops-&gt;matdestroy)((*A).matdata); DSDPChkMatError(*A,info);
<a name="l00076"></a>00076   } <span class="keywordflow">else</span> {
<a name="l00077"></a>00077     <span class="comment">/*    DSDPNoOperationError(1); */</span>
<a name="l00078"></a>00078   }
<a name="l00079"></a>00079   info=<a class="code" href="dsdpdsmat_8c.html#af3f1124787ca6a784818a70fcd7aaa83" title="Set pointers to null.">DSDPDSMatInitialize</a>(A); DSDPCHKERR(info);
<a name="l00080"></a>00080   DSDPFunctionReturn(0);
<a name="l00081"></a>00081 }
<a name="l00082"></a>00082 
<a name="l00083"></a>00083 
<a name="l00084"></a>00084 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00085"></a>00085 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatView&quot;</span>
<a name="l00086"></a>00086 <span class="preprocessor"></span>
<a name="l00092"></a><a class="code" href="dsdpdsmat_8h.html#add320b44372d24f6b9795cde7097253f">00092</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#a71d17522bcc0fca44f6982f7c6e41b87" title="Print the matrix.">DSDPDSMatView</a>(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> A){
<a name="l00093"></a>00093   <span class="keywordtype">int</span> info;
<a name="l00094"></a>00094   <span class="keywordflow">if</span> (A.dsdpops-&gt;matview){
<a name="l00095"></a>00095     info=(A.dsdpops-&gt;matview)(A.matdata); DSDPChkMatError(A,info);
<a name="l00096"></a>00096   } <span class="keywordflow">else</span> {
<a name="l00097"></a>00097     printf(<span class="stringliteral">&quot;No viewer available for matrix type: %s&quot;</span>,A.dsdpops-&gt;matname);
<a name="l00098"></a>00098   }
<a name="l00099"></a>00099   DSDPFunctionReturn(0);
<a name="l00100"></a>00100 }
<a name="l00101"></a>00101 
<a name="l00102"></a>00102 
<a name="l00103"></a>00103 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00104"></a>00104 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatZeroEntries&quot;</span>
<a name="l00105"></a>00105 <span class="preprocessor"></span>
<a name="l00110"></a><a class="code" href="dsdpdsmat_8h.html#adf435461551a6113f305caeb08233b0e">00110</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#ad1eb94e9fc1b053b44d09afe4bf51cf0" title="Zero the entries in the matrix.">DSDPDSMatZeroEntries</a>(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> A){
<a name="l00111"></a>00111   <span class="keywordtype">int</span> info;
<a name="l00112"></a>00112   DSDPFunctionBegin;
<a name="l00113"></a>00113   <span class="keywordflow">if</span> (A.dsdpops-&gt;matzeroentries){
<a name="l00114"></a>00114     info=(A.dsdpops-&gt;matzeroentries)(A.matdata); DSDPChkMatError(A,info);
<a name="l00115"></a>00115   } <span class="keywordflow">else</span> {
<a name="l00116"></a>00116     DSDPNoOperationError(A);
<a name="l00117"></a>00117   }
<a name="l00118"></a>00118   DSDPFunctionReturn(0);
<a name="l00119"></a>00119 }
<a name="l00120"></a>00120 
<a name="l00121"></a>00121 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00122"></a>00122 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatSetArray&quot;</span>
<a name="l00123"></a>00123 <span class="preprocessor"></span>
<a name="l00130"></a><a class="code" href="dsdpdsmat_8h.html#acd143879588102a8a965cbc9ad948e3b">00130</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#a458ba9739ca12e14736a90034611951b" title="Set values into the matrix.">DSDPDSMatSetArray</a>(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> A, <a class="code" href="structDSDPVMat__C.html" title="Dense symmetric matrix for one block in the semidefinite cone.">DSDPVMat</a> T){
<a name="l00131"></a>00131   <span class="keywordtype">int</span> info,n,nn;
<a name="l00132"></a>00132   <span class="keywordtype">double</span> *ds;
<a name="l00133"></a>00133   DSDPFunctionBegin;
<a name="l00134"></a>00134   <span class="keywordflow">if</span> (A.dsdpops-&gt;matseturmat){
<a name="l00135"></a>00135     info=<a class="code" href="dsdpxmat_8c.html#a41e9d8b32dd9a96f4b9480f831edfb3d" title="Get number of rows and columns.">DSDPVMatGetSize</a>(T,&amp;n);DSDPCHKERR(info);
<a name="l00136"></a>00136     info=<a class="code" href="dsdpxmat_8c.html#a3601c3a4974f85d70476152aeebb8a6d" title="Get the array that stores the matrix.">DSDPVMatGetArray</a>(T, &amp;ds, &amp;nn); DSDPCHKERR(info);
<a name="l00137"></a>00137     info=(A.dsdpops-&gt;matseturmat)(A.matdata,ds,nn,n); DSDPChkMatError(A,info);
<a name="l00138"></a>00138     info=<a class="code" href="dsdpxmat_8c.html#a45cd417f498392df8fe1f8afca6cff8b" title="Restore the array that stores the matrix.">DSDPVMatRestoreArray</a>(T, &amp;ds, &amp;nn); DSDPCHKERR(info);
<a name="l00139"></a>00139   } <span class="keywordflow">else</span> {
<a name="l00140"></a>00140     DSDPNoOperationError(A);
<a name="l00141"></a>00141   }
<a name="l00142"></a>00142   DSDPFunctionReturn(0);
<a name="l00143"></a>00143 }
<a name="l00144"></a>00144 
<a name="l00145"></a>00145 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00146"></a>00146 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatMult&quot;</span>
<a name="l00147"></a>00147 <span class="preprocessor"></span>
<a name="l00154"></a><a class="code" href="dsdpdsmat_8h.html#af027a35c59610af989faa16c0cb7639d">00154</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#ad5c54b432eb405cd469a48b885cf47f5" title="Set values into the matrix.">DSDPDSMatMult</a>(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> A, <a class="code" href="structSDPConeVec__C.html" title="Vector whose length corresponds to dimension of a block in a cone.">SDPConeVec</a> X, <a class="code" href="structSDPConeVec__C.html" title="Vector whose length corresponds to dimension of a block in a cone.">SDPConeVec</a> Y){
<a name="l00155"></a>00155   <span class="keywordtype">int</span> n,info;
<a name="l00156"></a>00156   <span class="keywordtype">double</span> *x,*y;
<a name="l00157"></a>00157   
<a name="l00158"></a>00158   DSDPFunctionBegin;
<a name="l00159"></a>00159   <span class="keywordflow">if</span> (A.dsdpops-&gt;matmult){
<a name="l00160"></a>00160     info=SDPConeVecGetArray(X,&amp;x); DSDPCHKERR(info);
<a name="l00161"></a>00161     info=SDPConeVecGetArray(Y,&amp;y); DSDPCHKERR(info);
<a name="l00162"></a>00162     info=SDPConeVecGetSize(Y,&amp;n); DSDPCHKERR(info);
<a name="l00163"></a>00163     info=(A.dsdpops-&gt;matmult)(A.matdata,x,y,n); DSDPChkMatError(A,info);
<a name="l00164"></a>00164     info=SDPConeVecRestoreArray(X,&amp;x); DSDPCHKERR(info);
<a name="l00165"></a>00165     info=SDPConeVecRestoreArray(Y,&amp;y); DSDPCHKERR(info);
<a name="l00166"></a>00166   } <span class="keywordflow">else</span> {
<a name="l00167"></a>00167     DSDPNoOperationError(A);
<a name="l00168"></a>00168    }
<a name="l00169"></a>00169   DSDPFunctionReturn(0);
<a name="l00170"></a>00170 }
<a name="l00171"></a>00171 
<a name="l00172"></a>00172 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00173"></a>00173 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSVecVec&quot;</span>
<a name="l00174"></a>00174 <span class="preprocessor"></span>
<a name="l00181"></a><a class="code" href="dsdpdsmat_8h.html#ac2f128a35dfec4880f81a89dc84f7f19">00181</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#a3875114b5db6bec165ac6e9293862623" title="Compute the product x&#39; A x.">DSDPDSMatVecVec</a>(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> A, <a class="code" href="structSDPConeVec__C.html" title="Vector whose length corresponds to dimension of a block in a cone.">SDPConeVec</a> X, <span class="keywordtype">double</span> *vAv){
<a name="l00182"></a>00182   <span class="keywordtype">int</span> n,info;
<a name="l00183"></a>00183   <span class="keywordtype">double</span> *x;
<a name="l00184"></a>00184   
<a name="l00185"></a>00185   DSDPFunctionBegin;
<a name="l00186"></a>00186   <span class="keywordflow">if</span> (A.dsdpops-&gt;matvecvec){
<a name="l00187"></a>00187     info=SDPConeVecGetArray(X,&amp;x); DSDPCHKERR(info);
<a name="l00188"></a>00188     info=SDPConeVecGetSize(X,&amp;n); DSDPCHKERR(info);
<a name="l00189"></a>00189     info=(A.dsdpops-&gt;matvecvec)(A.matdata,x,n,vAv); DSDPChkMatError(A,info);
<a name="l00190"></a>00190     info=SDPConeVecRestoreArray(X,&amp;x); DSDPCHKERR(info);
<a name="l00191"></a>00191   } <span class="keywordflow">else</span> {
<a name="l00192"></a>00192     DSDPNoOperationError(A);
<a name="l00193"></a>00193    }
<a name="l00194"></a>00194   DSDPFunctionReturn(0);
<a name="l00195"></a>00195 }
<a name="l00196"></a>00196 
<a name="l00197"></a>00197 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00198"></a>00198 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatCheck&quot;</span>
<a name="l00199"></a>00199 <span class="preprocessor"></span><span class="keywordtype">int</span> DSDPDSMatCheck(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> DS,<a class="code" href="structSDPConeVec__C.html" title="Vector whose length corresponds to dimension of a block in a cone.">SDPConeVec</a> W1,<a class="code" href="structSDPConeVec__C.html" title="Vector whose length corresponds to dimension of a block in a cone.">SDPConeVec</a> W2,<a class="code" href="structDSDPVMat__C.html" title="Dense symmetric matrix for one block in the semidefinite cone.">DSDPVMat</a> T){
<a name="l00200"></a>00200   DSDPFunctionBegin;
<a name="l00201"></a>00201   DSDPFunctionReturn(0);
<a name="l00202"></a>00202 }
<a name="l00203"></a>00203 
<a name="l00204"></a>00204 
<a name="l00205"></a>00205 <span class="keyword">static</span> <span class="keyword">struct  </span><a class="code" href="structDSDPDSMat__Ops.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat_Ops</a> dsdpmatops2;
<a name="l00206"></a>00206 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">char</span>* dsmatname=<span class="stringliteral">&quot;NOT SET YET&quot;</span>;
<a name="l00207"></a>00207 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00208"></a>00208 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatOpsInitialize&quot;</span>
<a name="l00209"></a>00209 <span class="preprocessor"></span>
<a name="l00214"></a><a class="code" href="dsdpdsmat__impl_8h.html#a96fe93e92c08f5686901ff429fa18a9a">00214</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#a956667007b1dada1d134e557b0feee9e" title="Set pointers to null.">DSDPDSMatOpsInitialize</a>(<span class="keyword">struct</span>  <a class="code" href="structDSDPDSMat__Ops.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat_Ops</a>*aops){
<a name="l00215"></a>00215   aops-&gt;matseturmat=0;
<a name="l00216"></a>00216   aops-&gt;matview=0;
<a name="l00217"></a>00217   aops-&gt;matdestroy=0;
<a name="l00218"></a>00218   aops-&gt;matgetsize=0;
<a name="l00219"></a>00219   aops-&gt;matzeroentries=0;
<a name="l00220"></a>00220   aops-&gt;matmult=0;
<a name="l00221"></a>00221   aops-&gt;mattest=0;
<a name="l00222"></a>00222   aops-&gt;matvecvec=0;
<a name="l00223"></a>00223   aops-&gt;id=0;
<a name="l00224"></a>00224   aops-&gt;matname=dsmatname;
<a name="l00225"></a>00225   <span class="keywordflow">return</span> 0;
<a name="l00226"></a>00226 }
<a name="l00227"></a>00227 
<a name="l00228"></a>00228 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00229"></a>00229 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatTest&quot;</span>
<a name="l00230"></a>00230 <span class="preprocessor"></span><span class="keywordtype">int</span> DSDPDSMatTest(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> A){
<a name="l00231"></a>00231   <span class="keywordtype">int</span> info;
<a name="l00232"></a>00232   DSDPFunctionBegin;
<a name="l00233"></a>00233   <span class="keywordflow">if</span> (A.dsdpops==0 || A.dsdpops==&amp;dsdpmatops2){
<a name="l00234"></a>00234   } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (A.dsdpops-&gt;mattest){
<a name="l00235"></a>00235     DSDPLogInfo(0,120,<span class="stringliteral">&quot;Start to set DS Matrix\n&quot;</span>);
<a name="l00236"></a>00236     info=(A.dsdpops-&gt;mattest)(A.matdata); DSDPChkMatError(A,info);
<a name="l00237"></a>00237     DSDPLogInfo(0,120,<span class="stringliteral">&quot;Done set DS Matrix\n&quot;</span>);
<a name="l00238"></a>00238   } <span class="keywordflow">else</span> {
<a name="l00239"></a>00239     <span class="comment">/*</span>
<a name="l00240"></a>00240 <span class="comment">    DSDPNoOperationError(A);</span>
<a name="l00241"></a>00241 <span class="comment">    */</span>
<a name="l00242"></a>00242   }
<a name="l00243"></a>00243   DSDPFunctionReturn(0);
<a name="l00244"></a>00244 }
<a name="l00245"></a>00245 
<a name="l00246"></a>00246 
<a name="l00247"></a>00247 <span class="preprocessor">#undef __FUNCT__</span>
<a name="l00248"></a>00248 <span class="preprocessor"></span><span class="preprocessor">#define __FUNCT__ &quot;DSDPDSMatInitialize&quot;</span>
<a name="l00249"></a>00249 <span class="preprocessor"></span>
<a name="l00254"></a><a class="code" href="dsdpdsmat_8h.html#afe3687816d6a2bfb5c7e2c625f6c8622">00254</a> <span class="keywordtype">int</span> <a class="code" href="dsdpdsmat_8c.html#af3f1124787ca6a784818a70fcd7aaa83" title="Set pointers to null.">DSDPDSMatInitialize</a>(<a class="code" href="structDSDPDSMat__C.html" title="Symmetric Delta S matrix for one block in the semidefinite cone.">DSDPDSMat</a> *B){
<a name="l00255"></a>00255   <span class="keywordtype">int</span> info;
<a name="l00256"></a>00256   DSDPFunctionBegin;
<a name="l00257"></a>00257   info=<a class="code" href="dsdpdsmat_8c.html#a956667007b1dada1d134e557b0feee9e" title="Set pointers to null.">DSDPDSMatOpsInitialize</a>(&amp;dsdpmatops2); DSDPCHKERR(info);
<a name="l00258"></a>00258   info=<a class="code" href="dsdpdsmat_8c.html#a80146b03ed5cc899e53fbb5b8dcb4504" title="Set the opaque pointer and function pointers to the matrix.">DSDPDSMatSetData</a>(B, &amp;dsdpmatops2, 0); DSDPCHKERR(info);
<a name="l00259"></a>00259   DSDPFunctionReturn(0);
<a name="l00260"></a>00260 }
<a name="l00261"></a>00261 
</pre></div></div>
</div>
<hr class="footer"/><address class="footer"><small>Generated on Wed Jun 8 2011 for DSDP by&#160;
<a href="http://www.doxygen.org/index.html">
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.7.4 </small></address>
</body>
</html>