functionScoreFunctionsPair :: FunctionScoreFunctions -> (Text, Value)
functionScoreFunctionsPair (FunctionScoreSingle fn)
  = functionScoreFunctionPair fn
functionScoreFunctionsPair :: FunctionScoreFunctions -> (Text, Value)
functionScoreFunctionsPair (FunctionScoreSingle fn)
  = functionScoreFunctionPair fn
functionScoreFunctionsPair (FunctionScoreSingle fn)
  = functionScoreFunctionPair fn