letrec no work