Fの正規表現が正規表現を使用しています

Question

私は先生（+、 - 、*、/をサポートする人）によって簡単な電卓を作成するように求められました。ユーザーの入力を受け取り、結果を出力する必要があります。それは永遠に実行し、最後に計算された結果を保存する必要があります。

正規表現を使ってやりたいのですが、これについては最近紹介されていますが、どのように動作させるかを理解できません。 これは私が作成したものですが、動作しません。

let getInput() = 
    System.Console.Write ("give input: ") 
    let s = System.Console.ReadLine() 
    s 

let simpleCalc() = 
let numb1 = "[0-9]*" 
let numb2 = "[0-9]*" 
let operator = "[+-*/]" 
while true do 
    let s = getInput() 
    match s with 
     | "([0-9]*)([+-*/]?)([0-9]*)" [ int1; operator; int2 ] -> int1 operator int2 
     | _ -> printfn "thas no simple maf" 

Answer 1

コメントに記載されているとおり、正規表現をどこかで使用する必要があります。

open System.Text.RegularExpressions 

let (|Regex|_|) regex input = 
    let res = Regex.Match(input, regex) 
    if res.Success then Some (List.tail [for g in res.Groups -> g.Value]) 
    else None 

シンプル：あなたが書いたものに非常に近いですこれを行う1つの方法は、入力が与えられた正規表現にマッチし、リストとしてマッチしたグループを返した場合に成功し、アクティブパターンを定義することです基本的な算術演算のための評価者は、その後、として実装することができます。私たちは何とか呼び出すことができるF＃関数にオペレータの文字列表現を有効にする必要があり

let s = "123*5" 
let ops = dict [ "+", (+); "-", (-); "*", (*); "/", (/)] 
match s with 
| Regex "([0-9]*)([\+\-\*\/])([0-9]*)" [left; op; right] -> 
    ops.[op] (int left) (int right) 
| _ -> -1 

注 - 私はdictを使用して、簡単なルックアップテーブルを定義しました。