Sophie

Sophie

distrib > Mandriva > 9.1 > ppc > media > contrib > by-pkgid > 263386785cefb9ae5d63b926d214d809 > files > 1345

mpqc-2.1.2-4mdk.ppc.rpm

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html><head><meta name="robots" content="noindex">
<meta http-equiv="Content-Type" content="text/html;charset=iso-8859-1">
<title>sobasis.h Source File</title>
<link href="doxygen.css" rel="stylesheet" type="text/css">
</head><body bgcolor="#ffffff">
<!-- Generated by Doxygen 1.2.5 on Mon Oct 14 14:16:38 2002 -->
<center>
<a class="qindex" href="index.html">Main Page</a> &nbsp; <a class="qindex" href="hierarchy.html">Class Hierarchy</a> &nbsp; <a class="qindex" href="annotated.html">Compound List</a> &nbsp; <a class="qindex" href="files.html">File List</a> &nbsp; <a class="qindex" href="functions.html">Compound Members</a> &nbsp; <a class="qindex" href="pages.html">Related Pages</a> &nbsp; </center>
<hr><h1>sobasis.h</h1><div class="fragment"><pre>00001 <font class="comment">//</font>
00002 <font class="comment">// sobasis.h --- definition of the Integral class</font>
00003 <font class="comment">//</font>
00004 <font class="comment">// Copyright (C) 1998 Limit Point Systems, Inc.</font>
00005 <font class="comment">//</font>
00006 <font class="comment">// Author: Curtis Janssen &lt;cljanss@limitpt.com&gt;</font>
00007 <font class="comment">// Maintainer: LPS</font>
00008 <font class="comment">//</font>
00009 <font class="comment">// This file is part of the SC Toolkit.</font>
00010 <font class="comment">//</font>
00011 <font class="comment">// The SC Toolkit is free software; you can redistribute it and/or modify</font>
00012 <font class="comment">// it under the terms of the GNU Library General Public License as published by</font>
00013 <font class="comment">// the Free Software Foundation; either version 2, or (at your option)</font>
00014 <font class="comment">// any later version.</font>
00015 <font class="comment">//</font>
00016 <font class="comment">// The SC Toolkit is distributed in the hope that it will be useful,</font>
00017 <font class="comment">// but WITHOUT ANY WARRANTY; without even the implied warranty of</font>
00018 <font class="comment">// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the</font>
00019 <font class="comment">// GNU Library General Public License for more details.</font>
00020 <font class="comment">//</font>
00021 <font class="comment">// You should have received a copy of the GNU Library General Public License</font>
00022 <font class="comment">// along with the SC Toolkit; see the file COPYING.LIB.  If not, write to</font>
00023 <font class="comment">// the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.</font>
00024 <font class="comment">//</font>
00025 <font class="comment">// The U.S. Government is granted a limited license as per AL 91-7.</font>
00026 <font class="comment">//</font>
00027 
00028 <font class="preprocessor">#ifndef _chemistry_qc_basis_sobasis_h</font>
00029 <font class="preprocessor"></font><font class="preprocessor">#define _chemistry_qc_basis_sobasis_h</font>
00030 <font class="preprocessor"></font>
00031 <font class="preprocessor">#ifdef __GNUC__</font>
00032 <font class="preprocessor"></font><font class="preprocessor">#pragma interface</font>
00033 <font class="preprocessor"></font><font class="preprocessor">#endif</font>
00034 <font class="preprocessor"></font>
00035 <font class="preprocessor">#include &lt;chemistry/qc/basis/basis.h&gt;</font>
00036 
00037 <font class="keyword">namespace </font>sc {
00038 
<a name="l00041"></a><a class="code" href="class_sc__SOTransformFunction.html">00041</a> <font class="keyword">class </font>SOTransformFunction {
00042   <font class="keyword">public</font>:
<a name="l00044"></a><a class="code" href="class_sc__SOTransformFunction.html#m0">00044</a>     <font class="keywordtype">double</font> coef;
<a name="l00046"></a><a class="code" href="class_sc__SOTransformFunction.html#m1">00046</a>     <font class="keywordtype">int</font> aofunc;
<a name="l00048"></a><a class="code" href="class_sc__SOTransformFunction.html#m2">00048</a>     <font class="keywordtype">int</font> sofunc;
<a name="l00050"></a><a class="code" href="class_sc__SOTransformFunction.html#m3">00050</a>     <font class="keywordtype">int</font> irrep;
00051 };
00052 
<a name="l00056"></a><a class="code" href="class_sc__SOTransformShell.html">00056</a> <font class="keyword">class </font>SOTransformShell {
00057   <font class="keyword">public</font>:
<a name="l00059"></a><a class="code" href="class_sc__SOTransformShell.html#m0">00059</a>     <font class="keywordtype">int</font> aoshell;
<a name="l00061"></a><a class="code" href="class_sc__SOTransformShell.html#m1">00061</a>     <font class="keywordtype">int</font> nfunc;
<a name="l00063"></a><a class="code" href="class_sc__SOTransformShell.html#m2">00063</a>     SOTransformFunction *func;
00064     SOTransformShell();
00065     ~SOTransformShell();
00067     <font class="keywordtype">void</font> <a class="code" href="class_sc__SOTransformShell.html#a2">add_func</a>(<font class="keywordtype">int</font> irrep, <font class="keywordtype">double</font> coef, <font class="keywordtype">int</font> aofunc, <font class="keywordtype">int</font> sofunc);
00068 };
00069 
<a name="l00073"></a><a class="code" href="class_sc__SOTransform.html">00073</a> <font class="keyword">class </font>SOTransform {
00074   <font class="keyword">public</font>:
00075     <font class="keywordtype">int</font> naoshell_allocated;
<a name="l00077"></a><a class="code" href="class_sc__SOTransform.html#m1">00077</a>     <font class="keywordtype">int</font> naoshell;
<a name="l00079"></a><a class="code" href="class_sc__SOTransform.html#m2">00079</a>     SOTransformShell *aoshell;
00080     SOTransform();
00081     ~SOTransform();
00082     <font class="keywordtype">void</font> set_naoshell(<font class="keywordtype">int</font> n);
00084     <font class="keywordtype">void</font> <a class="code" href="class_sc__SOTransform.html#a3">add_transform</a>(<font class="keywordtype">int</font> aoshell, <font class="keywordtype">int</font> irrep,
00085                        <font class="keywordtype">double</font> coef, <font class="keywordtype">int</font> aofunc, <font class="keywordtype">int</font> sofunc);
00086 };
00087 
<a name="l00090"></a><a class="code" href="class_sc__SOBasis.html">00090</a> <font class="keyword">class </font>SOBasis : <font class="keyword">public</font> RefCount {
00091   <font class="keyword">protected</font>:
00092     Ref&lt;GaussianBasisSet&gt; basis_;
00093     <font class="keywordtype">int</font> nshell_;
00094     <font class="keywordtype">int</font> nirrep_;
00095     <font class="keywordtype">int</font> *ncomp_;
00096     <font class="keywordtype">int</font> **nfunc_;
00097     <font class="keywordtype">int</font> *naofunc_;
00098     <font class="keywordtype">int</font> **funcoff_;
00099 
00100     <font class="keywordtype">int</font> *nfunc_in_irrep_;
00101     <font class="keywordtype">int</font> *func_;
00102     <font class="keywordtype">int</font> *irrep_;
00103     <font class="keywordtype">int</font> *func_within_irrep_;
00104 
00105     SOTransform *trans_;
00106 
00107   <font class="keyword">public</font>:
00109     <a class="code" href="class_sc__SOBasis.html#a0">SOBasis</a>(<font class="keyword">const</font> Ref&lt;GaussianBasisSet&gt; &amp;, <font class="keyword">const</font> Ref&lt;Integral&gt;&amp;);
00110     ~SOBasis();
00111 
<a name="l00113"></a><a class="code" href="class_sc__SOBasis.html#a2">00113</a>     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a2">nshell</a>()<font class="keyword"> const </font>{ <font class="keywordflow">return</font> nshell_; }
<a name="l00115"></a><a class="code" href="class_sc__SOBasis.html#a3">00115</a>     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a3">nirrep</a>()<font class="keyword"> const </font>{ <font class="keywordflow">return</font> nirrep_; }
00116     <font class="keywordtype">int</font> ncomponent(<font class="keywordtype">int</font> iirrep)<font class="keyword"> const </font>{ <font class="keywordflow">return</font> ncomp_[iirrep]; }
<a name="l00118"></a><a class="code" href="class_sc__SOBasis.html#a5">00118</a>     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a5">nfunction_in_irrep</a>(<font class="keywordtype">int</font> irrep)<font class="keyword"> const </font>{ <font class="keywordflow">return</font> nfunc_in_irrep_[irrep]; }
00120     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a6">function_offset_for_irrep</a>(<font class="keywordtype">int</font> irrep) <font class="keyword">const</font>;
00122     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a7">nfunction</a>(<font class="keywordtype">int</font> ishell) <font class="keyword">const</font>;
<a name="l00125"></a><a class="code" href="class_sc__SOBasis.html#a8">00125</a>     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a8">naofunction</a>(<font class="keywordtype">int</font> ishell)<font class="keyword"> const </font>{ <font class="keywordflow">return</font> naofunc_[ishell]; }
00127     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a7">nfunction</a>(<font class="keywordtype">int</font> ishell, <font class="keywordtype">int</font> iirrep) <font class="keyword">const</font>;
00130     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a10">max_nfunction_in_shell</a>() <font class="keyword">const</font>;
00134     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a11">function_offset_within_shell</a>(<font class="keywordtype">int</font> ishell, <font class="keywordtype">int</font> iirrep) <font class="keyword">const</font>;
00135 
00138     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a12">function</a>(<font class="keywordtype">int</font> ishell);
00139 
00141     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a13">irrep</a>(<font class="keywordtype">int</font> ishell, <font class="keywordtype">int</font> ifunc) <font class="keyword">const</font>;
00143     <font class="keywordtype">int</font> <a class="code" href="class_sc__SOBasis.html#a14">function_within_irrep</a>(<font class="keywordtype">int</font> ishell, <font class="keywordtype">int</font> ifunc) <font class="keyword">const</font>;
00144 
<a name="l00146"></a><a class="code" href="class_sc__SOBasis.html#a15">00146</a>     <font class="keyword">const</font> SOTransform &amp;<a class="code" href="class_sc__SOBasis.html#a15">trans</a>(<font class="keywordtype">int</font> i)<font class="keyword"> const </font>{ <font class="keywordflow">return</font> trans_[i]; }
00147 
00148     <font class="keywordtype">void</font> print(std::ostream &amp;o=ExEnv::out0()) <font class="keyword">const</font>;
00149 };
00150 
00151 
00152 <font class="keyword">inline</font> <font class="keywordtype">int</font>
<a name="l00153"></a><a class="code" href="class_sc__SOBasis.html#a12">00153</a> SOBasis::function(<font class="keywordtype">int</font> ishell)<font class="keyword"></font>
00154 <font class="keyword"></font>{
00155   <font class="keywordflow">return</font> func_[ishell];
00156 }
00157 
00158 <font class="keyword">inline</font> <font class="keywordtype">int</font>
<a name="l00159"></a><a class="code" href="class_sc__SOBasis.html#a13">00159</a> SOBasis::irrep(<font class="keywordtype">int</font> ishell, <font class="keywordtype">int</font> ifunc)<font class="keyword"> const</font>
00160 <font class="keyword"></font>{
00161   <font class="keywordflow">return</font> irrep_[func_[ishell]+ifunc];
00162 }
00163 
00164 <font class="keyword">inline</font> <font class="keywordtype">int</font>
<a name="l00165"></a><a class="code" href="class_sc__SOBasis.html#a6">00165</a> SOBasis::function_offset_for_irrep(<font class="keywordtype">int</font> irrep)<font class="keyword"> const</font>
00166 <font class="keyword"></font>{
00167   <font class="keywordtype">int</font> r = 0;
00168   <font class="keywordflow">for</font> (<font class="keywordtype">int</font> i=0; i&lt;irrep; i++) {
00169       r += nfunc_in_irrep_[i];
00170     }
00171   <font class="keywordflow">return</font> r;
00172 }
00173 
00174 <font class="keyword">inline</font> <font class="keywordtype">int</font>
<a name="l00175"></a><a class="code" href="class_sc__SOBasis.html#a14">00175</a> SOBasis::function_within_irrep(<font class="keywordtype">int</font> ishell, <font class="keywordtype">int</font> ifunc)<font class="keyword"> const</font>
00176 <font class="keyword"></font>{
00177   <font class="keywordflow">return</font> func_within_irrep_[func_[ishell]+ifunc];
00178 }
00179 
00180 <font class="keyword">inline</font> <font class="keywordtype">int</font>
<a name="l00181"></a><a class="code" href="class_sc__SOBasis.html#a9">00181</a> SOBasis::nfunction(<font class="keywordtype">int</font> ishell, <font class="keywordtype">int</font> iirrep)<font class="keyword"> const</font>
00182 <font class="keyword"></font>{
00183   <font class="keywordflow">return</font> nfunc_[ishell][iirrep];
00184 }
00185 
00186 <font class="keyword">inline</font> <font class="keywordtype">int</font>
<a name="l00187"></a><a class="code" href="class_sc__SOBasis.html#a11">00187</a> SOBasis::function_offset_within_shell(<font class="keywordtype">int</font> ishell, <font class="keywordtype">int</font> iirrep)<font class="keyword"> const</font>
00188 <font class="keyword"></font>{
00189   <font class="keywordflow">return</font> funcoff_[ishell][iirrep];
00190 }
00191 
00192 }
00193 
00194 <font class="preprocessor">#endif</font>
00195 <font class="preprocessor"></font>
00196 <font class="comment">// Local Variables:</font>
00197 <font class="comment">// mode: c++</font>
00198 <font class="comment">// c-file-style: "CLJ"</font>
00199 <font class="comment">// End:</font>
</div></pre><hr>
<address>
<small>

Generated at Mon Oct 14 14:16:38 2002 for <a
href="http://aros.ca.sandia.gov/~cljanss/mpqc">MPQC</a>
2.1.2 using the documentation package <a
href="http://www.stack.nl/~dimitri/doxygen/index.html">Doxygen</a>
1.2.5.

</small>
</address>
</body>
</html>