@jjlmoya/utils-forensic-science 1.7.0 → 1.9.0

package/src/tool/time-of-death-algor-mortis-calculator/dom-views.ts

@@ -0,0 +1,144 @@
+import type { TimeOfDeathAlgorMortisUI } from './ui';
+import type { AlgorMortisResult, AlgorMortisInputs, CurvePoint } from './logic';
+import { evaluateCoolingStatus } from './evaluator';
+
+export interface SvgRenderConfig {
+  result: AlgorMortisResult;
+  inputs: AlgorMortisInputs;
+  ui: TimeOfDeathAlgorMortisUI;
+}
+
+interface PlotBounds {
+  w: number;
+  h: number;
+  padLeft: number;
+  padBottom: number;
+  minTemp: number;
+  maxTemp: number;
+  maxTime: number;
+}
+
+export function formatDuration(decimalHours: number, ui: TimeOfDeathAlgorMortisUI): string {
+  const h = Math.floor(decimalHours);
+  const m = Math.round((decimalHours - h) * 60);
+  if (m === 60) return `${h + 1} ${ui.hoursUnit}`;
+  if (h === 0) return `${m} ${ui.minutesUnit}`;
+  return `${h} ${ui.hoursUnit} ${m} ${ui.minutesUnit}`;
+}
+
+export function renderTelemetry(container: HTMLElement, result: AlgorMortisResult, inputs: AlgorMortisInputs, ui: TimeOfDeathAlgorMortisUI): void {
+  const isImp = inputs.unitSystem === 'imperial';
+  const tempUnit = isImp ? ui.fahrenheitUnit : ui.celsiusUnit;
+  const rateUnit = isImp ? ui.fahrenheitPerHour : ui.celsiusPerHour;
+  const status = evaluateCoolingStatus({ result, ui, rectalTemp: result.rectalTempDisplay, ambientTemp: result.ambientTempDisplay, refTemp: result.refTempDisplay });
+
+  container.innerHTML = `
+    <div class="sc-hero-card">
+      <div class="sc-hero-header">
+        <span class="sc-hero-title">${ui.estimatedPmiLabel}</span>
+        <span class="sc-badge ${status.badgeClass}">${status.phaseLabel}</span>
+      </div>
+      <div class="sc-hero-val">${formatDuration(result.pmiHours, ui)}</div>
+      <div class="sc-hero-sub">${ui.deathWindowLabel}: <strong>${result.timeOfDeathMin} - ${result.timeOfDeathMax}</strong> (${result.timeOfDeathEstimated} est.)</div>
+      <div class="sc-gauge-wrap">
+        <div class="sc-gauge-track">
+          <div class="sc-gauge-bar ${status.badgeClass}" style="width: ${status.gaugePercent}%"></div>
+        </div>
+        <div class="sc-gauge-labels">
+          <span>${result.refTempDisplay}${tempUnit} ${ui.referenceBodyTempLabel || ''}</span>
+          <span>${result.ambientTempDisplay}${tempUnit} ${ui.baselineAmbientLabel || ''}</span>
+        </div>
+      </div>
+    </div>
+    <div class="sc-stats-grid">
+      <div class="sc-stat-card"><span class="sc-stat-label">${ui.confidenceMarginLabel}</span><span class="sc-stat-val">± ${formatDuration(result.confidenceMarginHours, ui)}</span><span class="sc-stat-sub">${ui.confidenceMarginSub || '95%'}</span></div>
+      <div class="sc-stat-card"><span class="sc-stat-label">${ui.coolingRateLabel}</span><span class="sc-stat-val">${result.coolingRateDisplay} ${rateUnit}</span><span class="sc-stat-sub">${ui.coolingRateSub || 'ΔT/h'}</span></div>
+      <div class="sc-stat-card"><span class="sc-stat-label">${ui.glaisterEstimateLabel}</span><span class="sc-stat-val">${formatDuration(result.glaisterPmiHours, ui)}</span><span class="sc-stat-sub">${ui.glaisterEstimateSub || 'Glaister'}</span></div>
+    </div>
+  `;
+}
+
+function buildPathString(points: CurvePoint[], b: PlotBounds): string {
+  const span = Math.max(1, b.maxTemp - b.minTemp);
+  const plotW = b.w - b.padLeft - 30;
+  const plotH = b.h - b.padBottom - 25;
+  return points.reduce((acc, pt, i) => {
+    const x = b.padLeft + (pt.time / b.maxTime) * plotW;
+    const y = 25 + plotH - ((pt.temp - b.minTemp) / span) * plotH;
+    return i === 0 ? `M ${x.toFixed(1)} ${y.toFixed(1)}` : `${acc} L ${x.toFixed(1)} ${y.toFixed(1)}`;
+  }, '');
+}
+
+function buildBandPolygon(points: CurvePoint[], b: PlotBounds): string {
+  const span = Math.max(1, b.maxTemp - b.minTemp);
+  const plotW = b.w - b.padLeft - 30;
+  const plotH = b.h - b.padBottom - 25;
+  const upper = points.map((pt) => `${(b.padLeft + (pt.time / b.maxTime) * plotW).toFixed(1)},${(25 + plotH - ((pt.upperTemp - b.minTemp) / span) * plotH).toFixed(1)}`);
+  const lower = points.slice().reverse().map((pt) => `${(b.padLeft + (pt.time / b.maxTime) * plotW).toFixed(1)},${(25 + plotH - ((pt.lowerTemp - b.minTemp) / span) * plotH).toFixed(1)}`);
+  return `${upper.join(' ')} ${lower.join(' ')}`;
+}
+
+function renderAxesAndGrid(b: PlotBounds, tempUnit: string): string {
+  const plotW = b.w - b.padLeft - 30;
+  const plotH = b.h - b.padBottom - 25;
+  const span = Math.max(1, b.maxTemp - b.minTemp);
+
+  const yVals = [b.maxTemp, b.minTemp + span * 0.66, b.minTemp + span * 0.33, b.minTemp];
+  const yTicks = yVals.map((val) => {
+    const y = 25 + plotH - ((val - b.minTemp) / span) * plotH;
+    return `<line x1="${b.padLeft}" y1="${y}" x2="${b.w - 30}" y2="${y}" class="sc-chart-grid" /><text x="${b.padLeft - 10}" y="${y + 4}" text-anchor="end" class="sc-chart-axis-label">${Math.round(val)}${tempUnit}</text>`;
+  });
+
+  const xSteps = [0, b.maxTime * 0.25, b.maxTime * 0.5, b.maxTime * 0.75, b.maxTime].map((t) => {
+    const x = b.padLeft + (t / b.maxTime) * plotW;
+    return `<line x1="${x}" y1="25" x2="${x}" y2="${25 + plotH}" class="sc-chart-grid" /><text x="${x}" y="${b.h - 15}" text-anchor="middle" class="sc-chart-axis-label">${Math.round(t)}h</text>`;
+  });
+
+  return `${yTicks.join('')}${xSteps.join('')}<line x1="${b.padLeft}" y1="25" x2="${b.padLeft}" y2="${25 + plotH}" class="sc-chart-axis" /><line x1="${b.padLeft}" y1="${25 + plotH}" x2="${b.w - 30}" y2="${25 + plotH}" class="sc-chart-axis" />`;
+}
+
+function buildSvgContent(cfg: SvgRenderConfig, b: PlotBounds, tUnit: string): string {
+  const { result, ui } = cfg;
+  const plotW = b.w - b.padLeft - 30;
+  const plotH = b.h - b.padBottom - 25;
+  const span = Math.max(1, b.maxTemp - b.minTemp);
+  const pathD = buildPathString(result.curvePoints, b);
+  const bandPoly = buildBandPolygon(result.curvePoints, b);
+  const ptX = b.padLeft + (result.pmiHours / b.maxTime) * plotW;
+  const ptY = 25 + plotH - ((result.rectalTempDisplay - b.minTemp) / span) * plotH;
+  const ambY = 25 + plotH - ((result.ambientTempDisplay - b.minTemp) / span) * plotH;
+  const plateauW = (2.5 / boundsOrDefault(b.maxTime)) * plotW;
+
+  return `
+    <defs><linearGradient id="sc-curve-grad" x1="0%" y1="0%" x2="100%" y2="0%"><stop offset="0%" stop-color="var(--n-accent-cyan)" /><stop offset="100%" stop-color="var(--n-primary)" /></linearGradient></defs>
+    ${renderAxesAndGrid(b, tUnit)}
+    <rect x="${b.padLeft}" y="25" width="${plateauW}" height="${plotH}" class="sc-chart-plateau" />
+    <polygon points="${bandPoly}" class="sc-chart-band" />
+    <line x1="${b.padLeft}" y1="${ambY}" x2="${b.w - 30}" y2="${ambY}" class="sc-chart-amb" />
+    <path d="${pathD}" class="sc-chart-line" />
+    <circle cx="${ptX}" cy="${ptY}" r="9" class="sc-chart-pulse" />
+    <circle cx="${ptX}" cy="${ptY}" r="5" class="sc-chart-core" />
+    <text x="${b.padLeft + plateauW / 2}" y="45" text-anchor="middle" class="sc-chart-tag">${ui.chartPlateauMarker}</text>
+    <text x="${b.w - 35}" y="${ambY - 8}" text-anchor="end" class="sc-chart-tag">${result.ambientTempDisplay}${tUnit} ${ui.ambientTempLabel}</text>
+    <text x="${Math.min(b.w - 110, ptX + 14)}" y="${Math.max(45, ptY - 12)}" class="sc-chart-pt-label">${result.rectalTempDisplay}${tUnit} (${result.pmiHours.toFixed(1)}h)</text>
+  `;
+}
+
+function boundsOrDefault(maxTime: number): number {
+  return Math.max(1, maxTime);
+}
+
+export function renderSvgNomogram(svg: SVGSVGElement, cfg: SvgRenderConfig): void {
+  const isImp = cfg.inputs.unitSystem === 'imperial';
+  const bounds: PlotBounds = {
+    w: 700,
+    h: 340,
+    padLeft: 70,
+    padBottom: 45,
+    minTemp: Math.min(cfg.result.ambientTempDisplay, cfg.result.rectalTempDisplay) - (isImp ? 4 : 2),
+    maxTemp: cfg.result.refTempDisplay + (isImp ? 3 : 1.5),
+    maxTime: Math.max(24, Math.ceil(cfg.result.pmiHours + 6))
+  };
+  svg.setAttribute('viewBox', `0 0 ${bounds.w} ${bounds.h}`);
+  svg.innerHTML = buildSvgContent(cfg, bounds, isImp ? cfg.ui.fahrenheitUnit : cfg.ui.celsiusUnit);
+}

