CSE-136 Clean up the code a bit, fix type inference
CSE-136 Clean up the code a bit, fix type inference

input-output-hk/pos-haskell-prototype,input-output-hk/cardano-sl-explorer,input-output-hk/cardano-sl,input-output-hk/cardano-sl-explorer,input-output-hk/pos-haskell-prototype,input-output-hk/cardano-sl,input-output-hk/cardano-sl,input-output-hk/pos-haskell-prototype,input-output-hk/cardano-sl-explorer,input-output-hk/cardano-sl