with | PanierVide -> // créer un nouveau panier actif avec un item PanierActif { ItemsNonPayes = [item] } | PanierActif { ItemsNonPayes = itemsExistants } // créer un nouveau panier avec l'item ajouté PanierActif { ItemsNonPayes = item :: itemsExistants } | PanierPaye _ -> // on ignore panier