translateExpression :: ScopeInformation -> L1.SrcSpan -> L2.L2NamespaceID -> L1.L1Expression -> ModelTranslation L2.L2Expression
translateExpression scope _ nsid (L1.L1ExApply ss op arg) =
  L2.L2ExApply ss <$> translateExpression scope ss nsid op
                  <*> translateExpression scope ss nsid arg
translateExpression :: ScopeInformation -> L1.SrcSpan -> L2.L2NamespaceID -> L1.L1Expression -> ModelTranslation L2.L2Expression
translateExpression scope _ nsid (L1.L1ExApply ss op arg) =
  L2.L2ExApply ss <$> translateExpression scope ss nsid op
                  <*> translateExpression scope ss nsid arg
translateExpression scope _ nsid (L1.L1ExApply ss op arg) =
  L2.L2ExApply ss <$> translateExpression scope ss nsid op
                  <*> translateExpression scope ss nsid arg