Haskell - Mnożenie

Witam,
Mam wielką prośbę do was.
Pomoglibyście przepisać mi program z C na Haskell ?

 
#include <stdio.h>
int main()
{
         int a;
        
         while( (scanf("%d", &a)) != EOF ) printf("%d", 3*a);

         return 0;
}

Pozdrawiam,
Jan Kowalski

No coż, myślałeś, że ci nie przepiszemy :D?
Heh... Bo nie przepiszemy. Ile płacisz? Czuje, że połowie forum znającego haskell by się podobało 30 zł. Za drogo? Trudno, ucz się.

Na tym forum nikt nie zna Haskella.

module Main where

main = interact $ unwords . map (show . (3 *) . read) . words