language: Haskell (ghc-7.4.1)
date: 330 days 5 hours ago
link:
visibility: public 
1
2
3
4
5

runtimetype :: Show a =>  a -> String -> String
runtimetype x str = case str of 
  [] -> show x
  (y:ys) -> runtimetype (y,x) ys
main = interact $  runtimetype ()