conceptFromEntities

TODO.md

@@ -6,10 +6,7 @@
 
 # concept
 
-`conceptFromEntities` -- 构造 immutable 的 `Concept`
-`conceptFromAttributes` -- 构造 immutable 的 `Concept`
-`conceptFromEntity` -- 构造 immutable 的 `Concept` -- 有更好的名字吗？
-`conceptFromAttribute` -- 构造 immutable 的 `Concept` -- 有更好的名字吗？
+`conceptFromAttributes`
 
 # context
 

src/concept/conceptFromEntities.ts

@@ -0,0 +1,23 @@
+import {
+  commonAttributes,
+  commonEntities,
+  type Context,
+  type Entity,
+} from "../context/index.js"
+import type { Concept } from "./Concept.js"
+
+export function conceptFromEntities(
+  context: Context,
+  entities: ReadonlySet<Entity> | ReadonlyArray<Entity>,
+): Concept {
+  entities = new Set(entities)
+
+  const intent = commonAttributes(context, entities)
+  const extent = commonEntities(context, intent)
+
+  return {
+    context,
+    extent,
+    intent,
+  }
+}

src/concept/index.ts

@@ -1,5 +1,7 @@
 export * from "./closureAttributes.js"
 export * from "./closureEntities.js"
 export * from "./Concept.js"
+export * from "./conceptFromAttributes.js"
+export * from "./conceptFromEntities.js"
 export * from "./isExtent.js"
 export * from "./isIntent.js"