Update CallFunctions.hs