ignoreArgumentLambda :: L1.SrcSpan -> L1.L1Expression -> State DesugarTmp L1.L1Expression
ignoreArgumentLambda ss ex =
  L1.L1ExLambda ss
    <$> (L1.L1PatternBind ss <$> (L1.L1ScopedID ss <$> desugarTmpName))
    <*> (pure ex)
ignoreArgumentLambda :: L1.SrcSpan -> L1.L1Expression -> State DesugarTmp L1.L1Expression
ignoreArgumentLambda ss ex =
  L1.L1ExLambda ss
    <$> (L1.L1PatternBind ss <$> (L1.L1ScopedID ss <$> desugarTmpName))
    <*> (pure ex)
ignoreArgumentLambda ss ex =
  L1.L1ExLambda ss
    <$> (L1.L1PatternBind ss <$> (L1.L1ScopedID ss <$> desugarTmpName))
    <*> (pure ex)