Hello,
 
   I found STM.c(lower layer), but cannot find the top layer code written Haskell.??
 
 
Vasya