package/src/tool/time-of-death-algor-mortis-calculator/entry.ts

@@ -0,0 +1,29 @@
+import type { ScienceToolEntry, ToolLocaleContent } from '../../types';
+import type { TimeOfDeathAlgorMortisUI } from './ui';
+
+export type TimeOfDeathAlgorMortisLocaleContent = ToolLocaleContent<TimeOfDeathAlgorMortisUI>;
+
+export const timeOfDeathAlgorMortisCalculator: ScienceToolEntry<TimeOfDeathAlgorMortisUI> = {
+  id: 'time-of-death-algor-mortis-calculator',
+  icons: {
+    bg: 'mdi:thermometer',
+    fg: 'mdi:timer-outline'
+  },
+  i18n: {
+    de: () => import('./i18n/de').then((m) => m.content),
+    en: () => import('./i18n/en').then((m) => m.content),
+    es: () => import('./i18n/es').then((m) => m.content),
+    fr: () => import('./i18n/fr').then((m) => m.content),
+    id: () => import('./i18n/id').then((m) => m.content),
+    it: () => import('./i18n/it').then((m) => m.content),
+    ja: () => import('./i18n/ja').then((m) => m.content),
+    ko: () => import('./i18n/ko').then((m) => m.content),
+    nl: () => import('./i18n/nl').then((m) => m.content),
+    pl: () => import('./i18n/pl').then((m) => m.content),
+    pt: () => import('./i18n/pt').then((m) => m.content),
+    ru: () => import('./i18n/ru').then((m) => m.content),
+    sv: () => import('./i18n/sv').then((m) => m.content),
+    tr: () => import('./i18n/tr').then((m) => m.content),
+    zh: () => import('./i18n/zh').then((m) => m.content)
+  }
+};

package/src/tool/time-of-death-algor-mortis-calculator/evaluator.ts

