Haskell 同时从2.txt文件中减去和求和

Haskell 同时从2.txt文件中减去和求和,haskell,Haskell,如何通过只键入一次来获取l,以便同时从2.txt文件中执行2 func(减法和求和)?是否可以使用任何高阶函数?非常感谢你的帮助 transfer :: IO() transfer = do k <- readFile "balance1.txt" b <- readFile "balance2.txt" --------read the second file------ putStrLn "The amount that need to transfer

如何通过只键入一次来获取l,以便同时从2.txt文件中执行2 func(减法和求和)?是否可以使用任何高阶函数?非常感谢你的帮助

transfer :: IO()
transfer = do

    k <- readFile "balance1.txt"
    b <- readFile "balance2.txt" --------read the second file------
    putStrLn "The amount that need to transfer"
    l <- getLine
    let n = read l::Int
    let a = read k::Int
    let c = read b::Int
    if ( n < a ) 
        then do
        let o = a - n
        let d = show o
            let e = n + c
        putStrLn "Your new balance is"
        putStrLn(d)
        writeFile "balance1.txt" d -----------modify 1st file--------
        writeFile "balance2.txt" e -----------modify 2nd file--------
        else do 
        putStrLn "Amount is not valid"
传输::IO() 转移=do k使用:

transfer=do
[b1,b2]使用:

transfer=do

[b1,b2]什么是“同时”呢?你想要一些类似ACID的保证,还是什么?“同时”意味着我想在一个特定的函数中使用2 txt文件读写文件。这是并发haskell函数吗?但是,我上面的代码可以做到这一点吗?如果你想让操作并行执行,你可以将
forkIO
放入混合中(并确保主线程不会过早终止)。但是,你必须问问自己为什么要这样做。在你发布源代码的程序中,你将一无所获。“同时”是什么意思?你想要一些类似ACID的保证,还是什么?“同时”意味着我想在一个特定的函数中使用2 txt文件读写文件。这是并发haskell函数吗?但是,我上面的代码可以做到这一点吗?如果你想让操作并行执行,你可以将
forkIO
放入混合中(并确保主线程不会过早终止)。但是,你必须问问自己为什么要这样做。您将无法从发布源代码的程序中获得任何信息。