<!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"/>
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
<title>CPPLapack: zhsmatrix-io.hpp Source File</title>

<link href="tabs.css" rel="stylesheet" type="text/css"/>
<link href="doxygen.css" rel="stylesheet" type="text/css" />

<link href="search/search.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="jquery.js"></script>
<script type="text/javascript" src="search/search.js"></script>
<script type="text/javascript">
  $(document).ready(function() { searchBox.OnSelectItem(0); });
</script>

</head>
<body>
<div id="top"><!-- do not remove this div! -->


<div id="titlearea">
<table cellspacing="0" cellpadding="0">
 <tbody>
 <tr style="height: 56px;">
  
  
  <td style="padding-left: 0.5em;">
   <div id="projectname">CPPLapack
   
   </div>
   
  </td>
  
  
  
 </tr>
 </tbody>
</table>
</div>

<!-- Generated by Doxygen 1.7.6.1 -->
<script type="text/javascript">
var searchBox = new SearchBox("searchBox", "search",false,'Search');
</script>
  <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="annotated.html"><span>Classes</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>
      <li>
        <div id="MSearchBox" class="MSearchBoxInactive">
        <span class="left">
          <img id="MSearchSelect" src="search/mag_sel.png"
               onmouseover="return searchBox.OnSearchSelectShow()"
               onmouseout="return searchBox.OnSearchSelectHide()"
               alt=""/>
          <input type="text" id="MSearchField" value="Search" accesskey="S"
               onfocus="searchBox.OnSearchFieldFocus(true)" 
               onblur="searchBox.OnSearchFieldFocus(false)" 
               onkeyup="searchBox.OnSearchFieldChange(event)"/>
          </span><span class="right">
            <a id="MSearchClose" href="javascript:searchBox.CloseResultsWindow()"><img id="MSearchCloseImg" border="0" src="search/close.png" alt=""/></a>
          </span>
        </div>
      </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>File&#160;Members</span></a></li>
    </ul>
  </div>
<!-- window showing the filter options -->
<div id="MSearchSelectWindow"
     onmouseover="return searchBox.OnSearchSelectShow()"
     onmouseout="return searchBox.OnSearchSelectHide()"
     onkeydown="return searchBox.OnSearchSelectKey(event)">
<a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(0)"><span class="SelectionMark">&#160;</span>All</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(1)"><span class="SelectionMark">&#160;</span>Classes</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(2)"><span class="SelectionMark">&#160;</span>Files</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(3)"><span class="SelectionMark">&#160;</span>Functions</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(4)"><span class="SelectionMark">&#160;</span>Variables</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(5)"><span class="SelectionMark">&#160;</span>Friends</a></div>

<!-- iframe showing the search results (closed by default) -->
<div id="MSearchResultsWindow">
<iframe src="javascript:void(0)" frameborder="0" 
        name="MSearchResults" id="MSearchResults">
</iframe>
</div>

  <div id="nav-path" class="navpath">
    <ul>
      <li class="navelem"><a class="el" href="dir_a37d0dd275f7ec49ee26f1d33d1059f5.html">include</a>      </li>
      <li class="navelem"><a class="el" href="dir_552c8cbbc97996c8dc38aaad45a66f6f.html">zhsmatrix-</a>      </li>
    </ul>
  </div>
</div>
<div class="header">
  <div class="headertitle">
