Slesa

import os
import subprocess

# https://docs.xfce.org/xfce/xfconf/xfconf-query

#region Output

Colors = [
    ('<red>', '\033[0;31m'),
    ('<green>', '\033[0;32m'),

Slesa

open FsUnit

[<TestFixture>]
type ``When using apply in List`` ()=
    let (<*>) = List.apply

    [<Test>] member x.
        ``it should call apply to each member``() =
            [add] <*> [1; 2] <*> [10;20]
            |> should equal [11;21;12;22]    

Slesa

type KeyValues = Map<string,string>

type DataList = {
    Articles: KeyValues list option
}

let dataList : DataList = {
    Articles = Option.None
}