<!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>cartitv3.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:36 2002 -->
<center>
<a class="qindex" href="index.html">Main Page</a> <a class="qindex" href="hierarchy.html">Class Hierarchy</a> <a class="qindex" href="annotated.html">Compound List</a> <a class="qindex" href="files.html">File List</a> <a class="qindex" href="functions.html">Compound Members</a> <a class="qindex" href="pages.html">Related Pages</a> </center>
<hr><h1>cartitv3.h</h1><div class="fragment"><pre>00001 <font class="comment">//</font>
00002 <font class="comment">// cartitv3.h</font>
00003 <font class="comment">//</font>
00004 <font class="comment">// Copyright (C) 1996 Limit Point Systems, Inc.</font>
00005 <font class="comment">//</font>
00006 <font class="comment">// Author: Curtis Janssen <cljanss@limitpt.com></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_intv3_cartitv3_h</font>
00029 <font class="preprocessor"></font><font class="preprocessor">#define _chemistry_qc_intv3_cartitv3_h</font>
00030 <font class="preprocessor"></font>
00031 <font class="preprocessor">#include <chemistry/qc/basis/cartiter.h></font>
00032
00033 <font class="keyword">namespace </font>sc {
00034
00035 <font class="keyword">class </font>CartesianIterV3 : <font class="keyword">public</font> CartesianIter {
00036 <font class="keyword">public</font>:
00037 CartesianIterV3(<font class="keywordtype">int</font> l) : CartesianIter(l) {}
00038
00039 <font class="keywordtype">void</font> start()<font class="keyword"> </font>{
00040 bfn_=a_=c_=0;
00041 b_=l_;
00042 }
00043
00044 <font class="keywordtype">void</font> next()<font class="keyword"> </font>{
00045 <font class="keywordflow">if</font> (c_<l_-a_)
00046 c_++;
00047 <font class="keywordflow">else</font> {
00048 c_=0;
00049 a_++;
00050 }
00051 bfn_++;
00052 b_ = l_-a_-c_;
00053 }
00054
00055 operator int()<font class="keyword"> </font>{
00056 <font class="keywordflow">return</font> (a_ <= l_);
00057 }
00058 };
00059
00060 <font class="keyword">class </font>RedundantCartesianIterV3 : <font class="keyword">public</font> RedundantCartesianIter {
00061 <font class="keyword">public</font>:
00062 RedundantCartesianIterV3(<font class="keywordtype">int</font> l) : RedundantCartesianIter(l) {}
00063
00064 <font class="keywordtype">int</font> bfn()<font class="keyword"> </font>{
00065 <font class="keywordtype">int</font> i = a();
00066 <font class="keywordtype">int</font> j = b();
00067 <font class="keywordtype">int</font> am = l();
00068 <font class="keywordflow">return</font> (((((((am)+1)<<1)-(i))*((i)+1))>>1)-(j)-1);
00069 }
00070 };
00071
00072 <font class="keyword">class </font>RedundantCartesianSubIterV3 : <font class="keyword">public</font> RedundantCartesianSubIter {
00073 <font class="keyword">public</font>:
00074 RedundantCartesianSubIterV3(<font class="keywordtype">int</font> l) : RedundantCartesianSubIter(l) {}
00075
00076 <font class="keywordtype">int</font> bfn()<font class="keyword"> </font>{
00077 <font class="keywordtype">int</font> i = a();
00078 <font class="keywordtype">int</font> j = b();
00079 <font class="keywordtype">int</font> am = l();
00080 <font class="keywordflow">return</font> (((((((am)+1)<<1)-(i))*((i)+1))>>1)-(j)-1);
00081 }
00082 };
00083
00084 }
00085
00086 <font class="preprocessor">#endif</font>
00087 <font class="preprocessor"></font>
00088 <font class="comment">// Local Variables:</font>
00089 <font class="comment">// mode: c++</font>
00090 <font class="comment">// c-file-style: "CLJ"</font>
00091 <font class="comment">// End:</font>
</div></pre><hr>
<address>
<small>
Generated at Mon Oct 14 14:16:36 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>
distrib
>
Mandriva
>
9.1
>
ppc
>
media
>
contrib
>
by-pkgid
>
263386785cefb9ae5d63b926d214d809
>
files
>
36