<div class="title">zhsmatrix-io.hpp</div>  </div>
</div><!--header-->
<div class="contents">
<a href="zhsmatrix-io_8hpp.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">//=============================================================================</span><span class="comment"></span>
<a name="l00002"></a>00002 <span class="comment">/*! operator() for const object */</span>
<a name="l00003"></a><a class="code" href="classzhsmatrix.html#a426e8b10a325d71218aba59e276baead">00003</a> <span class="keyword">inline</span> comple <a class="code" href="classzhsmatrix.html#a426e8b10a325d71218aba59e276baead">zhsmatrix::operator()</a>(<span class="keyword">const</span> <span class="keywordtype">long</span>&amp; <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>, <span class="keyword">const</span> <span class="keywordtype">long</span>&amp; j)<span class="keyword"> const</span>
<a name="l00004"></a>00004 <span class="keyword"></span>{VERBOSE_REPORT;
<a name="l00005"></a>00005 <span class="preprocessor">#ifdef  CPPL_DEBUG</span>
<a name="l00006"></a>00006 <span class="preprocessor"></span>  <span class="keywordflow">if</span>( i&lt;0 || j&lt;0 || <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>&lt;=i || <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>&lt;=j ){
<a name="l00007"></a>00007     ERROR_REPORT;
<a name="l00008"></a>00008     std::cerr &lt;&lt; <span class="stringliteral">&quot;The required component is out of the matrix size.&quot;</span> &lt;&lt; std::endl
<a name="l00009"></a>00009               &lt;&lt; <span class="stringliteral">&quot;Your input was (&quot;</span> &lt;&lt; i &lt;&lt; <span class="stringliteral">&quot;,&quot;</span> &lt;&lt; j &lt;&lt; <span class="stringliteral">&quot;).&quot;</span> &lt;&lt; std::endl;
<a name="l00010"></a>00010     exit(1);
<a name="l00011"></a>00011   }
<a name="l00012"></a>00012 <span class="preprocessor">#endif//CPPL_DEBUG</span>
<a name="l00013"></a>00013 <span class="preprocessor"></span>  <span class="comment"></span>
<a name="l00014"></a>00014 <span class="comment">  //// search (i,j) component ////</span>
<a name="l00015"></a>00015 <span class="comment"></span>  <span class="keyword">const</span> uint32_t ii(std::max(i,j)), jj(std::min(i,j));
<a name="l00016"></a>00016   <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::const_iterator p=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[ii].begin(); p!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[ii].end(); p++){
<a name="l00017"></a>00017     <span class="keywordflow">if</span>(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[*p].j==jj){
<a name="l00018"></a>00018       <span class="keywordflow">if</span>( i&gt;j ){ <span class="keywordflow">return</span> <a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[*p].v; }<span class="comment">//ii=i</span>
<a name="l00019"></a>00019       <span class="keywordflow">else</span>{      <span class="keywordflow">return</span> <a class="code" href="__zcovector-calc_8hpp.html#a773c28a661407104353f70c7a3ab88f2">std::conj</a>(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[*p].v); }<span class="comment">//ii=j</span>
<a name="l00020"></a>00020     }
<a name="l00021"></a>00021   }
<a name="l00022"></a>00022   <span class="comment"></span>
<a name="l00023"></a>00023 <span class="comment">  //// (i,j) component was not found ////</span>
<a name="l00024"></a>00024 <span class="comment"></span>  <span class="keywordflow">return</span> comple(0.0,0.0);
<a name="l00025"></a>00025 }
<a name="l00026"></a>00026 
<a name="l00027"></a>00027 <span class="comment">//=============================================================================</span><span class="comment"></span>
<a name="l00028"></a>00028 <span class="comment">/*! operator() */</span>
<a name="l00029"></a><a class="code" href="classzhsmatrix.html#ad127678fd6e8831d3f0865456e3df27b">00029</a> <span class="keyword">inline</span> <a class="code" href="classzhecomplex.html" title="(DO NOT USE) Complex-double Class for Hermitian matrices">zhecomplex</a> <a class="code" href="classzhsmatrix.html#a426e8b10a325d71218aba59e276baead">zhsmatrix::operator()</a>(<span class="keyword">const</span> <span class="keywordtype">long</span>&amp; <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>, <span class="keyword">const</span> <span class="keywordtype">long</span>&amp; j)
<a name="l00030"></a>00030 {VERBOSE_REPORT;
<a name="l00031"></a>00031 <span class="preprocessor">#ifdef  CPPL_DEBUG</span>
<a name="l00032"></a>00032 <span class="preprocessor"></span>  <span class="keywordflow">if</span>( i&lt;0 || j&lt;0 || <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>&lt;=i || <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>&lt;=j ){
<a name="l00033"></a>00033     ERROR_REPORT;
<a name="l00034"></a>00034     std::cerr &lt;&lt; <span class="stringliteral">&quot;The required component is out of the matrix size.&quot;</span> &lt;&lt; std::endl
<a name="l00035"></a>00035               &lt;&lt; <span class="stringliteral">&quot;Your input was (&quot;</span> &lt;&lt; i &lt;&lt; <span class="stringliteral">&quot;,&quot;</span> &lt;&lt; j &lt;&lt; <span class="stringliteral">&quot;).&quot;</span> &lt;&lt; std::endl;
<a name="l00036"></a>00036     exit(1);
<a name="l00037"></a>00037   }
<a name="l00038"></a>00038 <span class="preprocessor">#endif//CPPL_DEBUG</span>
<a name="l00039"></a>00039 <span class="preprocessor"></span>  <span class="comment"></span>
<a name="l00040"></a>00040 <span class="comment">  //////// search (i,j) component ////////</span>
<a name="l00041"></a>00041 <span class="comment"></span>  <span class="keyword">const</span> uint32_t ii(std::max(i,j)), jj(std::min(i,j));
<a name="l00042"></a>00042   <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::const_iterator p=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[ii].begin(); p!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[ii].end(); p++){
<a name="l00043"></a>00043     <span class="keywordflow">if</span>(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[*p].j==jj){
<a name="l00044"></a>00044       <span class="keywordflow">return</span> <a class="code" href="classzhecomplex.html" title="(DO NOT USE) Complex-double Class for Hermitian matrices">zhecomplex</a>(i,j, <a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[*p].v);
<a name="l00045"></a>00045     }
<a name="l00046"></a>00046   }
<a name="l00047"></a>00047   <span class="comment"></span>
<a name="l00048"></a>00048 <span class="comment">  //////// (i,j) component not found ////////</span>
<a name="l00049"></a>00049 <span class="comment"></span>  <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[<a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>].push_back(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.size());
<a name="l00050"></a>00050   <span class="keywordflow">if</span>(i!=j){<span class="comment">//off-diagonal</span>
<a name="l00051"></a>00051     <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[j].push_back(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.size());
<a name="l00052"></a>00052   }
<a name="l00053"></a>00053   <a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.push_back(<a class="code" href="classzcomponent.html" title="Component Class for Complex Double-precision Sparse Matrix Classes.">zcomponent</a>(ii,jj,comple(0.,0.)));
<a name="l00054"></a>00054   <span class="keywordflow">return</span> <a class="code" href="classzhecomplex.html" title="(DO NOT USE) Complex-double Class for Hermitian matrices">zhecomplex</a>(i,j, <a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.back().v);
<a name="l00055"></a>00055 }
<a name="l00056"></a>00056 <span class="comment"></span>
<a name="l00057"></a>00057 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00058"></a>00058 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00059"></a>00059 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00060"></a>00060 <span class="comment"></span>
<a name="l00061"></a>00061 <span class="comment">//=============================================================================</span><span class="comment"></span>
<a name="l00062"></a>00062 <span class="comment">/*! put value with volume cheack without isListed check */</span>
<a name="l00063"></a><a class="code" href="classzhsmatrix.html#af017988cb32169e05841688a3bff79be">00063</a> <span class="keyword">inline</span> <a class="code" href="classzhsmatrix.html" title="Complex Double-precision Hermitian Sparse Matrix Class.">zhsmatrix</a>&amp; <a class="code" href="classzhsmatrix.html#af017988cb32169e05841688a3bff79be">zhsmatrix::put</a>(<span class="keyword">const</span> <span class="keywordtype">long</span>&amp; <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>, <span class="keyword">const</span> <span class="keywordtype">long</span>&amp; j, <span class="keyword">const</span> comple&amp; v)
<a name="l00064"></a>00064 {VERBOSE_REPORT;
<a name="l00065"></a>00065 <span class="preprocessor">#ifdef  CPPL_DEBUG</span>
<a name="l00066"></a>00066 <span class="preprocessor"></span>  <span class="keywordflow">if</span>( i&lt;0 || j&lt;0 || <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>&lt;=i || <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>&lt;=j ){
<a name="l00067"></a>00067     ERROR_REPORT;
<a name="l00068"></a>00068     std::cerr &lt;&lt; <span class="stringliteral">&quot;The required component is out of the matrix size.&quot;</span> &lt;&lt; std::endl
<a name="l00069"></a>00069               &lt;&lt; <span class="stringliteral">&quot;Your input was (&quot;</span> &lt;&lt; i &lt;&lt; <span class="stringliteral">&quot;,&quot;</span> &lt;&lt; j &lt;&lt; <span class="stringliteral">&quot;).&quot;</span> &lt;&lt; std::endl;
<a name="l00070"></a>00070     exit(1);
<a name="l00071"></a>00071   }
<a name="l00072"></a>00072   
<a name="l00073"></a>00073   <span class="keywordflow">if</span>( <a class="code" href="classzhsmatrix.html#a7c59ac599f8e53261ada6819e174272b">isListed</a>(i,j) ){
<a name="l00074"></a>00074     ERROR_REPORT;
<a name="l00075"></a>00075     std::cerr &lt;&lt; <span class="stringliteral">&quot;The required component is already listed.&quot;</span> &lt;&lt; std::endl
<a name="l00076"></a>00076               &lt;&lt; <span class="stringliteral">&quot;Your input was (&quot;</span> &lt;&lt; i &lt;&lt; <span class="stringliteral">&quot;,&quot;</span> &lt;&lt; j &lt;&lt; <span class="stringliteral">&quot;).&quot;</span> &lt;&lt; std::endl;
<a name="l00077"></a>00077     exit(1);
<a name="l00078"></a>00078   }
<a name="l00079"></a>00079 <span class="preprocessor">#endif//CPPL_DEBUG</span>
<a name="l00080"></a>00080 <span class="preprocessor"></span>  <span class="comment"></span>
<a name="l00081"></a>00081 <span class="comment">  //// push ////</span>
<a name="l00082"></a>00082 <span class="comment"></span>  <span class="keyword">const</span> <span class="keywordtype">long</span> ii(std::max(i,j)), jj(std::min(i,j));
<a name="l00083"></a>00083   <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[ii].push_back(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.size());
<a name="l00084"></a>00084   <span class="keywordflow">if</span>(i!=j){<span class="comment">//off-diagonal</span>
<a name="l00085"></a>00085     <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[jj].push_back(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.size());
<a name="l00086"></a>00086   }
<a name="l00087"></a>00087   <a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.push_back(<a class="code" href="classzcomponent.html" title="Component Class for Complex Double-precision Sparse Matrix Classes.">zcomponent</a>(ii,jj,v));
<a name="l00088"></a>00088   <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00089"></a>00089 }
<a name="l00090"></a>00090 <span class="comment"></span>
<a name="l00091"></a>00091 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00092"></a>00092 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00093"></a>00093 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00094"></a>00094 <span class="comment"></span>
<a name="l00095"></a>00095 <span class="comment">//=============================================================================</span><span class="comment"></span>
<a name="l00096"></a>00096 <span class="comment">/*! delete the entry of a component */</span>
<a name="l00097"></a><a class="code" href="classzhsmatrix.html#a8b0387dbd5d1ffdb6793e7ba1d1170a6">00097</a> <span class="keyword">inline</span> <a class="code" href="classzhsmatrix.html" title="Complex Double-precision Hermitian Sparse Matrix Class.">zhsmatrix</a>&amp; <a class="code" href="classzhsmatrix.html#a8b0387dbd5d1ffdb6793e7ba1d1170a6">zhsmatrix::del</a>(<span class="keyword">const</span> <span class="keywordtype">long</span> <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>, <span class="keyword">const</span> <span class="keywordtype">long</span> j)
<a name="l00098"></a>00098 {VERBOSE_REPORT;
<a name="l00099"></a>00099 <span class="preprocessor">#ifdef  CPPL_DEBUG</span>
<a name="l00100"></a>00100 <span class="preprocessor"></span>  <span class="keywordflow">if</span>( i&lt;0 || j&lt;0 || <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>&lt;=i || <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>&lt;=j ){
<a name="l00101"></a>00101     ERROR_REPORT;
<a name="l00102"></a>00102     std::cerr &lt;&lt; <span class="stringliteral">&quot;The required component is out of the matrix size.&quot;</span> &lt;&lt; std::endl
<a name="l00103"></a>00103               &lt;&lt; <span class="stringliteral">&quot;Your input was (&quot;</span> &lt;&lt; i &lt;&lt; <span class="stringliteral">&quot;,&quot;</span> &lt;&lt; j &lt;&lt; <span class="stringliteral">&quot;).&quot;</span> &lt;&lt; std::endl;
<a name="l00104"></a>00104     exit(1);
<a name="l00105"></a>00105   }
<a name="l00106"></a>00106 <span class="preprocessor">#endif//CPPL_DEBUG</span>
<a name="l00107"></a>00107 <span class="preprocessor"></span>
<a name="l00108"></a>00108   <span class="keyword">const</span> <span class="keywordtype">long</span> ii(std::max(i,j)), jj(std::min(i,j));
<a name="l00109"></a>00109 <span class="comment"></span>
<a name="l00110"></a>00110 <span class="comment">  //////// search (i,j) component ////////</span>
<a name="l00111"></a>00111 <span class="comment"></span>  <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator p=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[ii].begin(); p!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[ii].end(); p++){
<a name="l00112"></a>00112     <span class="keywordflow">if</span>( <span class="keywordtype">long</span>(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[*p].i)==ii &amp;&amp; long(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[*p].j)==jj ){<span class="comment">//exists</span><span class="comment"></span>
<a name="l00113"></a>00113 <span class="comment">      //// save position ////</span>
<a name="l00114"></a>00114 <span class="comment"></span>      uint32_t c(*p);
<a name="l00115"></a>00115       uint32_t C(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.size()-1);
<a name="l00116"></a>00116 <span class="comment"></span>
<a name="l00117"></a>00117 <span class="comment">      //// data translation ////</span>
<a name="l00118"></a>00118 <span class="comment"></span>      <a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[c]=data.back();
<a name="l00119"></a>00119       data.pop_back();
<a name="l00120"></a>00120 <span class="comment"></span>
<a name="l00121"></a>00121 <span class="comment">      //// remove from List ////</span>
<a name="l00122"></a>00122 <span class="comment"></span>      <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[ii].erase(p);
<a name="l00123"></a>00123       <span class="keywordflow">if</span>(i!=j){<span class="comment">//off-diagonal</span>
<a name="l00124"></a>00124         <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator pj=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[jj].begin(); pj!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[jj].end(); pj++){
<a name="l00125"></a>00125           <span class="keywordflow">if</span>(*pj==c){ <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[jj].erase(pj); <span class="keywordflow">break</span>; }
<a name="l00126"></a>00126         }
<a name="l00127"></a>00127       }
<a name="l00128"></a>00128 <span class="comment"></span>
<a name="l00129"></a>00129 <span class="comment">      //// modify the entry of translated component ////</span>
<a name="l00130"></a>00130 <span class="comment"></span>      uint32_t I(data[c].i), J(data[c].j);
<a name="l00131"></a>00131       <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator q=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[I].begin(); q!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[I].end(); q++){
<a name="l00132"></a>00132         <span class="keywordflow">if</span>(*q==C){ *q=c; <span class="keywordflow">break</span>; }
<a name="l00133"></a>00133       }
<a name="l00134"></a>00134       <span class="keywordflow">if</span>(I!=J){<span class="comment">//off-diagonal</span>
<a name="l00135"></a>00135         <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator q=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[J].begin(); q!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[J].end(); q++){
<a name="l00136"></a>00136           <span class="keywordflow">if</span>(*q==C){ *q=c; <span class="keywordflow">break</span>; }
<a name="l00137"></a>00137         }
<a name="l00138"></a>00138       }
<a name="l00139"></a>00139       <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00140"></a>00140     }
<a name="l00141"></a>00141   }
<a name="l00142"></a>00142   
<a name="l00143"></a>00143 <span class="preprocessor">#ifdef  CPPL_DEBUG</span>
<a name="l00144"></a>00144 <span class="preprocessor"></span>  std::cerr &lt;&lt; <span class="stringliteral">&quot;# [NOTE]@zhsmatrix::del(long&amp;, long&amp;): The required component was not listed. Your input was (&quot;</span> &lt;&lt; i &lt;&lt; <span class="stringliteral">&quot;,&quot;</span> &lt;&lt; j &lt;&lt; <span class="stringliteral">&quot;).&quot;</span> &lt;&lt; std::endl;
<a name="l00145"></a>00145 <span class="preprocessor">#endif//CPPL_DEBUG</span>
<a name="l00146"></a>00146 <span class="preprocessor"></span>  
<a name="l00147"></a>00147   <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00148"></a>00148 }
<a name="l00149"></a>00149 
<a name="l00150"></a>00150 <span class="comment">//=============================================================================</span><span class="comment"></span>
<a name="l00151"></a>00151 <span class="comment">/*! delete the entry of an element */</span>
<a name="l00152"></a><a class="code" href="classzhsmatrix.html#a90ab97cc581cef1d9b5f8aee7a57f1c7">00152</a> <span class="keyword">inline</span> <a class="code" href="classzhsmatrix.html" title="Complex Double-precision Hermitian Sparse Matrix Class.">zhsmatrix</a>&amp; <a class="code" href="classzhsmatrix.html#a8b0387dbd5d1ffdb6793e7ba1d1170a6">zhsmatrix::del</a>(<span class="keyword">const</span> <span class="keywordtype">long</span> c)
<a name="l00153"></a>00153 {VERBOSE_REPORT;
<a name="l00154"></a>00154 <span class="preprocessor">#ifdef  CPPL_DEBUG</span>
<a name="l00155"></a>00155 <span class="preprocessor"></span>  <span class="keywordflow">if</span>( c&lt;0 || c&gt;=<span class="keywordtype">long</span>(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.size()) ){
<a name="l00156"></a>00156     ERROR_REPORT;
<a name="l00157"></a>00157     std::cerr &lt;&lt; <span class="stringliteral">&quot;The required element is out of the matrix volume.&quot;</span> &lt;&lt; std::endl
<a name="l00158"></a>00158               &lt;&lt; <span class="stringliteral">&quot;Your input was (&quot;</span> &lt;&lt; c &lt;&lt; <span class="stringliteral">&quot;).&quot;</span> &lt;&lt; std::endl;
<a name="l00159"></a>00159     exit(1);
<a name="l00160"></a>00160   }
<a name="l00161"></a>00161 <span class="preprocessor">#endif//CPPL_DEBUG</span>
<a name="l00162"></a>00162 <span class="preprocessor"></span>  
<a name="l00163"></a>00163   <span class="keywordflow">if</span>( c==<span class="keywordtype">long</span>(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.size()-1) ){<span class="comment">//if c is the last element</span>
<a name="l00164"></a>00164     <span class="keywordtype">long</span> <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[c].<a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>), j(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[c].j);
<a name="l00165"></a>00165     <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator q=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[i].begin(); q!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[<a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>].end(); q++){
<a name="l00166"></a>00166       <span class="keywordflow">if</span>( <span class="keywordtype">long</span>(*q)==c ){ <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[<a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>].erase(q); <span class="keywordflow">break</span>; }
<a name="l00167"></a>00167     }
<a name="l00168"></a>00168     <span class="keywordflow">if</span>(i!=j){<span class="comment">//off-diagonal</span>
<a name="l00169"></a>00169       <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator q=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[j].begin(); q!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[j].end(); q++){
<a name="l00170"></a>00170         <span class="keywordflow">if</span>( <span class="keywordtype">long</span>(*q)==c ){ <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[j].erase(q); <span class="keywordflow">break</span>; }
<a name="l00171"></a>00171       }
<a name="l00172"></a>00172     }
<a name="l00173"></a>00173     <a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.pop_back();
<a name="l00174"></a>00174   }
<a name="l00175"></a>00175   
<a name="l00176"></a>00176   <span class="keywordflow">else</span>{<span class="comment">//c is NOT the last element</span><span class="comment"></span>
<a name="l00177"></a>00177 <span class="comment">    //// data translation ////</span>
<a name="l00178"></a>00178 <span class="comment"></span>    uint32_t C(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.size()-1);
<a name="l00179"></a>00179     <span class="keywordtype">long</span> <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[c].<a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>), j(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[c].j), I(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.back().i), J(<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.back().j);
<a name="l00180"></a>00180     <a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[c]=data.back();
<a name="l00181"></a>00181     <span class="comment">//std::cerr &lt;&lt; &quot;c=&quot; &lt;&lt; c   &lt;&lt; &quot; i=&quot; &lt;&lt; i &lt;&lt; &quot; j=&quot; &lt;&lt; j &lt;&lt; &quot; C=&quot; &lt;&lt; vol &lt;&lt; &quot; I=&quot; &lt;&lt; I &lt;&lt; &quot; J=&quot; &lt;&lt; J &lt;&lt; std::endl;</span><span class="comment"></span>
<a name="l00182"></a>00182 <span class="comment">    //// remove entry of component ////</span>
<a name="l00183"></a>00183 <span class="comment"></span>    <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator q=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[i].begin(); q!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[<a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>].end(); q++){
<a name="l00184"></a>00184       <span class="keywordflow">if</span>( <span class="keywordtype">long</span>(*q)==c ){ <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[<a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>].erase(q); <span class="keywordflow">break</span>; }
<a name="l00185"></a>00185     }
<a name="l00186"></a>00186     <span class="keywordflow">if</span>(i!=j){<span class="comment">//off-diagonal</span>
<a name="l00187"></a>00187       <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator q=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[j].begin(); q!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[j].end(); q++){
<a name="l00188"></a>00188         <span class="keywordflow">if</span>( <span class="keywordtype">long</span>(*q)==c ){ <a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[j].erase(q); <span class="keywordflow">break</span>; }
<a name="l00189"></a>00189       }
<a name="l00190"></a>00190     }<span class="comment"></span>
<a name="l00191"></a>00191 <span class="comment">    //// modify the entry of translated component ////</span>
<a name="l00192"></a>00192 <span class="comment"></span>    <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator q=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[I].begin(); q!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[I].end(); q++){
<a name="l00193"></a>00193       <span class="keywordflow">if</span>(*q==C){ *q=c; <span class="keywordflow">break</span>; }
<a name="l00194"></a>00194     }
<a name="l00195"></a>00195     <span class="keywordflow">if</span>(I!=J){<span class="comment">//off-diagonal</span>
<a name="l00196"></a>00196       <span class="keywordflow">for</span>(std::vector&lt;uint32_t&gt;::iterator q=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[J].begin(); q!=<a class="code" href="classzhsmatrix.html#a0d2e9226d4c6ac5c8ce99c17a9662efe" title="vector of vector to store the entry information of component for each row and column">line</a>[J].end(); q++){
<a name="l00197"></a>00197         <span class="keywordflow">if</span>(*q==C){ *q=c; <span class="keywordflow">break</span>; }
<a name="l00198"></a>00198       }
<a name="l00199"></a>00199     }<span class="comment"></span>
<a name="l00200"></a>00200 <span class="comment">    //// pop_back ////</span>
<a name="l00201"></a>00201 <span class="comment"></span>    data.pop_back();
<a name="l00202"></a>00202   }
<a name="l00203"></a>00203   
<a name="l00204"></a>00204   <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00205"></a>00205 }
<a name="l00206"></a>00206 <span class="comment"></span>
<a name="l00207"></a>00207 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00208"></a>00208 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00209"></a>00209 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00210"></a>00210 <span class="comment"></span>
<a name="l00211"></a>00211 <span class="comment">//=============================================================================</span>
<a name="l00212"></a><a class="code" href="zhsmatrix-io_8hpp.html#a2c321d84687668ea31ec4142cc25ff7c">00212</a> <span class="keyword">inline</span> std::ostream&amp; <a class="code" href="__dcovector-io_8hpp.html#a3b0e58e4a6b7875ea3e3611768b5f8d6">operator&lt;&lt;</a>(std::ostream&amp; s, <span class="keyword">const</span> <a class="code" href="classzhsmatrix.html" title="Complex Double-precision Hermitian Sparse Matrix Class.">zhsmatrix</a>&amp; mat)
<a name="l00213"></a>00213 {VERBOSE_REPORT;
<a name="l00214"></a>00214   <span class="keywordflow">for</span>(<span class="keywordtype">long</span> <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>=0; <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>&lt;mat.<a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>; <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>++){
<a name="l00215"></a>00215     <span class="keywordflow">for</span>(<span class="keywordtype">long</span> j=0; j&lt;mat.<a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>; j++){
<a name="l00216"></a>00216       <span class="keywordflow">if</span>( <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a> &gt;= j ){
<a name="l00217"></a>00217         <span class="keywordtype">long</span> c =mat.<a class="code" href="classzhsmatrix.html#aaf14aba87eab8755192efc337ef5d423">number</a>(<a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>,j);
<a name="l00218"></a>00218         <span class="keywordflow">if</span>(c&lt;0){
<a name="l00219"></a>00219           s &lt;&lt; <span class="stringliteral">&quot; x &quot;</span>;
<a name="l00220"></a>00220         }
<a name="l00221"></a>00221         <span class="keywordflow">else</span>{
<a name="l00222"></a>00222           s &lt;&lt; <span class="stringliteral">&quot; &quot;</span> &lt;&lt; mat.<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[c].v &lt;&lt; <span class="stringliteral">&quot; &quot;</span>;
<a name="l00223"></a>00223         }
<a name="l00224"></a>00224       }
<a name="l00225"></a>00225       <span class="keywordflow">else</span>{<span class="comment">//i&lt;j</span>
<a name="l00226"></a>00226         <span class="keywordtype">long</span> c =mat.<a class="code" href="classzhsmatrix.html#aaf14aba87eab8755192efc337ef5d423">number</a>(<a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>,j);
<a name="l00227"></a>00227         <span class="keywordflow">if</span>(c&lt;0){
<a name="l00228"></a>00228           s &lt;&lt; <span class="stringliteral">&quot;{x}&quot;</span>;
<a name="l00229"></a>00229         }
<a name="l00230"></a>00230         <span class="keywordflow">else</span>{
<a name="l00231"></a>00231           s &lt;&lt; <span class="stringliteral">&quot;{&quot;</span> &lt;&lt; <a class="code" href="__zcovector-calc_8hpp.html#a773c28a661407104353f70c7a3ab88f2">std::conj</a>(mat.<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>[c].v) &lt;&lt; <span class="stringliteral">&quot;}&quot;</span>;
<a name="l00232"></a>00232         }
<a name="l00233"></a>00233       }
<a name="l00234"></a>00234     }
<a name="l00235"></a>00235     s &lt;&lt; std::endl;
<a name="l00236"></a>00236   }
<a name="l00237"></a>00237   
<a name="l00238"></a>00238   <span class="keywordflow">return</span> s;
<a name="l00239"></a>00239 }
<a name="l00240"></a>00240 <span class="comment"></span>
<a name="l00241"></a>00241 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00242"></a>00242 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00243"></a>00243 <span class="comment">///////////////////////////////////////////////////////////////////////////////</span>
<a name="l00244"></a>00244 <span class="comment"></span>
<a name="l00245"></a>00245 <span class="comment">//=============================================================================</span>
<a name="l00246"></a><a class="code" href="classzhsmatrix.html#a91f7e0303eafe58edd160df68015b0eb">00246</a> <span class="keyword">inline</span> <span class="keywordtype">void</span> <a class="code" href="classzhsmatrix.html#a91f7e0303eafe58edd160df68015b0eb">zhsmatrix::write</a>(<span class="keyword">const</span> <span class="keywordtype">char</span>* filename)<span class="keyword"> const</span>
<a name="l00247"></a>00247 <span class="keyword"></span>{VERBOSE_REPORT;
<a name="l00248"></a>00248   std::ofstream ofs(filename, std::ios::trunc);
<a name="l00249"></a>00249   ofs.setf(std::cout.flags());
<a name="l00250"></a>00250   ofs.precision(std::cout.precision());
<a name="l00251"></a>00251   ofs.width(std::cout.width());
<a name="l00252"></a>00252   ofs.fill(std::cout.fill());
<a name="l00253"></a>00253   
<a name="l00254"></a>00254   ofs &lt;&lt; <span class="stringliteral">&quot;#zhsmatrix&quot;</span> &lt;&lt; <span class="stringliteral">&quot; &quot;</span> &lt;&lt; <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a> &lt;&lt; std::endl;
<a name="l00255"></a>00255   <span class="keywordflow">for</span>(std::vector&lt;zcomponent&gt;::const_iterator it=<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.begin(); it!=<a class="code" href="classzhsmatrix.html#aaf52f103dbedb011a7ef72526bf4b486" title="matrix data">data</a>.end(); it++){
<a name="l00256"></a>00256     ofs &lt;&lt; it-&gt;i &lt;&lt; <span class="stringliteral">&quot; &quot;</span> &lt;&lt; it-&gt;j &lt;&lt; <span class="stringliteral">&quot; &quot;</span> &lt;&lt; it-&gt;v &lt;&lt; std::endl;
<a name="l00257"></a>00257   }
<a name="l00258"></a>00258   ofs.close();
<a name="l00259"></a>00259 }
<a name="l00260"></a>00260 
<a name="l00261"></a>00261 <span class="comment">//=============================================================================</span>
<a name="l00262"></a><a class="code" href="classzhsmatrix.html#acc65ae6c04322542e5f6ef958bab6dfb">00262</a> <span class="keyword">inline</span> <span class="keywordtype">void</span> <a class="code" href="classzhsmatrix.html#acc65ae6c04322542e5f6ef958bab6dfb">zhsmatrix::read</a>(<span class="keyword">const</span> <span class="keywordtype">char</span>* filename)
<a name="l00263"></a>00263 {VERBOSE_REPORT;
<a name="l00264"></a>00264   std::ifstream s( filename );
<a name="l00265"></a>00265   <span class="keywordflow">if</span>(!s){
<a name="l00266"></a>00266     ERROR_REPORT;
<a name="l00267"></a>00267     std::cerr &lt;&lt; <span class="stringliteral">&quot;The file \&quot;&quot;</span> &lt;&lt; filename &lt;&lt; <span class="stringliteral">&quot;\&quot; can not be opened.&quot;</span> &lt;&lt; std::endl;
<a name="l00268"></a>00268     exit(1);
<a name="l00269"></a>00269   }
<a name="l00270"></a>00270 
<a name="l00271"></a>00271   std::string id;
<a name="l00272"></a>00272   s &gt;&gt; id;
<a name="l00273"></a>00273   <span class="keywordflow">if</span>( <span class="keywordtype">id</span> != <span class="stringliteral">&quot;zhsmatrix&quot;</span> &amp;&amp; <span class="keywordtype">id</span> != <span class="stringliteral">&quot;#zhsmatrix&quot;</span> ){
<a name="l00274"></a>00274     ERROR_REPORT;
<a name="l00275"></a>00275     std::cerr &lt;&lt; <span class="stringliteral">&quot;The type name of the file \&quot;&quot;</span> &lt;&lt; filename &lt;&lt; <span class="stringliteral">&quot;\&quot; is not zhsmatrix.&quot;</span> &lt;&lt; std::endl
<a name="l00276"></a>00276               &lt;&lt; <span class="stringliteral">&quot;Its type name was &quot;</span> &lt;&lt; <span class="keywordtype">id</span> &lt;&lt; <span class="stringliteral">&quot; .&quot;</span> &lt;&lt; std::endl;
<a name="l00277"></a>00277     exit(1);
<a name="l00278"></a>00278   }
<a name="l00279"></a>00279   
<a name="l00280"></a>00280   s &gt;&gt; <a class="code" href="classzhsmatrix.html#a260c143b946312f5a5581970e3b43f5d" title="matrix column size">n</a>;
<a name="l00281"></a>00281   <a class="code" href="classzhsmatrix.html#a1419b04b140ede221bb2d892901a8b56">resize</a>(n);
<a name="l00282"></a>00282   
<a name="l00283"></a>00283   comple val;
<a name="l00284"></a>00284   <span class="keywordtype">long</span> <a class="code" href="__dgbmatrix-calc_8hpp.html#af7c79b3740ba9c1d547f55ac94bc1258">i</a>, j,  pos, tmp;
<a name="l00285"></a>00285   <span class="keywordflow">while</span>(!s.eof()){
<a name="l00286"></a>00286     s &gt;&gt; i &gt;&gt; j &gt;&gt; val;
<a name="l00287"></a>00287     <a class="code" href="classzhsmatrix.html#af017988cb32169e05841688a3bff79be">put</a>(i,j, val);
<a name="l00288"></a>00288     pos =s.tellg();
<a name="l00289"></a>00289     s &gt;&gt; tmp;
<a name="l00290"></a>00290     s.seekg(pos);
<a name="l00291"></a>00291   }
<a name="l00292"></a>00292   
<a name="l00293"></a>00293   <span class="keywordflow">if</span>(!s.eof()){
<a name="l00294"></a>00294     ERROR_REPORT;
<a name="l00295"></a>00295     std::cerr &lt;&lt; <span class="stringliteral">&quot;There is something is wrong with the file \&quot;&quot;</span> &lt;&lt; filename &lt;&lt; <span class="stringliteral">&quot; .&quot;</span> &lt;&lt; std::endl
<a name="l00296"></a>00296               &lt;&lt; <span class="stringliteral">&quot;Most likely, there are too many data components over the context.&quot;</span> &lt;&lt; std::endl;
<a name="l00297"></a>00297     exit(1);
<a name="l00298"></a>00298   }
<a name="l00299"></a>00299   s.close();
<a name="l00300"></a>00300 }
</pre></div></div><!-- contents -->
<!-- window showing the filter options -->
<div id="MSearchSelectWindow"
     onmouseover="return searchBox.OnSearchSelectShow()"
     onmouseout="return searchBox.OnSearchSelectHide()"
     onkeydown="return searchBox.OnSearchSelectKey(event)">
<a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(0)"><span class="SelectionMark">&#160;</span>All</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(1)"><span class="SelectionMark">&#160;</span>Classes</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(2)"><span class="SelectionMark">&#160;</span>Files</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(3)"><span class="SelectionMark">&#160;</span>Functions</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(4)"><span class="SelectionMark">&#160;</span>Variables</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(5)"><span class="SelectionMark">&#160;</span>Friends</a></div>

<!-- iframe showing the search results (closed by default) -->
<div id="MSearchResultsWindow">
<iframe src="javascript:void(0)" frameborder="0" 
        name="MSearchResults" id="MSearchResults">
</iframe>
</div>



<hr class="footer"/><address class="footer"><small>
Generated by &#160;<a href="http://www.doxygen.org/index.html">
<img class="footer" src="doxygen.png" alt="doxygen"/>
</a> 1.7.6.1
</small></address>

</body>
</html>
