mirror of
https://gitlab.com/scemama/QCaml.git
synced 2024-06-21 12:42:05 +02: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