From 1677007e481277bb3f2518609ba854e7cc609d1e Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Sun, 11 Feb 2018 01:06:42 +0100 Subject: [PATCH] Better vectorization --- Basis/TwoElectronRRVectorized.ml | 4 ---- 1 file changed, 4 deletions(-) diff --git a/Basis/TwoElectronRRVectorized.ml b/Basis/TwoElectronRRVectorized.ml index dca9853..36c28f3 100644 --- a/Basis/TwoElectronRRVectorized.ml +++ b/Basis/TwoElectronRRVectorized.ml @@ -238,10 +238,6 @@ let hvrr_two_e_vector (angMom_a, angMom_b, angMom_c, angMom_d) done; Some v2 end - (* - Some (Array.init np (fun l -> Array.init nq (fun k -> - v1.(l).(k) +. v2.(l).(k) ) ) ) - *) in let p2 =