module Prelude where

import List
import Signal

fst (x,y) = x
snd (x,y) = y