Create Ts.hs