[CDEC-337] Fix hlint "code duplication" issue
[CDEC-337] Fix hlint "code duplication" issue

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