cmf_coef_grid_sv: Computes coefficients for grid using support vectors
In conmolfields: Continuous molecular fields

Computes coefficients for grid using support vectors

1	cmf_coef_grid_sv(mdb, a, ai, alpha, grid, field)

`mdb`
`a`
`ai`
`alpha`
`grid`
`field`

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as

  cmf_coef_grid_sv <- function(mdb, a, ai, alpha, grid, field) {
  for (igridx in 1:grid$ngridx) {
  cat(sprintf("x: %d of %d\n", igridx, grid$ngridx)); flush.console() 
    flush.console()
    x <- grid$gridx[igridx]
    for (igridy in 1:grid$ngridy) {
      y <- grid$gridy[igridy]
      for (igridz in 1:grid$ngridz) {
        z <- grid$gridz[igridz]
        grid$val[igridx,igridy,igridz] <- cmf_coef_xyz_sv(mdb,a,ai,alpha,x,y,z,field)
      }
    }
  }
  grid
}