From 703ea08146d4a700dca5c205ba2c716248bd0750 Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Wed, 5 Jul 2017 12:57:26 +0200
Subject: [PATCH] Fixed bug in xyz file

---
 ocaml/Molecule.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ocaml/Molecule.ml b/ocaml/Molecule.ml
index 4b740ff7..eb4e0582 100644
--- a/ocaml/Molecule.ml
+++ b/ocaml/Molecule.ml
@@ -150,7 +150,7 @@ let of_xyz_file
   in
   let result =
     try
-      int_of_string x > 0
+      (int_of_string @@ String.strip x) > 0
     with
     | Failure "int_of_string"  -> false
   in