FirstOrDefault In F #

Question

Come scrivere FirstOrDefault Linq Query in F #? Posso usare linq su sql in F # completamente?

Answer 1

Si noti che un approccio più idiomatica all'interno di F # sarebbe probabilmente usare qualcosa sulla linea Seq.tryFind piuttosto che utilizzare gli operatori LINQ, sebbene non si tratti di una sostituzione in quanto restituisce un valore di opzione.

Answer 2

Per quanto riguarda LINQ to SQL, vedere

http://blogs.msdn.com/dsyme/archive/2009/10/23/a-quick-refresh-on-query-support-in-the-f-power-pack.aspx

Per quanto riguarda FirstOrDefault, è solo un'estensione method nel System.Linq namespace:

let l = [1;2;3] 
open System.Linq 
let r = l.FirstOrDefault() 

Answer 3

In alternativa, è possibile definire il proprio FirstOrDefault facilmente:

let firstordefault list = 
    match list with 
    | head :: tail -> head 
    | [] -> 0 // some default value 

Esempio:

let exampleList = [ 1; 2; 3 ] 

utilizzando F # interattivo,

firstordefault exampleList;; 
val it : int = 1 

Answer 4

Poiché il modulo Seq ha già una funzione head di tipo seq<'a> -> 'a, Vorrei definire una funzione con la firma tryHeadseq<'a> -> option<'a>:

module Seq = 
    let tryHead (ls:seq<'a>) : option<'a> = ls |> Seq.tryPick Some 

usando come:

[1; 2; 3] |> Seq.tryHead