From e04276cb2a6eafc5a3af5aa9fa775d025ff9729c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=C3=81lvaro=20Gonz=C3=A1lez?=
 <alvarogonzalezsotillo@gmail.com>
Date: Wed, 5 Nov 2025 12:59:11 +0100
Subject: [PATCH] =?UTF-8?q?a=C3=B1ado=20escalas=20no=20num=C3=A9ricas?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lib/defaults/formulas.d4rt | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

diff --git a/lib/defaults/formulas.d4rt b/lib/defaults/formulas.d4rt
index 00bfd74..b0ea338 100644
--- a/lib/defaults/formulas.d4rt
+++ b/lib/defaults/formulas.d4rt
@@ -120,4 +120,28 @@ Where:
     "d4rtCode": "F = m * a;",
     "tags": ["physics", "mechanics", "newton"]
   },
+
+  // Apgar Score
+  {
+    "name": "Apgar Score",
+    "description": "Newborn health assessment scoring system\n\nScores 0-2 for:\n1. Heart rate\n2. Breathing\n3. Muscle tone\n4. Reflexes\n5. Skin color\nTotal score 0-10",
+    "input": [
+      {"name": "HeartRate", "unit": "integer"},
+      {"name": "Breathing", "unit": "integer"},
+      {"name": "MuscleTone", "unit": "integer"},
+      {"name": "Reflexes", "unit": "integer"},
+      {"name": "SkinColor", "unit": "integer"}
+    ],
+    "output": {"name": "Result", "unit": "Apgar score"},
+    "d4rtCode": """
+      var total = HeartRate + Breathing + MuscleTone + Reflexes + SkinColor;
+      var interpretation = switch (total) {
+        >= 7 => 'Normal',
+        4-6 => 'Requires attention',
+        _ => 'Emergency care needed'
+      };
+      Result = 'Score: \$total - \$interpretation';
+    """,
+    "tags": ["medical", "pediatrics", "assessment"]
+  }
 ]