麻烦哪位截取一下图，让我看看什么才算是优雅的代码，不限语言。

大家都是摸鱼的时候吹牛逼才这么说的，你还当真了

自己写的时候，好的代码不需要注释。
看别人的代码，该喷为什么不写注释了。

绝对优雅： https://cdn.jsdelivr.net/gh/alterem/picFB@master/uPic/2023/07/07/C9HP76.png

@alteremliu 想到了睡眠排序

编程之美吧

有没有 Java 项目看看的

代数建模
业务与代码同构

BQN ，APL 之类的语言够不够优雅

自己写的代码永远最优雅，别人写的什么玩意

Prime Sieve in APL (2=+0=(X).|X)/X

linus 在 TED 的一期节目里说了他自己认为有品味的代码：
```
remove_list_entry(entry)
{
// The "indirect" pointer points to the
// *address* of the thing we'll update

indirect = &head;

// Walk the list, looking for the thing that
// points to the entry we want to remove

while ((*indirect) != entry)) {
indirect = &(*indirect)->next;
}

// .. and just remove it
*indirect = entry->next;
}
```

与之相反，不够 good taste 的代码
```
remove_list_entry(entry)
{
prev = NULL;
walk = head;

// Walk the list
while (walk != entry) {
prev = walk;
walk = walk->next;
}

// Remove the entry by updating the
// head or the previous entry
if(!prev) {
head = entry->next;
} else {
prev->next = entry->next;
}
}
```

if error return "OK"

工作中项目代码最大的问题一般都是注释太少，写需求的时候一哪有那么多时间一行行读别人的代码

if true return true

垠神用 parser combinator 写的 lisp parser：

(:: $open
(@or (@~ "(") (@~ "[")))

(:: $close
(@or (@~ ")") (@~ "]")))

(:: $non-parens
(@and (@! $open) (@! $close)))

(::= $parens 'sexp
(@seq $open (@* $sexp) $close))

(:: $sexp
(@+ (@or $parens $non-parens)))

(:: $program $sexp)