isaacabraham

let tuple = "a","b"

let v1 = System.String.Compare(tuple) // error

let v2 = System.Object.Equals(tuple) // no error

isaacabraham

#if INTERACTIVE
#r "nuget: FsToolkit.ErrorHandling"
#endif

open System.Text.Json
open FsToolkit.ErrorHandling

/// All Error DUs should implement this to "take part" in generalised fault reporting.
[<Interface>]
type IFault =

isaacabraham

#r "nuget: OpenAI, 2.0.0"

open OpenAI.Chat
open System.Text.Json
open System.Collections.Generic
open System.IO

let client = ChatClient("gpt-4o", "KEY GOES HERE")

module FsOpenAi =

isaacabraham

#r "nuget: OpenAI, 2.0.0"

open OpenAI.Chat

let client =
    ChatClient("gpt-4o-mini", "API-KEY-GOES-HERE")

//1. Basic call
let response =
    client.CompleteChat([ UserChatMessage "Please send a funny greeting back to me!" :> ChatMessage ])

isaacabraham

isaacabraham

#r "nuget:Microsoft.EntityFrameworkCore.SqlServer, 8.0.8"

open Microsoft.EntityFrameworkCore
open System
open System.Linq

// Our domain model with a custom wrapped ID type
type Id<'T> =
    | Id of Guid

isaacabraham

module LinqOo =
    /// Selects a value into another shape.
    type ISelectable<'a, 'b> =
        abstract Select: 'a -> 'b

    /// Filters a value.
    type IFilterable<'a> =
        abstract Filter: 'a -> bool

    type ICollectable<'a, 'b> =

isaacabraham

source https://api.nuget.org/v3/index.json
framework: net8.0
storage: none
nuget Microsoft.ApplicationInsights.Profiler.AspNetCore

isaacabraham

// A generic Record
type Person<'T> = {
    Name: string
    Age: int
    Singleton: 'T -> 'T list
}

// Creating a value with an "open" generic argument (?)
let personRec : Person<'T> = {
    Name = "Isaac"

isaacabraham

open System

let s = "Card 1: 41 48 83 86 17 | 83 86  6 31 17  9 48 53"

// challenge - split above into values we can reason about e.g. 
type Card = {
    Id : int // 1
    Winning : int list // 41 48 83 86 17
    Ticket : int list // 83 86  6 31 17  9 48 53
}