coulomb/inter-hub
2
0
Fork 0
generated from coulomb/repo-seed
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

feat(P7): IHF Phase 7 complete — advanced observability and operational integration
Some checks failed
Test / test (push) Has been cancelled
Details

Browse Source 
T01 schema: friction_scores, bottleneck_records, hub_health_snapshots,
cross_hub_propagations + migration 1743552000.

T02 Widget Pain Heatmap: computeFrictionScore (formula documented), RecomputeFriction
action, colour-coded grid view (green/yellow/amber/red).

T03 Workflow Bottleneck Analysis: detectBottlenecks across 4 pipeline stages
(candidate 30d, requirement 60d, decision 30d, observation 14d), idempotent,
severity from age ratio, resolve action.

T04 Hub Health Correlation: computeHubHealth (deduction table documented),
append-only HubHealthSnapshot, health history view, badge on hub Show page.

T05 Cross-Hub Propagation: annotation_cluster + widget_type_friction heuristics,
idempotent detection, acknowledge/resolve lifecycle.

T06 Operational Review Board: 4-panel AutoRefresh global dashboard — health matrix,
top-10 friction, bottleneck stage counts, open propagations.

T07 gate: 5 describe blocks in Test/Integration.hs; SCOPE.md updated Phase 7
complete; docs/phase7-summary.md written.

Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
Bernd Worsch
2026-03-29 21:49:22 +00:00
parent c0b4b984b0
commit 98fb159582
22 changed files with 1638 additions and 262 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
Web/Types.hs
View File

@@ -28,6 +28,14 @@ data HubsController
| AntifragilityDashboardAction { hubId :: !(Id Hub) }
| AgentAuditDashboardAction { hubId :: !(Id Hub) }
| AdapterCompatibilityDashboardAction { hubId :: !(Id Hub) }
| FrictionHeatmapAction { hubId :: !(Id Hub) }
| RecomputeFrictionAction { hubId :: !(Id Hub) }
| BottleneckDashboardAction { hubId :: !(Id Hub) }
| DetectBottlenecksAction { hubId :: !(Id Hub) }
| ResolveBottleneckAction { bottleneckRecordId :: !(Id BottleneckRecord) }
| SnapshotHubHealthAction { hubId :: !(Id Hub) }
| HubHealthHistoryAction { hubId :: !(Id Hub) }
| OperationalReviewBoardAction
deriving (Eq, Show, Data)
data WidgetsController
@@ -135,6 +143,13 @@ data WidgetAdapterSpecsController
| UpdateWidgetAdapterSpecAction { widgetAdapterSpecId :: !(Id WidgetAdapterSpec) }
deriving (Eq, Show, Data)
data CrossHubPropagationsController
= CrossHubPropagationsAction
| DetectPropagationsAction
| AcknowledgePropagationAction { crossHubPropagationId :: !(Id CrossHubPropagation) }
| ResolvePropagationAction { crossHubPropagationId :: !(Id CrossHubPropagation) }
deriving (Eq, Show, Data)
data SessionsController
= NewSessionAction
| CreateSessionAction