Skip to content

Instantly share code, notes, and snippets.

@jasondown
Created January 24, 2019 03:13
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jasondown/0bc5a55c7c5bf69e4bd2e50e166c0340 to your computer and use it in GitHub Desktop.
Save jasondown/0bc5a55c7c5bf69e4bd2e50e166c0340 to your computer and use it in GitHub Desktop.
type SampleData =
| Diagnosed of DiagnosedSampleData
| Undiagnosed of UndiagnosedSampleData
static member Create (token : Token) =
if token.[4] |> int = -1 then
SampleData.Undiagnosed <| UndiagnosedSampleData.Create token
else
SampleData.Diagnosed <| DiagnosedSampleData.Create token
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment