mirror of
https://github.com/LCPQ/quantum_package
synced 2024-11-14 01:53:55 +01:00
12 lines
122 B
OCaml
12 lines
122 B
OCaml
|
|
||
|
type units =
|
||
|
| Bohr
|
||
|
| Angstrom
|
||
|
;;
|
||
|
|
||
|
let angstrom_to_bohr = 1. /. 0.52917721092
|
||
|
let bohr_to_angstrom = 0.52917721092
|
||
|
;;
|
||
|
|
||
|
|