freelang-editor 11.7.4

package/examples/patterns/README.md

@@ -0,0 +1,344 @@
+# FreeLang v11 패턴 예제 모음
+
+**목적**: AI가 일반적인 코딩 패턴을 배우고, 이를 바탕으로 버그 없는 코드를 생성하도록 돕기
+
+**대상**: AI 에이전트, 개발자 (AI 입장에서 학습하려는 사람)
+
+**예제 수**: 10개 (총 50+ 패턴)
+
+---
+
+## 📚 패턴 목록
+
+### 1️⃣ [map, filter, reduce 기본 사용법](./01-map-filter-reduce.fl)
+**주제**: 함수형 데이터 처리
+
+**주요 패턴**:
+- `(map fn list)` — 요소 변환
+- `(filter predicate list)` — 조건 필터링
+- `(reduce fn init list)` — 누적 계산
+- 조합 활용 (map + filter)
+- 복잡한 변환
+
+**AI 학습 포인트**:
+- ✅ 함수형 프로그래밍의 기초
+- ✅ 함수 인자 순서 (함수가 먼저!)
+- ✅ case 문으로 등급 결정
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/01-map-filter-reduce.fl
+```
+
+---
+
+### 2️⃣ [에러 처리 (try-catch)](./02-error-handling.fl)
+**주제**: 안전한 에러 처리
+
+**주요 패턴**:
+- 기본 `try-catch`
+- 중첩된 에러 처리
+- 에러 무시 + 기본값 반환
+- 명시적 검증 + 에러 발생
+- Promise 기반 비동기 에러
+- 다중 에러 처리
+
+**AI 학습 포인트**:
+- ✅ try-catch는 필수
+- ✅ 에러 메시지는 명확하게
+- ✅ 검증 먼저, 처리 나중
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/02-error-handling.fl
+```
+
+---
+
+### 3️⃣ [타입 검증 (Type Checking)](./03-type-validation.fl)
+**주제**: 버그 예방을 위한 타입 검증
+
+**주요 패턴**:
+- 기본 타입 검증 (number?, string?, etc.)
+- 복합 타입 검증 (배열 요소)
+- nil 안전 처리 (Optional)
+- 조건부 타입 검증
+- 타입 어서션 (assert)
+- 배열 요소 필터링
+
+**AI 학습 포인트**:
+- ✅ 모든 외부 입력은 검증
+- ✅ nil은 자주 발생 → 항상 체크
+- ✅ 타입 강제로 버그 방지
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/03-type-validation.fl
+```
+
+---
+
+### 4️⃣ [상태 관리 (State Management)](./04-state-management.fl)
+**주제**: AI 에이전트의 메모리/컨텍스트 관리
+
+**주요 패턴**:
+- 상태 전이 (state transition)
+- 상태 업데이트
+- 상태 완료
+- 상태 머신 (state machine)
+- 상태 조회 헬퍼
+
+**AI 학습 포인트**:
+- ✅ 불변성: 상태는 복사본으로 수정
+- ✅ merge로 상태 갱신
+- ✅ case로 상태별 처리
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/04-state-management.fl
+```
+
+---
+
+### 5️⃣ [API 통합 (REST API)](./05-api-integration.fl)
+**주제**: 외부 API 호출 및 처리
+
+**주요 패턴**:
+- 기본 GET 요청
+- 쿼리 파라미터
+- 인증 헤더
+- POST 요청
+- 복잡한 API 플로우
+- 재시도 로직 (Retry)
+- 병렬 호출
+- 응답 검증
+- 배치 처리
+
+**AI 학습 포인트**:
+- ✅ 항상 try-catch로 감싸기
+- ✅ 응답은 nil 체크
+- ✅ 재시도는 지수 백오프
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/05-api-integration.fl
+```
+
+---
+
+### 6️⃣ [데이터베이스 작업 (Database)](./06-database-operations.fl)
+**주제**: 데이터베이스 쿼리 및 조작
+
+**주요 패턴**:
+- SELECT (조회)
+- WHERE 조건
+- INSERT (삽입)
+- UPDATE (수정)
+- DELETE (삭제)
+- 트랜잭션
+- 집계 함수 (COUNT, SUM, AVG)
+- 페이지네이션
+- 조인 쿼리
+- 결과 매핑
+
+**AI 학습 포인트**:
+- ✅ SQL은 파라미터 바인딩
+- ✅ 트랜잭션은 한 블록으로
+- ✅ 결과는 map으로 가공
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/06-database-operations.fl
+```
+
+---
+
+### 7️⃣ [문자열 처리 (String Processing)](./07-string-processing.fl)
+**주제**: 텍스트 데이터 분석 및 변환
+
+**주요 패턴**:
+- 문자열 연결
+- 분할 및 처리
+- 검색 및 치환
+- 대소문자 변환
+- 공백 제거
+- 포함 여부 확인
+- 이메일/URL 검증
+- 문자열 템플릿
+- 유효성 검사
+- 문자열 분류
+
+**AI 학습 포인트**:
+- ✅ str()로 연결
+- ✅ str-split()로 파싱
+- ✅ str-includes()로 검증
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/07-string-processing.fl
+```
+
+---
+
+### 8️⃣ [데이터 변환 (Data Transformation)](./08-data-transformation.fl)
+**주제**: 한 형식에서 다른 형식으로 변환
+
+**주요 패턴**:
+- 배열 ↔ 맵 변환
+- 중첩 구조 평탄화
+- 그룹핑 (Group By)
+- 데이터 병합
+- 필드 선택 (Pick)
+- 필드 제외 (Omit)
+- 정규화 (Normalize)
+- 조건부 변환
+- 요약 (Summary)
+
+**AI 학습 포인트**:
+- ✅ map으로 구조 변환
+- ✅ filter로 선택적 추출
+- ✅ reduce로 통합 계산
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/08-data-transformation.fl
+```
+
+---
+
+### 9️⃣ [의사결정 로직 (Decision Logic)](./09-decision-logic.fl)
+**주제**: 조건부 처리 및 분기
+
+**주요 패턴**:
+- if-else 중첩
+- and/or 조건
+- case 문
+- 기본값 처리
+- 조건부 필터링
+- 조건부 변환
+- 우선순위 선택
+- 조건부 액션
+- early return (throw)
+
+**AI 학습 포인트**:
+- ✅ case는 깔끔한 코드
+- ✅ and/or로 복합 조건
+- ✅ throw로 early return
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/09-decision-logic.fl
+```
+
+---
+
+### 🔟 [에이전트 오케스트레이션 (Agent Orchestration)](./10-agent-orchestration.fl)
+**주제**: AI 에이전트가 복잡한 작업을 조화롭게 실행
+
+**주요 패턴**:
+- 작업 큐 관리
+- 작업 실행 엔진
+- 조건부 작업 흐름
+- 에이전트 실행 루프
+- 컨텍스트 관리
+- 결과 수집
+- 병렬 작업
+- 에러 복구
+- 작업 의존성
+- 에이전트 모니터링
+
+**AI 학습 포인트**:
+- ✅ 상태 머신으로 흐름 제어
+- ✅ reduce로 누적 실행
+- ✅ 에러 처리는 필수
+
+**실행 방법**:
+```bash
+node bootstrap.js run examples/patterns/10-agent-orchestration.fl
+```
+
+---
+
+## 🎯 추천 학습 순서
+
+### 초급 (기초 다지기)
+1. map, filter, reduce 기본
+2. 에러 처리
+3. 타입 검증
+
+### 중급 (실무 패턴)
+4. 상태 관리
+5. 문자열 처리
+6. 의사결정 로직
+
+### 고급 (복잡한 작업)
+7. API 통합
+8. 데이터베이스
+9. 데이터 변환
+10. 에이전트 오케스트레이션
+
+---
+
+## 💡 각 패턴의 실행 방법
+
+### 전체 실행
+```bash
+cd examples/patterns
+for f in *.fl; do
+  echo "=== $f ==="
+  node ../../bootstrap.js run "$f"
+done
+```
+
+### 특정 패턴만 실행
+```bash
+node bootstrap.js run examples/patterns/01-map-filter-reduce.fl
+```
+
+### 테스트 포함
+```bash
+npm test -- --testPathPattern="patterns"
+```
+
+---
+
+## 🔍 패턴 내 검색
+
+각 파일의 "패턴 A, B, C..." 를 찾고 싶다면:
+
+```bash
+grep -n "패턴 A" examples/patterns/*.fl
+grep -n "defun" examples/patterns/01-map-filter-reduce.fl
+```
+
+---
+
+## ✨ 사용 팁
+
+1. **복사 & 수정**: 각 패턴을 복사해서 자신의 코드에 맞게 수정
+2. **조합**: 여러 패턴을 조합해서 복잡한 로직 구성
+3. **검증**: 생성한 코드를 이 패턴들과 비교해 맞는지 확인
+4. **확장**: 새 패턴이 생기면 여기에 추가
+
+---
+
+## 📞 AI를 위한 요약
+
+**이 10개 패턴을 마스터하면**:
+- ✅ 80%의 일반적인 AI 작업 가능
+- ✅ 버그 없는 코드 생성 가능
+- ✅ 복잡한 에이전트 로직 작성 가능
+
+**금지된 패턴** (자주 틀림):
+- ❌ `(map [1 2 3] fn)` — 순서 틀림
+- ❌ `(if x then)` — else 없음
+- ❌ 변수 수정 시도 — 불변성 위반
+- ❌ 에러 처리 없음 — 항상 try-catch
+
+---
+
+## 🚀 다음 단계
+
+- [stdlib 참조](../docs/STDLIB_REFERENCE.md) 읽기
+- [AI 학습 경로](../docs/AI_LEARNING_PATH.md) 학습
+- 실제 AI 코드 생성 및 테스트

package/examples/simple-server.fl

@@ -0,0 +1,29 @@
+;; FreeLang v11 — 간단한 HTTP 서버 예제
+;; 실행: node bootstrap.js run examples/simple-server.fl
+
+;; GET / — 환영 HTML
+(defn handle-index [$req]
+  (server-html "<h1>FreeLang 서버!</h1><p><a href='/api/hello'>API 테스트</a></p>"))
+
+;; GET /api/hello — JSON 응답
+(defn handle-hello [$req]
+  (server-json {"status" "ok" "message" "안녕하세요!" "version" "v11"}))
+
+;; GET /api/greet/:name — 경로 파라미터
+(defn handle-greet [$req]
+  (let [[$name (get (get $req "params") "name")]]
+    (server-json {"status" "ok" "greeting" (str "안녕하세요, " $name "님!")})))
+
+;; POST /api/echo — body 그대로 돌려주기
+(defn handle-echo [$req]
+  (let [[$body (get $req "body")]]
+    (server-json {"status" "ok" "echo" $body})))
+
+;; 라우트 등록
+(server-get "/" "handle-index")
+(server-get "/api/hello" "handle-hello")
+(server-get "/api/greet/:name" "handle-greet")
+(server-post "/api/echo" "handle-echo")
+
+(server-start 40099)
+(println "서버 시작: http://localhost:40099")

package/examples/tables-app.fl

@@ -0,0 +1,219 @@
+;; FreeLang v11 — 10개 테이블 관리 앱
+;; 실행: node bootstrap.js run examples/tables-app.fl
+
+(define DB "/root/kim/freelang-v11/data/tables-app.db")
+
+;; ─────────────────────────────────────────
+;; DB 초기화 — 10개 테이블 생성
+;; ─────────────────────────────────────────
+(defn init-db []
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS users (id INTEGER PRIMARY KEY AUTOINCREMENT, name TEXT, email TEXT, created_at TEXT)" [])
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS products (id INTEGER PRIMARY KEY AUTOINCREMENT, name TEXT, price REAL, stock INTEGER, created_at TEXT)" [])
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS categories (id INTEGER PRIMARY KEY AUTOINCREMENT, name TEXT, description TEXT, created_at TEXT)" [])
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS orders (id INTEGER PRIMARY KEY AUTOINCREMENT, user_name TEXT, product TEXT, qty INTEGER, created_at TEXT)" [])
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS employees (id INTEGER PRIMARY KEY AUTOINCREMENT, name TEXT, department TEXT, salary INTEGER, created_at TEXT)" [])
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS departments (id INTEGER PRIMARY KEY AUTOINCREMENT, name TEXT, manager TEXT, budget INTEGER, created_at TEXT)" [])
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS suppliers (id INTEGER PRIMARY KEY AUTOINCREMENT, company TEXT, contact TEXT, country TEXT, created_at TEXT)" [])
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS customers (id INTEGER PRIMARY KEY AUTOINCREMENT, name TEXT, phone TEXT, address TEXT, created_at TEXT)" [])
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS inventory (id INTEGER PRIMARY KEY AUTOINCREMENT, item TEXT, qty INTEGER, location TEXT, created_at TEXT)" [])
+  (db-exec $DB "CREATE TABLE IF NOT EXISTS reviews (id INTEGER PRIMARY KEY AUTOINCREMENT, product TEXT, rating INTEGER, comment TEXT, created_at TEXT)" []))
+
+(init-db)
+
+;; ─────────────────────────────────────────
+;; HTML 공통 스타일
+;; ─────────────────────────────────────────
+(defn page-css []
+  "body{font-family:sans-serif;max-width:1200px;margin:0 auto;padding:20px;background:#f5f5f5}
+  h1{color:#333;border-bottom:2px solid #4CAF50;padding-bottom:10px}
+  h2{color:#555;font-size:15px;margin:0 0 8px}
+  .section{background:#fff;border-radius:8px;padding:16px;margin-bottom:20px;box-shadow:0 1px 4px rgba(0,0,0,.1)}
+  table{width:100%;border-collapse:collapse;font-size:13px}
+  th{background:#4CAF50;color:#fff;padding:7px 10px;text-align:left}
+  td{padding:6px 10px;border-bottom:1px solid #eee}
+  tr:hover td{background:#f9f9f9}
+  form{display:flex;gap:8px;flex-wrap:wrap;margin-top:10px}
+  input{padding:6px 10px;border:1px solid #ccc;border-radius:4px;font-size:13px;flex:1;min-width:100px}
+  button{padding:6px 16px;background:#4CAF50;color:#fff;border:none;border-radius:4px;cursor:pointer;font-size:13px}
+  button:hover{background:#388E3C}
+  .empty{color:#aaa;font-size:13px;padding:8px 0}
+  nav{margin-bottom:20px}
+  nav a{margin-right:12px;color:#4CAF50;text-decoration:none;font-size:13px}
+  nav a:hover{text-decoration:underline}")
+
+;; ─────────────────────────────────────────
+;; 테이블 HTML 렌더링 헬퍼
+;; ─────────────────────────────────────────
+(defn render-table [$rows $cols]
+  (if (= (length $rows) 0)
+    "<p class='empty'>데이터 없음</p>"
+    (str
+      "<table><tr>"
+      (join (map (fn [$c] (str "<th>" $c "</th>")) $cols) "")
+      "</tr>"
+      (join (map (fn [$row]
+        (str "<tr>"
+          (join (map (fn [$c] (str "<td>" (or (get $row $c) "-") "</td>")) $cols) "")
+          "</tr>")) $rows) "")
+      "</table>")))
+
+;; ─────────────────────────────────────────
+;; GET / — 메인 대시보드
+;; ─────────────────────────────────────────
+(defn handle-main [$req]
+  (let [[$users     (db-query $DB "SELECT * FROM users ORDER BY id DESC LIMIT 10" [])]
+        [$products  (db-query $DB "SELECT * FROM products ORDER BY id DESC LIMIT 10" [])]
+        [$categories (db-query $DB "SELECT * FROM categories ORDER BY id DESC LIMIT 10" [])]
+        [$orders    (db-query $DB "SELECT * FROM orders ORDER BY id DESC LIMIT 10" [])]
+        [$employees (db-query $DB "SELECT * FROM employees ORDER BY id DESC LIMIT 10" [])]
+        [$departments (db-query $DB "SELECT * FROM departments ORDER BY id DESC LIMIT 10" [])]
+        [$suppliers (db-query $DB "SELECT * FROM suppliers ORDER BY id DESC LIMIT 10" [])]
+        [$customers (db-query $DB "SELECT * FROM customers ORDER BY id DESC LIMIT 10" [])]
+        [$inventory (db-query $DB "SELECT * FROM inventory ORDER BY id DESC LIMIT 10" [])]
+        [$reviews   (db-query $DB "SELECT * FROM reviews ORDER BY id DESC LIMIT 10" [])]]
+    (server-html (str
+      "<!DOCTYPE html><html><head><meta charset=utf-8>"
+      "<title>FreeLang 테이블 관리</title>"
+      "<style>" (page-css) "</style></head><body>"
+      "<h1>FreeLang v11 — 10개 테이블 관리</h1>"
+
+      ;; 1. 사용자
+      "<div class='section'><h2>1. 사용자 (users)</h2>"
+      (render-table $users ["id" "name" "email" "created_at"])
+      "<form method=POST action='/add/users'>"
+      "<input name=name placeholder='이름' required>"
+      "<input name=email placeholder='이메일' required>"
+      "<button>추가</button></form></div>"
+
+      ;; 2. 상품
+      "<div class='section'><h2>2. 상품 (products)</h2>"
+      (render-table $products ["id" "name" "price" "stock" "created_at"])
+      "<form method=POST action='/add/products'>"
+      "<input name=name placeholder='상품명' required>"
+      "<input name=price placeholder='가격' required>"
+      "<input name=stock placeholder='재고' required>"
+      "<button>추가</button></form></div>"
+
+      ;; 3. 카테고리
+      "<div class='section'><h2>3. 카테고리 (categories)</h2>"
+      (render-table $categories ["id" "name" "description" "created_at"])
+      "<form method=POST action='/add/categories'>"
+      "<input name=name placeholder='카테고리명' required>"
+      "<input name=description placeholder='설명'>"
+      "<button>추가</button></form></div>"
+
+      ;; 4. 주문
+      "<div class='section'><h2>4. 주문 (orders)</h2>"
+      (render-table $orders ["id" "user_name" "product" "qty" "created_at"])
+      "<form method=POST action='/add/orders'>"
+      "<input name=user_name placeholder='주문자' required>"
+      "<input name=product placeholder='상품' required>"
+      "<input name=qty placeholder='수량' required>"
+      "<button>추가</button></form></div>"
+
+      ;; 5. 직원
+      "<div class='section'><h2>5. 직원 (employees)</h2>"
+      (render-table $employees ["id" "name" "department" "salary" "created_at"])
+      "<form method=POST action='/add/employees'>"
+      "<input name=name placeholder='이름' required>"
+      "<input name=department placeholder='부서' required>"
+      "<input name=salary placeholder='급여' required>"
+      "<button>추가</button></form></div>"
+
+      ;; 6. 부서
+      "<div class='section'><h2>6. 부서 (departments)</h2>"
+      (render-table $departments ["id" "name" "manager" "budget" "created_at"])
+      "<form method=POST action='/add/departments'>"
+      "<input name=name placeholder='부서명' required>"
+      "<input name=manager placeholder='매니저' required>"
+      "<input name=budget placeholder='예산' required>"
+      "<button>추가</button></form></div>"
+
+      ;; 7. 공급업체
+      "<div class='section'><h2>7. 공급업체 (suppliers)</h2>"
+      (render-table $suppliers ["id" "company" "contact" "country" "created_at"])
+      "<form method=POST action='/add/suppliers'>"
+      "<input name=company placeholder='회사명' required>"
+      "<input name=contact placeholder='담당자' required>"
+      "<input name=country placeholder='국가' required>"
+      "<button>추가</button></form></div>"
+
+      ;; 8. 고객
+      "<div class='section'><h2>8. 고객 (customers)</h2>"
+      (render-table $customers ["id" "name" "phone" "address" "created_at"])
+      "<form method=POST action='/add/customers'>"
+      "<input name=name placeholder='이름' required>"
+      "<input name=phone placeholder='전화번호' required>"
+      "<input name=address placeholder='주소' required>"
+      "<button>추가</button></form></div>"
+
+      ;; 9. 재고
+      "<div class='section'><h2>9. 재고 (inventory)</h2>"
+      (render-table $inventory ["id" "item" "qty" "location" "created_at"])
+      "<form method=POST action='/add/inventory'>"
+      "<input name=item placeholder='품목' required>"
+      "<input name=qty placeholder='수량' required>"
+      "<input name=location placeholder='위치' required>"
+      "<button>추가</button></form></div>"
+
+      ;; 10. 리뷰
+      "<div class='section'><h2>10. 리뷰 (reviews)</h2>"
+      (render-table $reviews ["id" "product" "rating" "comment" "created_at"])
+      "<form method=POST action='/add/reviews'>"
+      "<input name=product placeholder='상품' required>"
+      "<input name=rating placeholder='평점(1-5)' required>"
+      "<input name=comment placeholder='내용' required>"
+      "<button>추가</button></form></div>"
+
+      "</body></html>"))))
+
+;; ─────────────────────────────────────────
+;; POST /add/:table — DB 저장 후 리다이렉트
+;; ─────────────────────────────────────────
+(defn handle-add [$req]
+  (let [[$tbl  (get (get $req "params") "table")]
+        [$body (get $req "body")]
+        [$ts   (now-iso)]]
+    (do
+      (cond
+        (= $tbl "users")
+          (db-exec $DB "INSERT INTO users (name,email,created_at) VALUES (?,?,?)"
+            [(get $body "name") (get $body "email") $ts])
+        (= $tbl "products")
+          (db-exec $DB "INSERT INTO products (name,price,stock,created_at) VALUES (?,?,?,?)"
+            [(get $body "name") (get $body "price") (get $body "stock") $ts])
+        (= $tbl "categories")
+          (db-exec $DB "INSERT INTO categories (name,description,created_at) VALUES (?,?,?)"
+            [(get $body "name") (get $body "description") $ts])
+        (= $tbl "orders")
+          (db-exec $DB "INSERT INTO orders (user_name,product,qty,created_at) VALUES (?,?,?,?)"
+            [(get $body "user_name") (get $body "product") (get $body "qty") $ts])
+        (= $tbl "employees")
+          (db-exec $DB "INSERT INTO employees (name,department,salary,created_at) VALUES (?,?,?,?)"
+            [(get $body "name") (get $body "department") (get $body "salary") $ts])
+        (= $tbl "departments")
+          (db-exec $DB "INSERT INTO departments (name,manager,budget,created_at) VALUES (?,?,?,?)"
+            [(get $body "name") (get $body "manager") (get $body "budget") $ts])
+        (= $tbl "suppliers")
+          (db-exec $DB "INSERT INTO suppliers (company,contact,country,created_at) VALUES (?,?,?,?)"
+            [(get $body "company") (get $body "contact") (get $body "country") $ts])
+        (= $tbl "customers")
+          (db-exec $DB "INSERT INTO customers (name,phone,address,created_at) VALUES (?,?,?,?)"
+            [(get $body "name") (get $body "phone") (get $body "address") $ts])
+        (= $tbl "inventory")
+          (db-exec $DB "INSERT INTO inventory (item,qty,location,created_at) VALUES (?,?,?,?)"
+            [(get $body "item") (get $body "qty") (get $body "location") $ts])
+        (= $tbl "reviews")
+          (db-exec $DB "INSERT INTO reviews (product,rating,comment,created_at) VALUES (?,?,?,?)"
+            [(get $body "product") (get $body "rating") (get $body "comment") $ts])
+        true nil)
+      (server-redirect "/"))))
+
+;; ─────────────────────────────────────────
+;; 라우트 등록
+;; ─────────────────────────────────────────
+(server-get "/" "handle-main")
+(server-post "/add/:table" "handle-add")
+
+(server-start 40102)
+(println "서버 시작: http://localhost:40102")