+++
title = 2024-05-19
author = ["SouthFox"]
date = 2024-05-19T23:43:00+08:00
lastmod = 2024-05-19T23:59:42+08:00
tags = ["publish"]
draft = false
+++

## Scheme 数据类型 {#scheme-数据类型}

在 [Scheme]({{< relref "../main/20240519235937-scheme.md" >}}) 里定义一个数据类型，声明它的构造函数……参数，以及判断方法，还有 set 方法

```scheme
(define-record-type <vec2>
  (make-vec2 bv)
  vec2?
  (bv vec2-bv))
```