src/Lib.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14

module Lib
    ( someFunc
    ) where

-- import Development.Shake (cmd)
import System.Process (callCommand)


someFunc :: IO ()
someFunc = do
    putStrLn "someFunc"
    a <- callCommand "gfortran test/test1.f90 -o test1"
    a <- callCommand "./test1"
    return ()