@@ -0,0 +1,34 @@
+import type { TimeOfDeathAlgorMortisUI } from './ui';
+import type { AlgorMortisResult } from './logic';
+
+export interface EvaluatedStatus {
+  phaseLabel: string;
+  badgeClass: string;
+  gaugePercent: number;
+}
+
+export interface StatusEvaluationParams {
+  result: AlgorMortisResult;
+  ui: TimeOfDeathAlgorMortisUI;
+  rectalTemp: number;
+  ambientTemp: number;
+  refTemp: number;
+}
+
+export function evaluateCoolingStatus(params: StatusEvaluationParams): EvaluatedStatus {
+  const { result, ui, rectalTemp, ambientTemp, refTemp } = params;
+  const totalSpan = Math.max(1, refTemp - ambientTemp);
+  const dropped = Math.max(0, refTemp - rectalTemp);
+  const gaugePercent = Math.min(100, Math.max(0, Math.round((dropped / totalSpan) * 100)));
+
+  if (result.coolingPhase === 'hyperthermia') {
+    return { phaseLabel: ui.phaseHyperthermia, badgeClass: 'badge-danger', gaugePercent: 0 };
+  }
+  if (result.coolingPhase === 'equilibrium') {
+    return { phaseLabel: ui.phaseEquilibrium, badgeClass: 'badge-warning', gaugePercent: 100 };
+  }
+  if (result.coolingPhase === 'plateau') {
+    return { phaseLabel: ui.phasePlateau, badgeClass: 'badge-info', gaugePercent };
+  }
+  return { phaseLabel: ui.phaseDescent, badgeClass: 'badge-success', gaugePercent };
+}

package/src/tool/time-of-death-algor-mortis-calculator/i18n/de.ts

