F # - dopasowywanie wzorców
Dopasowywanie wzorców umożliwia „porównywanie danych z logiczną strukturą lub strukturami, rozkładanie danych na części składowe lub wyodrębnianie informacji z danych na różne sposoby”.
Innymi słowy, zapewnia bardziej elastyczny i skuteczniejszy sposób testowania danych pod kątem szeregu warunków i wykonywania niektórych obliczeń w oparciu o spełniony warunek.
Koncepcyjnie przypomina serię stwierdzeń „jeśli… to”.
Składnia
Mówiąc ogólnie, dopasowanie wzorców jest zgodne z tą składnią w języku F # -
match expr with
| pat1 - result1
| pat2 -> result2
| pat3 when expr2 -> result3
| _ -> defaultResult
Gdzie,
- Każdy | symbol określa warunek.
- Symbol -> oznacza „jeśli warunek jest prawdziwy, zwróć tę wartość ...”.
- Symbol _ zapewnia domyślny wzorzec, co oznacza, że pasuje do wszystkich innych rzeczy, takich jak symbol wieloznaczny.
Przykład 1
Poniższy przykład oblicza liczby Fibonacciego przy użyciu składni dopasowania wzorców -
let rec fib n =
match n with
| 0 -> 0
| 1 -> 1
| _ -> fib (n - 1) + fib (n - 2)
for i = 1 to 10 do
printfn "Fibonacci %d: %d" i (fib i)
Kiedy kompilujesz i wykonujesz program, daje to następujące dane wyjściowe -
Fibonacci 1: 1
Fibonacci 2: 1
Fibonacci 3: 2
Fibonacci 4: 3
Fibonacci 5: 5
Fibonacci 6: 8
Fibonacci 7: 13
Fibonacci 8: 21
Fibonacci 9: 34
Fibonacci 10: 55
Możesz także łączyć ze sobą wiele warunków, które zwracają tę samą wartość. Na przykład -
Przykład 2
let printSeason month =
match month with
| "December" | "January" | "February" -> printfn "Winter"
| "March" | "April" -> printfn "Spring"
| "May" | "June" -> printfn "Summer"
| "July" | "August" -> printfn "Rainy"
| "September" | "October" | "November" -> printfn "Autumn"
| _ -> printfn "Season depends on month!"
printSeason "February"
printSeason "April"
printSeason "November"
printSeason "July"
Kiedy kompilujesz i wykonujesz program, daje to następujące dane wyjściowe -
Winter
Spring
Autumn
Rainy
Funkcje dopasowania wzorców
F # umożliwia pisanie funkcji dopasowywania wzorców przy użyciu function słowo kluczowe -
let getRate = function
| "potato" -> 10.00
| "brinjal" -> 20.50
| "cauliflower" -> 21.00
| "cabbage" -> 8.75
| "carrot" -> 15.00
| _ -> nan (* nan is a special value meaning "not a number" *)
printfn "%g"(getRate "potato")
printfn "%g"(getRate "brinjal")
printfn "%g"(getRate "cauliflower")
printfn "%g"(getRate "cabbage")
printfn "%g"(getRate "carrot")
Kiedy kompilujesz i wykonujesz program, daje to następujące dane wyjściowe -
10
20.5
21
8.75
15
Dodawanie filtrów lub osłon do wzorców
Możesz dodawać filtry lub osłony do wzorców przy użyciu rozszerzenia when słowo kluczowe.
Przykład 1
let sign = function
| 0 -> 0
| x when x < 0 -> -1
| x when x > 0 -> 1
printfn "%d" (sign -20)
printfn "%d" (sign 20)
printfn "%d" (sign 0)
Kiedy kompilujesz i wykonujesz program, daje to następujące dane wyjściowe -
-1
1
0
Przykład 2
let compareInt x =
match x with
| (var1, var2) when var1 > var2 -> printfn "%d is greater than %d" var1 var2
| (var1, var2) when var1 < var2 -> printfn "%d is less than %d" var1 var2
| (var1, var2) -> printfn "%d equals %d" var1 var2
compareInt (11,25)
compareInt (72, 10)
compareInt (0, 0)
Kiedy kompilujesz i wykonujesz program, daje to następujące dane wyjściowe -
11 is less than 25
72 is greater than 10
0 equals 0
Dopasowywanie wzorców z krotkami
Poniższy przykład ilustruje dopasowanie wzorca za pomocą krotek -
let greeting (name, subject) =
match (name, subject) with
| ("Zara", _) -> "Hello, Zara"
| (name, "English") -> "Hello, " + name + " from the department of English"
| (name, _) when subject.StartsWith("Comp") -> "Hello, " + name + " from the department of Computer Sc."
| (_, "Accounts and Finance") -> "Welcome to the department of Accounts and Finance!"
| _ -> "You are not registered into the system"
printfn "%s" (greeting ("Zara", "English"))
printfn "%s" (greeting ("Raman", "Computer Science"))
printfn "%s" (greeting ("Ravi", "Mathematics"))
Kiedy kompilujesz i wykonujesz program, daje to następujące dane wyjściowe -
Hello, Zara
Hello, Raman from the department of Computer Sc.
You are not registered into the system
Dopasowywanie wzorców do rekordów
Poniższy przykład demonstruje dopasowanie wzorców z rekordami -
type Point = { x: float; y: float }
let evaluatePoint (point: Point) =
match point with
| { x = 0.0; y = 0.0 } -> printfn "Point is at the origin."
| { x = xVal; y = 0.0 } -> printfn "Point is on the x-axis. Value is %f." xVal
| { x = 0.0; y = yVal } -> printfn "Point is on the y-axis. Value is %f." yVal
| { x = xVal; y = yVal } -> printfn "Point is at (%f, %f)." xVal yVal
evaluatePoint { x = 0.0; y = 0.0 }
evaluatePoint { x = 10.0; y = 0.0 }
evaluatePoint { x = 0.0; y = 10.0 }
evaluatePoint { x = 10.0; y = 10.0 }
Kiedy kompilujesz i wykonujesz program, daje to następujące dane wyjściowe -
Point is at the origin.
Point is on the x-axis. Value is 10.000000.
Point is on the y-axis. Value is 10.000000.
Point is at (10.000000, 10.000000).