28 #ifndef _chemistry_qc_basis_tbint_h
29 #define _chemistry_qc_basis_tbint_h
35 #include <util/ref/ref.h>
36 #include <util/group/message.h>
37 #include <chemistry/qc/basis/gaussbas.h>
38 #include <chemistry/qc/basis/dercent.h>
363 virtual void init(
const double *,
369 virtual void start();
372 int ready()
const {
return icur < iend; }
374 int i()
const {
return i_; }
375 int j()
const {
return j_; }
376 int k()
const {
return k_; }
377 int l()
const {
return l_; }
379 int nint()
const {
return iend*jend*kend*lend; }
381 double val()
const {
return buf[index]*scale_; }
402 virtual void start();
405 int ready()
const {
return (icur < iend); }
407 int ishell()
const {
return icur; }
408 int jshell()
const {
return jcur; }
409 int kshell()
const {
return kcur; }
410 int lshell()
const {
return lcur; }
412 virtual double scale()
const;
481 const double *
buffer()
const;
548 const double *
buffer()
const;
607 const double *
buffer()
const;