@@ -0,0 +1,139 @@
+import { bibliography } from '../bibliography';
+import type { TimeOfDeathAlgorMortisLocaleContent } from '../entry';
+
+const slug = 'todeszeitpunkt-berechnen-algor-mortis';
+const title = 'Todeszeitpunkt Rechner mit Henssge Nomogramm';
+const description = 'Berechnen Sie das postmortale Intervall und den Todeszeitpunkt anhand der Rektaltemperatur und des Henssge Abkühlungsmodells.';
+
+const howTo = [
+  { name: 'Rektal und Umgebungstemperatur erfassen', text: 'Geben Sie die gemessene tiefe Körperkerntemperatur und die Umgebungstemperatur am Fundort ein.' },
+  { name: 'Körpergewicht und Korrekturfaktor wählen', text: 'Tragen Sie das Körpergewicht in Kilogramm ein und bestimmen Sie den Faktor für Kleidung oder Wasser.' },
+  { name: 'Messzeitpunkt festlegen', text: 'Geben Sie die genaue Uhrzeit der thermischen Messung ein oder wählen Sie die aktuelle Uhrzeit.' },
+  { name: 'Postmortales Intervall analysieren', text: 'Überprüfen Sie das berechnete Intervall, das 95 Prozent Konfidenzfenster und die Temperaturkurve.' }
+];
+
+const faq = [
+  { question: 'Was bedeutet Algor Mortis in der Rechtsmedizin?', answer: 'Algor Mortis bezeichnet die fortschreitende postmortale Leichenabkühlung bis zum Erreichen des thermischen Umgebungsgleichgewichts.' },
+  { question: 'Warum ist das Henssge Nomogramm genauer als lineare Faustregeln?', answer: 'Weil es das anfängliche Temperaturplateau sowie die doppel exponentielle Abkühlung unter Berücksichtigung von Körpermasse und Bekleidung abbildet.' },
+  { question: 'Wie präzise ist die rektale Todeszeitbestimmung?', answer: 'Unter kontrollierten Standardbedingungen beträgt die statistische 95 Prozent Vertrauensgrenze in den ersten 10 Stunden etwa plus minus 2.8 Stunden.' },
+  { question: 'Was versteht man unter dem postmortalen Temperaturplateau?', answer: 'Das Plateau beschreibt die ersten 1 bis 3 Stunden nach dem Tod, in denen die Kerntemperatur durch den bestehenden Temperaturgradienten kaum absinkt.' }
+];
+
+export const content: TimeOfDeathAlgorMortisLocaleContent = {
+  slug,
+  title,
+  description,
+  ui: {
+    title,
+    subtitle: 'Postmortales Intervall und Henssge Nomogramm Rechner',
+    disclaimer: 'Nur für Ausbildungs und Simulationszwecke. Gerichtsverwertbare Gutachten erfordern eine vollständige Obduktion und gesicherte Temperaturprotokolle.',
+    unitSystemLabel: 'Einheitensystem',
+    unitMetricLabel: 'Metrisch',
+    unitImperialLabel: 'Imperial',
+    presetsHeader: 'Forensische Standardszenarien',
+    presetCustom: 'Benutzerdefinierte Werte',
+    presetNakedCalm: 'Entkleidet in ruhigem Raum (20°C)',
+    presetDressedIndoor: 'Bekleidet in Innenräumen (19.5°C)',
+    presetWinterOutdoor: 'Winterliche Außenluft (4°C)',
+    presetSubmergedWater: 'In stehendem Wasser (12°C)',
+    presetHeavyDuvet: 'Unter dicker Daunendecke (18°C)',
+    inputsHeader: 'Messwerte und Umgebungsparameter',
+    rectalTempLabel: 'Rektale Kerntemperatur',
+    ambientTempLabel: 'Umgebungstemperatur',
+    bodyWeightLabel: 'Körpergewicht',
+    factorLabel: 'Umgebungskorrekturfaktor',
+    measurementTimeLabel: 'Messuhrzeit',
+    factorNaked: 'Entkleidet in ruhender Luft',
+    factorLightClothes: 'Leichte Kleidung (1-2 Schichten)',
+    factorStandardClothes: 'Standardkleidung (3-4 Schichten)',
+    factorHeavyWinter: 'Dicke Winterbekleidung',
+    factorLightBlanket: 'Bett mit leichter Decke',
+    factorHeavyDuvet: 'Bett mit dicker Daunendecke',
+    factorStillWater: 'In stehendem Wasser',
+    factorFlowingWater: 'In fließendem kaltem Wasser',
+    factorWetClothing: 'Nasse Kleidung bei Windzug',
+    factorMovingAir: 'Bewegte Luft mit Ventilator',
+    resultsHeader: 'Analyse des postmortalen Intervalls',
+    estimatedPmiLabel: 'Geschätzte Zeit seit Todeseintritt',
+    deathWindowLabel: 'Wahrscheinlicher Todeszeitraum',
+    confidenceMarginLabel: 'Konfidenzintervall (95%)',
+    coolingPhaseLabel: 'Thermodynamische Phase',
+    coolingRateLabel: 'Momentane Abkühlungsrate',
+    glaisterEstimateLabel: 'Vergleich mit Glaister Regel',
+    chartHeader: 'Henssge Doppel Exponentielle Abkühlungskurve',
+    chartXAxis: 'Stunden postmortal',
+    chartYAxis: 'Körpertemperatur',
+    chartNowMarker: 'Messwert',
+    chartPlateauMarker: 'Temperaturplateau',
+    phasePlateau: 'Plateauphase',
+    phaseDescent: 'Exponentieller Abfall',
+    phaseEquilibrium: 'Thermisches Gleichgewicht',
+    phaseHyperthermia: 'Warnung vor Hyperthermie',
+    hoursUnit: 'Stunden',
+    minutesUnit: 'Min',
+    celsiusUnit: '°C',
+    fahrenheitUnit: '°F',
+    kgUnit: 'kg',
+    lbUnit: 'lb',
+    celsiusPerHour: '°C/h',
+    fahrenheitPerHour: '°F/h',
+    resetBtn: 'Zurücksetzen',
+    nowBtn: 'Jetzt',
+    coreThermometerLabel: 'Körperkerntemperatur',
+    baselineAmbientLabel: 'Umgebungsgrenze',
+    referenceBodyTempLabel: 'Normaltemperatur'
+  },
+  seo: [
+    { type: 'title', text: 'Physikalische Grundlagen der Leichenabkühlung und Todeszeitschätzung', level: 2 },
+    { type: 'paragraph', html: 'Die verlässliche Bestimmung der Todeszeit und des postmortalen Intervalls gehört zu den zentralen Aufgaben der rechtsmedizinischen Kriminalistik bei der Leichenschau am Fundort. <strong>Algor Mortis</strong> beschreibt den physikalischen Wärmeverlust eines menschlichen Körpers nach dem irreversiblen Herz Kreislauf Stillstand bis zum vollständigen Angleich an die herrschende Umgebungstemperatur. Durch tiefe rektale Temperaturmessung und thermodynamische mathematische Modelle lässt sich der Todeszeitpunkt wissenschaftlich eingrenzen und objektiv rekonstruieren.' },
+    { type: 'paragraph', html: 'Die Wärmeübertragung erfolgt über Strahlung, Wärmeleitung, Konvektion und Verdunstung. Da der Körperkern die Wärme zunächst an die Körperschale abgibt, entsteht ein komplexer Temperaturgradient, der nicht durch einfache lineare Gleichungen erfasst werden kann.' },
+    { type: 'diagnostic', variant: 'info', title: 'Thermodynamischer Abkühlungsverlauf', html: 'Die Leichenabkühlung erfolgt nicht linear ab der ersten Minute nach dem Todeseintritt. Sie weist eine charakteristische anfängliche Verzögerung namens <em>Temperaturplateau</em> auf, gefolgt von einem steilen doppel exponentiellen Temperaturabfall bis zum thermischen Ausgleich.' },
+    { type: 'stats', columns: 3, items: [
+      { value: '37.2°C', label: 'Rektale Normtemperatur' },
+      { value: '±2.8 h', label: 'Konfidenzbereich erste 10h' },
+      { value: '2 Exponenten', label: 'Henssge Berechnungsmodell' }
+    ] },
+    { type: 'title', text: 'Die Doppel Exponentielle Formel nach Claus Henssge', level: 3 },
+    { type: 'paragraph', html: 'Einfache Faustformeln wie die historische Glaister Regel unterstellen einen konstanten Verlust von etwa 0.83 Grad Celsius pro Stunde. Dieses stark vereinfachte Vorgehen vernachlässigt jedoch den maßgeblichen Einfluss der Körpermasse, isolierender Bekleidungsschichten und das postmortale Plateau der tiefen Eingeweideorgane.' },
+    { type: 'code', ariaLabel: 'Henssge Formel', code: 'Q = (T_rektal - T_umgebung) / (37.2 - T_umgebung)\nQ = 1.25 * exp(-k * t) - 0.25 * exp(-5 * k * t)\nk = 1.2815 / (Koerpergewicht^0.625 * Korrekturfaktor) - 0.0284' },
+    { type: 'paragraph', html: 'Professor Claus Henssge entwickelte eine doppel exponentielle Gleichung, welche die Wärmeübertragung von Körperkern und Körperschale präzise berücksichtigt. Die mathematische Auflösung nach der Zeit liefert das probabilistische postmortale Zeitfenster mit hoher forensischer Belastbarkeit.' },
+    { type: 'paragraph', html: 'Der dimensionslose Quotient Q beschreibt den Anteil der verbleibenden Körperwärme im Verhältnis zum thermischen Ausgangszustand. Diese Formulierung stellt sicher, dass die Berechnung unabhängig von absoluten Temperaturskalen exakte Zeitschätzungen liefert.' },
+    { type: 'title', text: 'Relevante Umwelt und Isolationskorrekturfaktoren', level: 3 },
+    { type: 'paragraph', html: 'Die Wärmeabgabe hängt entscheidend von der Körperoberfläche, Luftströmungen am Auffindeort und isolierenden Textilschichten ab.' },
+    { type: 'table', headers: ['Auffindesituation', 'Korrekturfaktor', 'Wirkungsmechanismus'], rows: [
+      ['Entkleidet in stehender Raumluft', '1.0', 'Standardmäßige Wärmeabstrahlung und Eigenkonvektion'],
+      ['Leichte Bekleidung (1-2 Lagen)', '1.1', 'Geringe Verminderung der konvektiven Wärmeabgabe'],
+      ['Normale Straßenkleidung (3-4 Lagen)', '1.2', 'Mäßige thermische Barriere an Rumpf und Extremitäten'],
+      ['Dicke Winterbekleidung', '1.4', 'Starke thermische Isolation durch Lufteinschluss'],
+      ['Unter dicker Daunendecke im Bett', '1.8', 'Sehr hohe Wärmespeicherung und verzögerte Abkühlung'],
+      ['In stehendem Wasser', '0.5', 'Wärmeleitfähigkeit von Wasser ist 24 mal höher als Luft'],
+      ['In fließendem kaltem Wasser', '0.35', 'Erzwungene Konvektion beschleunigt den Entzug drastisch']
+    ] },
+    { type: 'title', text: 'Phasen der postmortalen Thermodynamik', level: 3 },
+    { type: 'comparative', columns: 2, items: [
+      { title: 'Postmortales Temperaturplateau', description: 'In den ersten 1 bis 3 Stunden fällt die rektale Temperatur kaum ab, während sich der Temperaturgradient zur Haut aufbaut.', points: ['Kern Schale Gradient bildet sich aus', 'Lineare Formeln unterschätzen die Zeitspanne', 'Mathematisch erfasst durch -0.25 exp(-5kt)'] },
+      { title: 'Steiler Exponentieller Abfall', description: 'Nach Ausbildung des Gradienten erfolgt eine kontinuierliche Wärmeabgabe mit maximaler thermometrischer Aussagekraft.', highlight: true, points: ['Höchste analytische Trennschärfe', 'Engstes statistisches Vertrauensintervall', 'Optimaler Zeitraum für die Temperaturmethode'] }
+    ] },
+    { type: 'title', text: 'Methodische Hinweise zur Temperaturmessung am Fundort', level: 3 },
+    { type: 'paragraph', html: 'Für die gerichtsmedizinische Praxis ist die Einhaltung strenger Messstandards unerlässlich. Abweichungen bei der Messtiefe oder ungenaue Erfassungen der Umgebungstemperatur können zu erheblichen Verzerrungen des berechneten Zeitfensters führen.' },
+    { type: 'list', items: [
+      '<strong>Tiefe rektale Kerntemperatur messen:</strong> Den kalibrierten Messfühler mindestens 8 bis 10 cm tief in das Rektum einführen.',
+      '<strong>Umgebungstemperatur unmittelbar am Leichnam erfassen:</strong> Thermometer maximal 10 cm neben dem Körper platzieren.',
+      '<strong>Thermische Konstanz des Fundorts dokumentieren:</strong> Heizkörper, offene Fenster oder Sonneneinstrahlung protokollieren.',
+      '<strong>Feuchtigkeit der Kleidung prüfen:</strong> Nasse Stoffe steigern die Verdunstungskälte erheblich.'
+    ] },
+    { type: 'summary', title: 'Methodische Zusammenfassung', items: [
+      'Das Henssge Nomogramm ist der international anerkannte Goldstandard der rechtsmedizinischen Todeszeitberechnung.',
+      'Es sollte stets ein Zeitintervall mit Vertrauensgrenzen statt eines isolierten Zeitpunkts angegeben werden.',
+      'Die Temperaturmessung ist mit Totenstarre, Totenflecken und supravitalen Reaktionen zu kombinieren.'
+    ] }
+  ],
+  faq,
+  bibliography,
+  howTo,
+  schemas: [
+    { '@context': 'https://schema.org', '@type': 'SoftwareApplication', name: title, description, applicationCategory: 'ForensicApplication', operatingSystem: 'Any' },
+    { '@context': 'https://schema.org', '@type': 'FAQPage', mainEntity: faq.map((item) => ({ '@type': 'Question', name: item.question, acceptedAnswer: { '@type': 'Answer', text: item.answer } })) },
+    { '@context': 'https://schema.org', '@type': 'HowTo', name: title, step: howTo.map((step) => ({ '@type': 'HowToStep', name: step.name, text: step.text })) }
+  ]
+};

