desugarComplexLambda (L1.L1ExLambda ss complexPattern value) =
  return $
    L1.L1ExFCase ss False (Right [(complexPattern, value)])
desugarComplexLambda (L1.L1ExLambda ss complexPattern value) =
  return $
    L1.L1ExFCase ss False (Right [(complexPattern, value)])
desugarComplexLambda (L1.L1ExLambda ss complexPattern value) =
  return $
    L1.L1ExFCase ss False (Right [(complexPattern, value)])