std: 마찰 보고의 F1/F3/F6/F7 처리 — 292줄이 244줄로

문법은 건드리지 않았다. 표본이 한 사람이 쓴 300줄 하나뿐인데 되돌리기
비싼 축을 움직일 수는 없다. std 보강만 했다.

추가: List.first/nth, String.join, std/option.cool, std/result.cool.

samples/app 재작성 결과 config.cool 196 → 148줄. head_or, second_or,
Pick, take_at, first_text, first_entry가 통째로 사라졌다. 예측 40줄,
실제 48줄 — F1의 값이 확인됐다.

F3은 줄 수로 값이 안 보인다. main.cool은 96줄 그대로다. 4단 중첩
String.concat이 4줄짜리 String.join 배열이 됐으니 줄 수가 같다. 읽기는
확실히 나아졌다. 줄 수는 읽기 좋음의 대리 지표일 뿐이고 여기서 그 대리가
깨진다 — 다음 개밥 먹기는 다른 것을 재야 한다.

F7: Interp.implemented와 std/*.cool 선언이 서로를 덮는지 테스트가 양방향
으로 검사한다. 어긋나면 빌드가 깨진다.

Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_019ZVDeU6KLuUVL3gs18Hm3E

samples/app/main.cool

@@ -8,6 +8,7 @@ import "config" as Cfg
 import "cool.dev/std/list" as List
 import "cool.dev/std/string" as String
 import "cool.dev/std/int" as Int
+import "cool.dev/std/option" as Option
 
 pub capability Console {
     fn print(s: String) effects {Console.print}
@@ -24,14 +25,17 @@ pub capability Args {
 pub fn report(c: Console, cfg: Cfg.Config) effects {Console.print} {
     c.print("설정")
     List.each(cfg.entries, fn(e) {
-        c.print(String.concat("  ", String.concat(e.key,
-                String.concat(" = ", String.concat(Cfg.show_value(e.value),
-                String.concat("   (", String.concat(Cfg.type_name(e.value), ")")))))))
+        c.print(String.join("", [
+            "  ", e.key, " = ", Cfg.show_value(e.value),
+            "   (", Cfg.type_name(e.value), ")",
+        ]))
     })
 
     c.print("")
-    c.print(String.concat("항목 ", String.concat(Int.show(List.len(cfg.entries)),
-            String.concat("개, 문제 ", String.concat(Int.show(List.len(cfg.problems)), "개")))))
+    c.print(String.join("", [
+        "항목 ", Int.show(List.len(cfg.entries)),
+        "개, 문제 ", Int.show(List.len(cfg.problems)), "개",
+    ]))
 
     if List.is_empty(cfg.problems) {
         c.print("문제 없음")
@@ -39,8 +43,7 @@ pub fn report(c: Console, cfg: Cfg.Config) effects {Console.print} {
         c.print("")
         c.print("문제")
         List.each(cfg.problems, fn(p) {
-            c.print(String.concat("  ", String.concat(Int.show(p.line),
-                    String.concat("행: ", p.message))))
+            c.print(String.join("", [ "  ", Int.show(p.line), "행: ", p.message ]))
         })
     }
 }
@@ -56,25 +59,22 @@ pub fn check_known(c: Console, cfg: Cfg.Config) effects {Console.print} {
 
 pub fn show_int(c: Console, cfg: Cfg.Config, key: String) effects {Console.print} {
     match Cfg.get_int(cfg, key) {
-        Ok(n) => c.print(String.concat("  ", String.concat(key,
-                 String.concat(" = ", Int.show(n))))),
+        Ok(n) => c.print(String.join("", [ "  ", key, " = ", Int.show(n) ])),
         Err(m) => c.print(String.concat("  ", m)),
     }
 }
 
 pub fn show_flag(c: Console, cfg: Cfg.Config, key: String) effects {Console.print} {
     match Cfg.get_flag(cfg, key) {
-        Ok(b) => c.print(String.concat("  ", String.concat(key,
-                 String.concat(" = ", if b { "true" } else { "false" })))),
+        Ok(b) => c.print(String.join("", [
+            "  ", key, " = ", if b { "true" } else { "false" },
+        ])),
         Err(m) => c.print(String.concat("  ", m)),
     }
 }
 
 pub fn first_arg(xs: List[String]) -> Result[String, String] {
-    match Cfg.first_text(xs) {
-        Some(p) => Ok(p),
-        None => Err("설정 파일 경로가 필요합니다"),
-    }
+    Option.ok_or(List.first(xs), "설정 파일 경로가 필요합니다")
 }
 
 pub fn main(c: Console, f: File, a: Args)