math_exp_FSM/Test.hs

module Test where

f1 (x, y) = (x*2, y+1)
f2 (x, y) = (x*3, y*2)
f3 (x, y) = (x-1, y-2)

test = f1 . f2 . f3 
a = [f1, f2, f3]