lt
testACounterWEmpty c = testACounter c emptyOpts emptyProfile emptyCS


countersSpec ∷ Spec
countersSpec = do

  let codeline    
testACounterWEmpty ∷ Counter → String → Maybe CalcResult
testACounterWEmpty c = testACounter c emptyOpts emptyProfile emptyCS
testACounterWEmpty c = testACounter c emptyOpts emptyProfile emptyCS