From 4a8551be153a7ef1937ed887a33dfb0b870be196 Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Wed, 12 Feb 2025 13:26:36 +0100
Subject: [PATCH] Fixing previous commit

---
 ocaml/Angmom.ml | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/ocaml/Angmom.ml b/ocaml/Angmom.ml
index 4e315a95..0f1658f0 100644
--- a/ocaml/Angmom.ml
+++ b/ocaml/Angmom.ml
@@ -2,6 +2,7 @@ open Qptypes
 open Sexplib.Std
 
 type t = S|P|D|F|G|H|I|J|K|L [@@deriving sexp]
+type st = t [@@deriving sexp]
 
 let to_string = function
   | S -> "S"
@@ -70,9 +71,6 @@ let of_l i =
   | x -> raise (Failure ("Angmom should be S|P|D|F|G|H|I|J|K|L"))
 
 
-type st = t
-
-
 module Xyz = struct
   type t = { x: Positive_int.t ;
              y: Positive_int.t ;