Sophie

Sophie

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

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>int1e.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:37 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>int1e.h</h1><div class="fragment"><pre>00001 <font class="comment">//</font>
00002 <font class="comment">// int1e.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 &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">#ifdef __GNUG__</font>
00029 <font class="preprocessor"></font><font class="preprocessor">#pragma interface</font>
00030 <font class="preprocessor"></font><font class="preprocessor">#endif</font>
00031 <font class="preprocessor"></font>
00032 <font class="preprocessor">#ifndef _chemistry_qc_int1e_h</font>
00033 <font class="preprocessor"></font><font class="preprocessor">#define _chemistry_qc_int1e_h</font>
00034 <font class="preprocessor"></font>
00035 <font class="preprocessor">#include &lt;util/ref/ref.h&gt;</font>
00036 <font class="preprocessor">#include &lt;chemistry/qc/basis/basis.h&gt;</font>
00037 <font class="preprocessor">#include &lt;chemistry/qc/intv3/fjt.h&gt;</font>
00038 <font class="preprocessor">#include &lt;chemistry/qc/intv3/array.h&gt;</font>
00039 
00040 <font class="keyword">namespace </font>sc {
00041 
00042 <font class="keyword">class </font>Integral;
00043 
<a name="l00047"></a><a class="code" href="class_sc__Int1eV3.html">00047</a> <font class="keyword">class </font>Int1eV3: <font class="keyword">public</font> RefCount {
00048   <font class="keyword">protected</font>:
00049     Integral *integral_;
00050 
00051     Ref&lt;GaussianBasisSet&gt; bs1_;
00052     Ref&lt;GaussianBasisSet&gt; bs2_;
00053     <font class="keywordtype">double</font> *fjttable_;
00054     Ref&lt;FJT&gt; fjt_;
00055     <font class="keywordtype">int</font> bs1_shell_offset_;
00056     <font class="keywordtype">int</font> bs2_shell_offset_;
00057     <font class="keywordtype">int</font> bs1_func_offset_;
00058     <font class="keywordtype">int</font> bs2_func_offset_;
00059     <font class="keywordtype">int</font> bs1_prim_offset_;
00060     <font class="keywordtype">int</font> bs2_prim_offset_;
00061 
00062     <font class="comment">// statics from comp_1e.c:</font>
00063   <font class="keyword">protected</font>:
00064     <font class="keywordtype">double</font> oo2zeta_a;
00065     <font class="keywordtype">double</font> oo2zeta_b;
00066     <font class="keywordtype">double</font> sMus[3];
00067     <font class="keywordtype">double</font> sTs;
00068     <font class="keywordtype">double</font> xi;
00069     <font class="keywordtype">double</font> A[3];
00070     <font class="keywordtype">double</font> B[3];
00071     <font class="keywordtype">double</font> C[3];
00072     <font class="keywordtype">double</font> ss;
00073     <font class="keywordtype">double</font> PmA[3];
00074     <font class="keywordtype">double</font> PmB[3];
00075     <font class="keywordtype">double</font> PmC[3];
00076     <font class="keywordtype">double</font> zeta;
00077     <font class="keywordtype">double</font> oo2zeta;
00078     GaussianShell *gshell1, *gshell2;
00079     <font class="keywordtype">int</font> exponent_weighted;
00080     <font class="keywordtype">int</font> scale_shell_result;
00081     <font class="keywordtype">double</font> result_scale_factor;
00082     <font class="keywordtype">int</font> three_center;
00083     Ref&lt;GaussianBasisSet&gt; third_centers;
00084     <font class="keywordtype">int</font> third_centernum;
00085     <font class="keywordtype">int</font> init_order;
00086     <font class="keywordtype">double</font> *buff;
00087     <font class="keywordtype">double</font> *cartesianbuffer;
00088     <font class="keywordtype">double</font> *cartesianbuffer_scratch;
00089     <font class="keywordtype">int</font> mu;
00090     IntV3Arraydoublep3 inter;
00091     IntV3Arraydoublep3 efield_inter;
00092 
00093   <font class="keyword">protected</font>:
00094     <font class="keywordtype">void</font> accum_shell_1der(
00095         <font class="keywordtype">double</font> *buff, <font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00096         Ref&lt;GaussianBasisSet&gt; dercs, <font class="keywordtype">int</font> centernum,
00097         <font class="keywordtype">double</font> (Int1eV3::*)(<font class="keywordtype">int</font>,<font class="keywordtype">int</font>,<font class="keywordtype">int</font>,<font class="keywordtype">int</font>,<font class="keywordtype">int</font>,<font class="keywordtype">int</font>,<font class="keywordtype">int</font>,<font class="keywordtype">int</font>)
00098         );
00099     <font class="keywordtype">void</font> accum_shell_block_1der(
00100         <font class="keywordtype">double</font> *buff, <font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00101         Ref&lt;GaussianBasisSet&gt; dercs, <font class="keywordtype">int</font> centernum,
00102         <font class="keywordtype">void</font> (Int1eV3::*shell_block_function)
00103                                   (<font class="keywordtype">int</font> gc1, <font class="keywordtype">int</font> a, <font class="keywordtype">int</font> gc2, <font class="keywordtype">int</font> b,
00104                                    <font class="keywordtype">int</font> gcsize2, <font class="keywordtype">int</font> gcoff1, <font class="keywordtype">int</font> gcoff2,
00105                                    <font class="keywordtype">double</font> coef, <font class="keywordtype">double</font> *buffer)
00106         );
00107     <font class="keywordtype">double</font> comp_shell_overlap(<font class="keywordtype">int</font> gc1, <font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00108                               <font class="keywordtype">int</font> gc2, <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2);
00109     <font class="keywordtype">double</font> comp_prim_overlap(<font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00110                              <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2);
00111     <font class="keywordtype">double</font> comp_shell_kinetic(<font class="keywordtype">int</font> gc1, <font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00112                               <font class="keywordtype">int</font> gc2, <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2);
00113     <font class="keywordtype">double</font> comp_prim_kinetic(<font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00114                              <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2);
00115     <font class="keywordtype">double</font> comp_shell_nuclear(<font class="keywordtype">int</font> gc1, <font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00116                               <font class="keywordtype">int</font> gc2, <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2);
00117     <font class="keywordtype">void</font> accum_shell_efield(<font class="keywordtype">double</font> *buff, <font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh);
00118     <font class="keywordtype">void</font> accum_shell_block_efield(<font class="keywordtype">double</font> *buff, <font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh);
00119     <font class="keywordtype">double</font> comp_prim_nuclear(<font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00120                              <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2, <font class="keywordtype">int</font> m);
00121     <font class="keywordtype">void</font> comp_shell_efield(<font class="keywordtype">double</font> *efield,
00122                            <font class="keywordtype">int</font> gc1, <font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00123                            <font class="keywordtype">int</font> gc2, <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2);
00124     <font class="keywordtype">void</font> comp_shell_block_efield(<font class="keywordtype">int</font> gc1, <font class="keywordtype">int</font> a, <font class="keywordtype">int</font> gc2, <font class="keywordtype">int</font> b,
00125                                  <font class="keywordtype">int</font> gcsize2, <font class="keywordtype">int</font> gcoff1, <font class="keywordtype">int</font> gcoff2,
00126                                  <font class="keywordtype">double</font> coef, <font class="keywordtype">double</font> *buffer);
00127     <font class="keywordtype">double</font> comp_prim_efield(<font class="keywordtype">int</font> xyz, <font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00128                             <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2, <font class="keywordtype">int</font> m);
00129     <font class="keywordtype">void</font> comp_shell_dipole(<font class="keywordtype">double</font>* dipole,
00130                            <font class="keywordtype">int</font> gc1, <font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00131                            <font class="keywordtype">int</font> gc2, <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2);
00132     <font class="keywordtype">double</font> comp_prim_dipole(<font class="keywordtype">int</font> axis,
00133                             <font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00134                             <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2);
00135     <font class="keywordtype">void</font> comp_shell_block_nuclear(<font class="keywordtype">int</font> gc1, <font class="keywordtype">int</font> a, <font class="keywordtype">int</font> gc2, <font class="keywordtype">int</font> b,
00136                                   <font class="keywordtype">int</font> gcsize2, <font class="keywordtype">int</font> gcoff1, <font class="keywordtype">int</font> gcoff2,
00137                                   <font class="keywordtype">double</font> coef, <font class="keywordtype">double</font> *buffer);
00138     <font class="keywordtype">void</font> comp_prim_block_nuclear(<font class="keywordtype">int</font> a, <font class="keywordtype">int</font> b);
00139     <font class="keywordtype">void</font> comp_prim_block_nuclear_build_a(<font class="keywordtype">int</font> a, <font class="keywordtype">int</font> b, <font class="keywordtype">int</font> m);
00140     <font class="keywordtype">void</font> comp_prim_block_nuclear_build_b(<font class="keywordtype">int</font> b, <font class="keywordtype">int</font> m);
00141     <font class="keywordtype">void</font> comp_prim_block_efield(<font class="keywordtype">int</font> a, <font class="keywordtype">int</font> b);
00142     <font class="keywordtype">void</font> comp_prim_block_efield_build_a(<font class="keywordtype">int</font> a, <font class="keywordtype">int</font> b, <font class="keywordtype">int</font> m);
00143     <font class="keywordtype">void</font> comp_prim_block_efield_build_b(<font class="keywordtype">int</font> b, <font class="keywordtype">int</font> m);
00144     <font class="comment">// routines from comp_1e:</font>
00145   <font class="keyword">protected</font>:
00146     <font class="keywordtype">void</font> int_accum_shell_overlap_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00147                                       Ref&lt;GaussianBasisSet&gt; dercs,
00148                                       <font class="keywordtype">int</font> centernum);
00149     <font class="keywordtype">void</font> int_done_1e();
00150     <font class="keywordtype">void</font> int_initialize_1e(<font class="keywordtype">int</font> flags, <font class="keywordtype">int</font> order);
00151 <font class="preprocessor">#if 0</font>
00152 <font class="preprocessor"></font>    <font class="keywordtype">double</font> int_prim_overlap(shell_t *pshell1, shell_t *pshell2,
00153                             <font class="keywordtype">double</font> *pA, <font class="keywordtype">double</font> *pB,
00154                             <font class="keywordtype">int</font> prim1, <font class="keywordtype">int</font> prim2,
00155                             <font class="keywordtype">int</font> i1, <font class="keywordtype">int</font> j1, <font class="keywordtype">int</font> k1,
00156                             <font class="keywordtype">int</font> i2, <font class="keywordtype">int</font> j2, <font class="keywordtype">int</font> k2);
00157 <font class="preprocessor">#endif</font>
00158 <font class="preprocessor"></font>    <font class="keywordtype">void</font> int_accum_shell_kinetic(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh);
00159     <font class="keywordtype">void</font> int_accum_shell_kinetic_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00160                                       Ref&lt;GaussianBasisSet&gt; dercs,
00161                                       <font class="keywordtype">int</font> centernum);
00162     <font class="keywordtype">void</font> int_accum_shell_nuclear_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00163                                       Ref&lt;GaussianBasisSet&gt; dercs,
00164                                       <font class="keywordtype">int</font> centernum);
00165     <font class="keywordtype">void</font> int_accum_shell_nuclear_hfc_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00166                                           Ref&lt;GaussianBasisSet&gt; dercs,
00167                                           <font class="keywordtype">int</font> centernum);
00168     <font class="keywordtype">void</font> int_accum_shell_nuclear_hf_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00169                                          Ref&lt;GaussianBasisSet&gt; dercs,
00170                                          <font class="keywordtype">int</font> centernum);
00171     <font class="keywordtype">void</font> int_accum_shell_nuclear_nonhf_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00172                                             Ref&lt;GaussianBasisSet&gt; dercs,
00173                                             <font class="keywordtype">int</font> centernum);
00174     <font class="keywordtype">void</font> int_accum_shell_efield(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00175                                 <font class="keywordtype">double</font> *position);
00176     <font class="keywordtype">void</font> int_accum_shell_point_charge(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00177                                       <font class="keywordtype">int</font> ncharge, <font class="keyword">const</font> <font class="keywordtype">double</font>* charge,
00178                                       <font class="keyword">const</font> <font class="keywordtype">double</font>*<font class="keyword">const</font>* position);
00179     <font class="keywordtype">void</font> int_shell_nuclear_hf_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00180                                    Ref&lt;GaussianBasisSet&gt; dercs,
00181                                    <font class="keywordtype">int</font> centernum);
00182     <font class="keywordtype">void</font> int_shell_nuclear_nonhf_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00183                                       Ref&lt;GaussianBasisSet&gt; dercs,
00184                                       <font class="keywordtype">int</font> centernum);
00185     <font class="keywordtype">void</font> int_accum_shell_dipole(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00186                                 <font class="keywordtype">double</font> *com);
00187 
00188     <font class="comment">// from offsets.cc</font>
00189   <font class="keyword">protected</font>:
00190     <font class="keywordtype">void</font> int_initialize_offsets1();
00191     <font class="keywordtype">void</font> int_done_offsets1();
00192 
00193     <font class="comment">// from tformv3.cc</font>
00194   <font class="keyword">protected</font>:
00195     <font class="keywordtype">double</font> *source;
00196     <font class="keywordtype">int</font> nsourcemax;
00197     <font class="comment">// transform implementation functions:</font>
00198     <font class="keywordtype">void</font> transform_init();
00199     <font class="keywordtype">void</font> transform_done();
00200     <font class="keywordtype">void</font> source_space(<font class="keywordtype">int</font> nsource);
00201     <font class="keywordtype">void</font> copy_to_source(<font class="keywordtype">double</font> *integrals, <font class="keywordtype">int</font> nsource);
00202     <font class="keywordtype">void</font> do_transform_1e(Integral *integ,
00203                          <font class="keywordtype">double</font> *integrals,
00204                          GaussianShell *sh1, GaussianShell *sh2,
00205                          <font class="keywordtype">int</font> chunk);
00206     <font class="keywordtype">void</font> transform_1e(Integral *integ,
00207                       <font class="keywordtype">double</font> *integrals, <font class="keywordtype">double</font> *target,
00208                       GaussianShell *sh1, GaussianShell *sh2, <font class="keywordtype">int</font> chunk);
00209     <font class="keywordtype">void</font> accum_transform_1e(Integral *integ,
00210                             <font class="keywordtype">double</font> *integrals, <font class="keywordtype">double</font> *target,
00211                             GaussianShell *sh1, GaussianShell *sh2, <font class="keywordtype">int</font> chunk);
00212 
00213     <font class="comment">// functions for general use outside of tformv3.cc:</font>
00214     <font class="keywordtype">void</font> transform_1e(Integral*integ,
00215                       <font class="keywordtype">double</font> *integrals, <font class="keywordtype">double</font> *target,
00216                       GaussianShell *sh1, GaussianShell *sh2);
00217     <font class="keywordtype">void</font> accum_transform_1e(Integral*integ,
00218                             <font class="keywordtype">double</font> *integrals, <font class="keywordtype">double</font> *target,
00219                             GaussianShell *sh1, GaussianShell *sh2);
00220     <font class="keywordtype">void</font> transform_1e_xyz(Integral*integ,
00221                           <font class="keywordtype">double</font> *integrals, <font class="keywordtype">double</font> *target,
00222                           GaussianShell *sh1, GaussianShell *sh2);
00223     <font class="keywordtype">void</font> accum_transform_1e_xyz(Integral*integ,
00224                                 <font class="keywordtype">double</font> *integrals, <font class="keywordtype">double</font> *target,
00225                                 GaussianShell *sh1, GaussianShell *sh2);
00226 
00227   <font class="keyword">public</font>:
00228     Int1eV3(Integral *,
00229             <font class="keyword">const</font> Ref&lt;GaussianBasisSet&gt;&amp;,
00230             <font class="keyword">const</font> Ref&lt;GaussianBasisSet&gt;&amp;,
00231             <font class="keywordtype">int</font> order);
00232     ~Int1eV3();
00233 
00234     <font class="keywordtype">double</font> *buffer()<font class="keyword"> </font>{ <font class="keywordflow">return</font> buff; }
00235     Ref&lt;GaussianBasisSet&gt; basis()<font class="keyword"> </font>{ <font class="keywordflow">if</font> (bs1_==bs2_) <font class="keywordflow">return</font> bs1_; <font class="keywordflow">return</font> 0; }
00236     Ref&lt;GaussianBasisSet&gt; basis1()<font class="keyword"> </font>{ <font class="keywordflow">return</font> bs1_; }
00237     Ref&lt;GaussianBasisSet&gt; basis2()<font class="keyword"> </font>{ <font class="keywordflow">return</font> bs2_; }
00238 
00239     <font class="keywordtype">void</font> kinetic(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh);
00240     <font class="keywordtype">void</font> nuclear_slow(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh);
00241     <font class="keywordtype">void</font> nuclear(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh);
00242     <font class="keywordtype">void</font> overlap(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh);
00243     <font class="keywordtype">void</font> hcore(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh);
00244     <font class="keywordtype">void</font> efield(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh, <font class="keywordtype">double</font> position[3]);
00245     <font class="keywordtype">void</font> point_charge(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00246                       <font class="keywordtype">int</font> ncharge, <font class="keyword">const</font> <font class="keywordtype">double</font>* charge,
00247                       <font class="keyword">const</font> <font class="keywordtype">double</font>*<font class="keyword">const</font>* position);
00248     <font class="keywordtype">void</font> dipole(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00249                 <font class="keywordtype">double</font> *com);
00250 
00251     <font class="keywordtype">void</font> hcore_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00252                     <font class="keywordtype">int</font> dercs, <font class="keywordtype">int</font> centernum);
00253     <font class="keywordtype">void</font> kinetic_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00254                       <font class="keywordtype">int</font> dercs, <font class="keywordtype">int</font> centernum);
00255     <font class="keywordtype">void</font> nuclear_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00256                       <font class="keywordtype">int</font> dercs, <font class="keywordtype">int</font> centernum);
00257     <font class="keywordtype">void</font> overlap_1der(<font class="keywordtype">int</font> ish, <font class="keywordtype">int</font> jsh,
00258                       <font class="keywordtype">int</font> dercs, <font class="keywordtype">int</font> centernum);
00259 };
00260 
00261 }
00262 
00263 <font class="preprocessor">#endif</font>
00264 <font class="preprocessor"></font>
00265 <font class="comment">// Local Variables:</font>
00266 <font class="comment">// mode: c++</font>
00267 <font class="comment">// c-file-style: "CLJ"</font>
00268 <font class="comment">// End:</font>
</div></pre><hr>
<address>
<small>

Generated at Mon Oct 14 14:16:37 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>