package/src/tool/time-of-death-algor-mortis-calculator/i18n/en.ts

@@ -0,0 +1,136 @@
+import { bibliography } from '../bibliography';
+import type { TimeOfDeathAlgorMortisLocaleContent } from '../entry';
+
+const slug = 'time-of-death-algor-mortis-calculator';
+const title = 'Time of Death Algor Mortis Calculator';
+const description = 'Estimate postmortem interval and time of death using the Henssge nomogram method and body cooling thermodynamics.';
+
+const howTo = [
+  { name: 'Enter Body and Ambient Temperatures', text: 'Input the measured core rectal temperature and the ambient environmental temperature at the scene.' },
+  { name: 'Set Body Mass and Corrective Factors', text: 'Specify the body weight in kilograms and choose the environmental correction factor according to clothing, bed covers, or water immersion.' },
+  { name: 'Specify Measurement Time', text: 'Enter the exact time the temperature was taken or click Current Time to calculate backwards.' },
+  { name: 'Analyze PMI and Cooling Curve', text: 'Review the estimated postmortem interval, the 95 percent confidence death window, and the thermal cooling curve.' }
+];
+
+const faq = [
+  { question: 'What is Algor Mortis in forensic medicine?', answer: 'Algor Mortis is the postmortem decrease in body temperature until thermal equilibrium with the surrounding environment is reached.' },
+  { question: 'Why is the Henssge nomogram preferred over linear rules?', answer: 'The Henssge model accounts for the initial temperature plateau and exponential cooling curves using body weight and corrective environmental factors.' },
+  { question: 'How accurate is temperature based time of death estimation?', answer: 'Under controlled standard conditions, the 95 percent confidence interval is approximately plus or minus 2.8 hours in the first 10 hours, widening in later stages.' },
+  { question: 'What is the postmortem temperature plateau?', answer: 'The temperature plateau is the initial period of 1 to 3 hours after death during which the core temperature decreases very slowly due to core to surface thermal gradients.' }
+];
+
+export const content: TimeOfDeathAlgorMortisLocaleContent = {
+  slug,
+  title,
+  description,
+  ui: {
+    title,
+    subtitle: 'Postmortem Interval Estimator and Thermal Decay Nomogram',
+    disclaimer: 'Educational and academic simulation only. Actual death time determinations require comprehensive forensic examination, livor and rigor mortis correlation, and documented scene temperature records.',
+    unitSystemLabel: 'Unit System',
+    unitMetricLabel: 'Metric',
+    unitImperialLabel: 'Imperial',
+    presetsHeader: 'Forensic Scenario Presets',
+    presetCustom: 'Custom Parameters',
+    presetNakedCalm: 'Naked in Still Room (20°C)',
+    presetDressedIndoor: 'Dressed Indoors (19.5°C)',
+    presetWinterOutdoor: 'Winter Outdoor (4°C)',
+    presetSubmergedWater: 'Submerged in Still Water (12°C)',
+    presetHeavyDuvet: 'Under Heavy Down Duvet Bed (18°C)',
+    inputsHeader: 'Scene Parameters and Thermal Measurements',
+    rectalTempLabel: 'Rectal Core Temp',
+    ambientTempLabel: 'Ambient Temp',
+    bodyWeightLabel: 'Body Weight',
+    factorLabel: 'Environmental Factor',
+    measurementTimeLabel: 'Measurement Time',
+    factorNaked: 'Naked in still air',
+    factorLightClothes: 'Light clothing (1-2 layers)',
+    factorStandardClothes: 'Standard clothing (3-4 layers)',
+    factorHeavyWinter: 'Heavy insulated winter clothes',
+    factorLightBlanket: 'Bed with light blanket',
+    factorHeavyDuvet: 'Bed with thick down duvet',
+    factorStillWater: 'Submerged in still water',
+    factorFlowingWater: 'Submerged in flowing cold water',
+    factorWetClothing: 'Wet clothing in wind',
+    factorMovingAir: 'Moving air with draft or fan',
+    resultsHeader: 'Postmortem Interval Analysis',
+    estimatedPmiLabel: 'Estimated Time Since Death',
+    deathWindowLabel: 'Probable Death Window',
+    confidenceMarginLabel: 'Confidence Margin (95%)',
+    coolingPhaseLabel: 'Thermodynamic Phase',
+    coolingRateLabel: 'Instant Heat Loss Rate',
+    glaisterEstimateLabel: 'Glaister Linear Comparison',
+    chartHeader: 'Henssge Exponential Cooling Trajectory',
+    chartXAxis: 'Hours Postmortem',
+    chartYAxis: 'Core Temperature',
+    chartNowMarker: 'Measured Reading',
+    chartPlateauMarker: 'Initial Plateau',
+    phasePlateau: 'Plateau Stage',
+    phaseDescent: 'Exponential Cooling',
+    phaseEquilibrium: 'Thermal Equilibrium',
+    phaseHyperthermia: 'Hyperthermia Warning',
+    hoursUnit: 'hours',
+    minutesUnit: 'min',
+    celsiusUnit: '°C',
+    fahrenheitUnit: '°F',
+    kgUnit: 'kg',
+    lbUnit: 'lb',
+    celsiusPerHour: '°C/h',
+    fahrenheitPerHour: '°F/h',
+    resetBtn: 'Reset',
+    nowBtn: 'Current Time',
+    coreThermometerLabel: 'Core Temperature',
+    baselineAmbientLabel: 'Ambient Baseline',
+    referenceBodyTempLabel: 'Reference Body Temp'
+  },
+  seo: [
+    { type: 'title', text: 'How Postmortem Body Cooling Estimates Time of Death', level: 2 },
+    { type: 'paragraph', html: 'Estimating the time since death (Postmortem Interval or PMI) is one of the most critical challenges in legal medicine and death investigation. <strong>Algor Mortis</strong> refers to the progressive cooling of a human body after circulatory arrest until it reaches ambient thermal equilibrium. Because heat dissipation follows thermodynamic principles, measuring the deep core temperature allows forensic pathologists to reconstruct the time window when death occurred.' },
+    { type: 'diagnostic', variant: 'info', title: 'Thermodynamic Foundation', html: 'Body cooling does not proceed linearly from the moment of death. It exhibits an initial delay known as the <em>temperature plateau</em>, followed by steep exponential decay, and eventually flattens as core temperature approaches ambient temperature.' },
+    { type: 'stats', columns: 3, items: [
+      { value: '37.2°C', label: 'Reference Normothermic Core' },
+      { value: '±2.8 h', label: 'Initial 95% Confidence Margin' },
+      { value: '2 Exponential', label: 'Henssge Mathematical Model' }
+    ] },
+    { type: 'title', text: 'The Claus Henssge Double Exponential Equation', level: 3 },
+    { type: 'paragraph', html: 'Historically, investigators applied linear rules of thumb such as the Glaister equation, which assumes a steady drop of approximately 0.83 degrees Celsius per hour. While simple, linear approximations fail to account for the protective insulation of body mass and clothing or the plateau phenomenon in the first few hours.' },
+    { type: 'code', ariaLabel: 'Henssge Formula', code: 'Q = (T_rectal - T_ambient) / (37.2 - T_ambient)\nQ = 1.25 * exp(-k * t) - 0.25 * exp(-5 * k * t)\nk = 1.2815 / (BodyWeight^0.625 * CorrectionFactor) - 0.0284' },
+    { type: 'paragraph', html: 'Professor Claus Henssge developed a two exponential equation that accounts for both the surface cooling gradient and deep core retention. The normalized thermal quotient Q describes the fraction of heat remaining relative to the ambient baseline. Solving this transcendental equation for time yields an accurate mathematical estimate of hours elapsed.' },
+    { type: 'title', text: 'Key Environmental and Physiological Correction Factors', level: 3 },
+    { type: 'paragraph', html: 'Heat transfer rate depends heavily on body mass, air convection, and surface insulation. In the Henssge nomogram system, body weight is adjusted through a multiplication factor known as the corrective factor.' },
+    { type: 'table', headers: ['Scene Condition', 'Factor Value', 'Physical Mechanism'], rows: [
+      ['Naked in still room air', '1.0', 'Standard baseline radiation and natural convection'],
+      ['Light clothing (1-2 layers)', '1.1', 'Mild reduction in skin convective heat loss'],
+      ['Standard indoor clothing', '1.2', 'Moderate thermal barrier on torso and extremities'],
+      ['Heavy winter garments', '1.4', 'Significant insulation trapping warm air layer'],
+      ['Under thick down duvet in bed', '1.8', 'High insulation and delayed thermal dissipation'],
+      ['Submerged in still water', '0.5', 'Water thermal conductivity is 24 times greater than air'],
+      ['Submerged in flowing cold water', '0.35', 'Forced convective liquid heat transfer accelerated']
+    ] },
+    { type: 'title', text: 'Thermodynamic Phases of Postmortem Cooling', level: 3 },
+    { type: 'comparative', columns: 2, items: [
+      { title: 'The Postmortem Temperature Plateau', description: 'During the first 1 to 3 hours after death, core rectal temperature drops very slowly while the skin and outer tissues cool first.', points: ['Core to surface gradient establishing', 'Linear formulas underestimate PMI here', 'Correctly modeled by the -0.25 exp(-5kt) term'] },
+      { title: 'The Rapid Exponential Descent', description: 'Once the gradient is established, heat transfers continuously from core to environment at a rate determined by body mass and delta T.', highlight: true, points: ['Highest mathematical sensitivity', 'Narrowest statistical confidence interval', 'Optimal window for thermometric precision'] }
+    ] },
+    { type: 'title', text: 'Best Practices for Forensic Temperature Recording', level: 3 },
+    { type: 'list', items: [
+      '<strong>Measure deep core rectal temperature:</strong> insert a calibrated digital thermistor probe at least 8 to 10 cm into the rectum.',
+      '<strong>Record ambient temperature at the corpse level:</strong> measure room or ground air temperature within 10 cm of the body.',
+      '<strong>Document environmental stability:</strong> verify if heating, air conditioning, open windows, or sunlight altered the scene ambient temperature.',
+      '<strong>Assess clothing wetness:</strong> wet textiles drastically increase evaporative cooling and require lower corrective factor values.'
+    ] },
+    { type: 'summary', title: 'Methodological Summary', items: [
+      'The Henssge nomogram is the internationally accepted standard for thermometric death time estimation.',
+      'Always report a time window with standard deviation margins rather than an isolated point in time.',
+      'Combine thermometric findings with rigor mortis, livor mortis, and supravital excitability testing for robust case reconstruction.'
+    ] }
+  ],
+  faq,
+  bibliography,
+  howTo,
+  schemas: [
+    { '@context': 'https://schema.org', '@type': 'SoftwareApplication', name: title, description, applicationCategory: 'ForensicApplication', operatingSystem: 'Any' },
+    { '@context': 'https://schema.org', '@type': 'FAQPage', mainEntity: faq.map((item) => ({ '@type': 'Question', name: item.question, acceptedAnswer: { '@type': 'Answer', text: item.answer } })) },
+    { '@context': 'https://schema.org', '@type': 'HowTo', name: title, step: howTo.map((step) => ({ '@type': 'HowToStep', name: step.name, text: step.text })) }
+  ]
+};

