main = print $ length [(m, n) | m <- [1..62], n <- [0..m-1]]
Standard input is empty
1953
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!