module Black where import Pan effect :: UI DisplayFun effect = animToDisplayFun (liftToAnim blackI)