mirror of
https://gitlab.com/scemama/QCaml.git
synced 2024-12-22 04:13:33 +01:00
Better vectorization
This commit is contained in:
parent
03380374a1
commit
1677007e48
@ -238,10 +238,6 @@ let hvrr_two_e_vector (angMom_a, angMom_b, angMom_c, angMom_d)
|
|||||||
done;
|
done;
|
||||||
Some v2
|
Some v2
|
||||||
end
|
end
|
||||||
(*
|
|
||||||
Some (Array.init np (fun l -> Array.init nq (fun k ->
|
|
||||||
v1.(l).(k) +. v2.(l).(k) ) ) )
|
|
||||||
*)
|
|
||||||
in
|
in
|
||||||
|
|
||||||
let p2 =
|
let p2 =
|
||||||
|
Loading…
Reference in New Issue
Block a user