From 0ba65186306ecb58bbaf34f0bc52fc27c9562506 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Madeleine=20Sydney=20=C5=9Alaga?= <msyds@deertopia.net>
Date: Sat, 7 Feb 2026 21:32:31 -0700
Subject: [PATCH]

---
 lab1/grammar/korean/MicroResKor.gf | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/lab1/grammar/korean/MicroResKor.gf b/lab1/grammar/korean/MicroResKor.gf
index ac9d6ee..fae4bed 100644
--- a/lab1/grammar/korean/MicroResKor.gf
+++ b/lab1/grammar/korean/MicroResKor.gf
@@ -1,4 +1,4 @@
-resource MicroResKor = open Prelude in {
+resource MicroResKor = open Prelude, Hangul in {
   param
     VForm = Lemma | VPresent | VPast ;
 
@@ -35,4 +35,10 @@ resource MicroResKor = open Prelude in {
 	  VPast => stem + "았어요"
 	  }
       } ;
+
+    blah : Str -> Str
+      = \s -> case s of {
+	_ + "ᅡ" => "아-final" ;
+	_ => "not 아-final"
+      } ;
 }