translateDomainDefinition scope _ nsid
  (L1.L1ConnectDomain ss dt ex) =
    makeClonelikeDomain scope ss nsid dt
      (\scope' -> L2.L2DomainConnect <$> (translateExpression scope' ss nsid ex))
translateDomainDefinition scope _ nsid
  (L1.L1ConnectDomain ss dt ex) =
    makeClonelikeDomain scope ss nsid dt
      (\scope' -> L2.L2DomainConnect <$> (translateExpression scope' ss nsid ex))
translateDomainDefinition scope _ nsid
  (L1.L1ConnectDomain ss dt ex) =
    makeClonelikeDomain scope ss nsid dt
      (\scope' -> L2.L2DomainConnect <$> (translateExpression scope' ss nsid ex))