type bohr = Bohr.t
type angstrom = Angstrom.t

val bohr_to_angstrom : bohr -> angstrom 
val angstrom_to_bohr : angstrom -> bohr