Use FunctionalCuid for CUIDs

This commit is contained in:
Daniel J. Summers
2019-08-09 17:00:09 -05:00
parent bf489cc4a8
commit d4671c044d
4 changed files with 14 additions and 17 deletions

View File

@@ -2,13 +2,7 @@
/// The data model for myPrayerJournal
module MyPrayerJournal.Domain
/// A Collision-resistant Unique IDentifier
type Cuid =
| Cuid of string
module Cuid =
/// The string value of the CUID
let toString x = match x with Cuid y -> y
open Cuid
/// Request ID is a CUID
type RequestId =