package/src/tool/time-of-death-algor-mortis-calculator/i18n/es.ts

@@ -0,0 +1,136 @@
+import { bibliography } from '../bibliography';
+import type { TimeOfDeathAlgorMortisLocaleContent } from '../entry';
+
+const slug = 'calculadora-hora-muerte-algor-mortis';
+const title = 'Calculadora de Hora de Muerte por Algor Mortis';
+const description = 'Estima el intervalo post mortem y la hora probable de fallecimiento mediante el nomograma termométrico de Henssge y el enfriamiento cadavérico.';
+
+const howTo = [
+  { name: 'Introduce las temperaturas rectal y ambiente', text: 'Ingresa la temperatura rectal profunda del cadáver y la temperatura ambiente del lugar de los hechos.' },
+  { name: 'Configura la masa corporal y el factor ambiental', text: 'Indica el peso del individuo y selecciona el factor de corrección según la vestimenta, mantas o inmersión en agua.' },
+  { name: 'Indica la hora de la toma térmica', text: 'Introduce la hora exacta de la medición o haz clic en Hora actual para calcular retrospectivamente.' },
+  { name: 'Analiza el IPM y la curva de enfriamiento', text: 'Consulta el intervalo post mortem estimado, la ventana horaria con 95 por ciento de confianza y la gráfica térmica.' }
+];
+
+const faq = [
+  { question: '¿Qué es el Algor Mortis en medicina legal y forense?', answer: 'El Algor Mortis es el proceso biofísico de pérdida de temperatura corporal que experimenta un cadáver tras el cese circulatorio hasta equilibrarse con el ambiente.' },
+  { question: '¿Por qué se prefiere el nomograma de Henssge frente a reglas lineales?', answer: 'Porque modela con precisión la meseta térmica inicial de las primeras horas y el decaimiento bi exponencial ajustado al peso y la vestimenta.' },
+  { question: '¿Qué precisión tiene la estimación termométrica del fallecimiento?', answer: 'En condiciones estándar controladas, el intervalo de confianza al 95 por ciento es de aproximadamente más o menos 2.8 horas durante las primeras diez horas.' },
+  { question: '¿En qué consiste la meseta térmica post mortem inicial?', answer: 'Es el periodo inicial de una a tres horas tras el deceso en el que la temperatura rectal apenas desciende mientras se establece el gradiente térmico hacia la piel.' }
+];
+
+export const content: TimeOfDeathAlgorMortisLocaleContent = {
+  slug,
+  title,
+  description,
+  ui: {
+    title,
+    subtitle: 'Estimador del Intervalo Post Mortem y Nomograma de Enfriamiento',
+    disclaimer: 'Simulación académica y formativa. Las conclusiones periciales reales exigen autopsia judicial, análisis de livideces y rigidez cadavérica y registro ambiental verificado.',
+    unitSystemLabel: 'Sistema de unidades',
+    unitMetricLabel: 'Métrico',
+    unitImperialLabel: 'Imperial',
+    presetsHeader: 'Escenarios forenses predefinidos',
+    presetCustom: 'Parámetros personalizados',
+    presetNakedCalm: 'Desnudo en habitación calma (20°C)',
+    presetDressedIndoor: 'Vestido en interior (19.5°C)',
+    presetWinterOutdoor: 'Exterior en invierno (4°C)',
+    presetSubmergedWater: 'Sumergido en agua calma (12°C)',
+    presetHeavyDuvet: 'Bajo edredón grueso en cama (18°C)',
+    inputsHeader: 'Mediciones térmicas y parámetros del escenario',
+    rectalTempLabel: 'Temp. rectal profunda',
+    ambientTempLabel: 'Temp. ambiente',
+    bodyWeightLabel: 'Peso corporal',
+    factorLabel: 'Factor de corrección ambiental',
+    measurementTimeLabel: 'Hora de la medición',
+    factorNaked: 'Desnudo en aire quieto',
+    factorLightClothes: 'Ropa ligera (1-2 capas)',
+    factorStandardClothes: 'Ropa estándar (3-4 capas)',
+    factorHeavyWinter: 'Ropa térmica de invierno',
+    factorLightBlanket: 'Cama con sábana o manta ligera',
+    factorHeavyDuvet: 'Cama con edredón nórdico grueso',
+    factorStillWater: 'Sumergido en agua estancada',
+    factorFlowingWater: 'Sumergido en agua corriente fría',
+    factorWetClothing: 'Ropa mojada con viento',
+    factorMovingAir: 'Aire en movimiento con ventilador',
+    resultsHeader: 'Análisis del intervalo post mortem',
+    estimatedPmiLabel: 'Tiempo estimado desde la muerte',
+    deathWindowLabel: 'Ventana horaria de defunción',
+    confidenceMarginLabel: 'Margen de confianza (95%)',
+    coolingPhaseLabel: 'Fase termodinámica',
+    coolingRateLabel: 'Tasa instantánea de pérdida térmica',
+    glaisterEstimateLabel: 'Comparativa con regla de Glaister',
+    chartHeader: 'Trayectoria de enfriamiento bi exponencial de Henssge',
+    chartXAxis: 'Horas post mortem',
+    chartYAxis: 'Temperatura central',
+    chartNowMarker: 'Medición registrada',
+    chartPlateauMarker: 'Meseta inicial',
+    phasePlateau: 'Fase de meseta',
+    phaseDescent: 'Descenso exponencial',
+    phaseEquilibrium: 'Equilibrio térmico',
+    phaseHyperthermia: 'Alerta por hipertermia previa',
+    hoursUnit: 'horas',
+    minutesUnit: 'min',
+    celsiusUnit: '°C',
+    fahrenheitUnit: '°F',
+    kgUnit: 'kg',
+    lbUnit: 'lb',
+    celsiusPerHour: '°C/h',
+    fahrenheitPerHour: '°F/h',
+    resetBtn: 'Restablecer',
+    nowBtn: 'Hora actual',
+    coreThermometerLabel: 'Temperatura central',
+    baselineAmbientLabel: 'Límite ambiental',
+    referenceBodyTempLabel: 'Referencia corporal'
+  },
+  seo: [
+    { type: 'title', text: 'Fundamentos del Enfriamiento Cadavérico y Estimación de la Hora de Muerte', level: 2 },
+    { type: 'paragraph', html: 'La determinación del intervalo post mortem o IPM representa uno de los objetivos esenciales de la tanatología forense. El <strong>Algor Mortis</strong> describe el enfriamiento progresivo del cuerpo humano tras el paro cardiopulmonar irreversible hasta alcanzar la temperatura del entorno. Mediante la termometría profunda y leyes físicas de disipación de calor, los médicos legistas pueden reconstruir con base científica la franja horaria en la que aconteció la muerte.' },
+    { type: 'diagnostic', variant: 'info', title: 'Comportamiento Termodinámico Cadavérico', html: 'El descenso térmico no es una línea recta constante desde el primer minuto. Presenta una demora inicial denominada <em>meseta térmica</em>, seguida de una etapa de caída exponencial pronunciada y una asíntota suave cuando el cuerpo se aproxima al equilibrio ambiental.' },
+    { type: 'stats', columns: 3, items: [
+      { value: '37.2°C', label: 'Referencia rectal normotérmica' },
+      { value: '±2.8 h', label: 'Margen estadístico al 95%' },
+      { value: 'Bi Exponencial', label: 'Modelo matemático de Henssge' }
+    ] },
+    { type: 'title', text: 'La Ecuación Bi Exponencial de Claus Henssge', level: 3 },
+    { type: 'paragraph', html: 'Históricamente se recurría a aproximaciones lineales como la regla de Glaister, que calculaba una pérdida fija cercana a 0.83 grados Celsius por hora. No obstante, las fórmulas lineales carecen de precisión al ignorar la masa corporal, el aislamiento textil o el fenómeno de la meseta térmica inicial.' },
+    { type: 'code', ariaLabel: 'Ecuación de Henssge', code: 'Q = (T_rectal - T_ambiente) / (37.2 - T_ambiente)\nQ = 1.25 * exp(-k * t) - 0.25 * exp(-5 * k * t)\nk = 1.2815 / (PesoCorporal^0.625 * FactorCorreccion) - 0.0284' },
+    { type: 'paragraph', html: 'El profesor Claus Henssge formuló un modelo matemático de dos exponenciales que contempla tanto el gradiente de disipación superficial como la retención de energía del núcleo visceral. La resolución de esta ecuación permite obtener el tiempo transcurrido con un alto grado de fiabilidad estadística.' },
+    { type: 'title', text: 'Factores de Corrección Ambientales y de Vestimenta', level: 3 },
+    { type: 'paragraph', html: 'La transferencia de calor varía drásticamente según la superficie de contacto, la convección del aire y las capas de abrigo que protegen el torso del individuo.' },
+    { type: 'table', headers: ['Condición del Escenario', 'Factor Cf', 'Efecto Físico'], rows: [
+      ['Desnudo en aire quieto', '1.0', 'Disipación estándar por radiación y convección natural'],
+      ['Ropa ligera interior (1-2 capas)', '1.1', 'Atenuación leve de la pérdida superficial cutánea'],
+      ['Ropa estándar de calle (3-4 capas)', '1.2', 'Barrera térmica moderada sobre torso y extremidades'],
+      ['Prendas gruesas de abrigo de invierno', '1.4', 'Aislamiento elevado que atrapa aire caliente'],
+      ['Bajo edredón nórdico grueso en cama', '1.8', 'Alta retención calórica y retraso del enfriamiento'],
+      ['Sumergido en agua estancada', '0.5', 'Conductividad térmica del agua 24 veces superior al aire'],
+      ['Sumergido en agua corriente fría', '0.35', 'Convección forzada acelerada por flujo líquido']
+    ] },
+    { type: 'title', text: 'Fases Termodinámicas del Proceso Tanatológico', level: 3 },
+    { type: 'comparative', columns: 2, items: [
+      { title: 'Meseta Térmica Post Mortem', description: 'Durante las primeras 1 a 3 horas, la temperatura central rectal desciende muy lentamente mientras los tejidos periféricos ceden calor.', points: ['Establecimiento del gradiente centro a periferia', 'Las fórmulas lineales infraestiman el tiempo aquí', 'Modelada por el término correctivo -0.25 exp(-5kt)'] },
+      { title: 'Descenso Exponencial Rápido', description: 'Una vez establecido el gradiente térmico, el calor se transfiere de forma constante a un ritmo dependiente del peso corporal.', highlight: true, points: ['Máxima sensibilidad analítica', 'Margen de incertidumbre estadística más estrecho', 'Ventana óptima para la termometría forense'] }
+    ] },
+    { type: 'title', text: 'Buenas Prácticas Periciales en la Medición de Temperatura', level: 3 },
+    { type: 'list', items: [
+      '<strong>Medir temperatura rectal profunda:</strong> introducir la sonda termométrica calibrada al menos 8 a 10 cm en la ampolla rectal.',
+      '<strong>Registrar la temperatura ambiente junto al cuerpo:</strong> colocar el termómetro a no más de 10 cm del cadáver.',
+      '<strong>Comprobar la estabilidad del entorno:</strong> registrar si hubo calefacción encendida, ventanas abiertas o exposición solar directa.',
+      '<strong>Evaluar humedad en textiles:</strong> la ropa húmeda incrementa drásticamente la evaporación y exige factores menores.'
+    ] },
+    { type: 'summary', title: 'Resumen Metodológico', items: [
+      'El nomograma de Henssge es el estándar internacionalmente validado para la estimación termométrica de la data de la muerte.',
+      'Siempre debe informarse un intervalo horario con márgenes de desviación típica y no una hora aislada fija.',
+      'Conviene correlacionar la termometría con el examen de rigidez cadavérica, livideces y excitabilidad eléctrica muscular.'
+    ] }
+  ],
+  faq,
+  bibliography,
+  howTo,
+  schemas: [
+    { '@context': 'https://schema.org', '@type': 'SoftwareApplication', name: title, description, applicationCategory: 'ForensicApplication', operatingSystem: 'Any' },
+    { '@context': 'https://schema.org', '@type': 'FAQPage', mainEntity: faq.map((item) => ({ '@type': 'Question', name: item.question, acceptedAnswer: { '@type': 'Answer', text: item.answer } })) },
+    { '@context': 'https://schema.org', '@type': 'HowTo', name: title, step: howTo.map((step) => ({ '@type': 'HowToStep', name: step.name, text: step.text })) }
+  ]
+};