"""
The DFT grids are a little different in pyquante2 from pyquante1. Here we are
only storing the points and the weights, and we will use other data objects to
store, say, the density, the basis functions, or the various gradients at each
point.
"""
import logging
import numpy as np
from pyquante2.grid.atomic_grid import atomic_grid

logger = logging.getLogger(__name__)

try:
    from pyquante2.cbecke import becke_reweight_atoms
except ImportError:
    logger.debug("Couldn't find cython becke routine, using pure Python")
    from pyquante2.grid.becke import becke_reweight_atoms


class grid(object):
    def __init__(self,atoms,**kwargs):
        agrids = [atomic_grid(atom,**kwargs) for atom in atoms]
        becke_reweight_atoms(atoms,agrids)
        self.points = np.vstack([agrid.points for agrid in agrids])
        self.npts,sb4 = self.points.shape
        assert sb4==4
        return

    def __len__(self): return self.npts
    def __getitem__(self,*args): self.points.__getitem__(*args)

    def setbfamps(self,bfs):
        nbf = len(bfs)
        self.bfamps = np.zeros((self.npts,nbf),'d')
        for j,bf in enumerate(bfs):
            for i,(x,y,z,w) in enumerate(self.points):
                self.bfamps[i,j] = bf(x,y,z)
        return

    def getdens_naive(self,D):
        # Naive version of getdens
        rho = np.zeros(self.npts,'d')
        for i,pt in enumerate(self.points):
            bfs = self.bfamps[i,:]
            rho[i] = 2*np.dot(bfs,np.dot(D,bfs))
        return rho
            
    def getdens(self,D):
        return 2*np.einsum('pI,pJ,IJ->p',self.bfamps,self.bfamps,D)

    def getdens_interpolated(self,D,bbox,npts=50):
        from scipy.interpolate import griddata
        xmin,xmax,ymin,ymax,zmin,zmax = bbox
        xi,yi,zi = np.mgrid[xmin:xmax:(npts*1j),ymin:ymax:(npts*1j),zmin:zmax:(npts*1j)]
        rho = self.getdens(D)
        return griddata(self.points[:,:3],rho,(xi,yi,zi))

def test_mesh():
    from pyquante2 import h2o
    return grid(h2o)

if __name__ == '__main__':
    mesh = test_mesh()
