date ... +Date

date - вычисляет дату (григорианского) календаря. Она представлена ​​как номер дня, начиная с первого марта 0 года нашей эры. При вызове без аргументов возвращается текущая дата. При вызове с аргументом T возвращается текущее всемирное координированное время (UTC). При вызове с одним числом dat оно принимается как дата и возвращается список с соответствующим годом, месяцем и днем. При вызове с тремя числами (или списком из трех чисел) для года, месяца и дня возвращается соответствующая дата (или NIL, если они не представляют собой допустимую дату).

+Date - класс для календарных дат (вычисляемых по date), подкласс +Number.

day - возвращает название дня для заданной даты dat на языке текущей локали. Если задан lst, это должен быть список альтернативных названий дней недели.

dat$ - форматирует дату dat в формате ISO с необязательным символом-разделителем sym

$dat - преобразует строку sym1 в формате ISO в дату, при необходимости используя символ-разделитель sym2

datStr - форматирует дату в соответствии с текущей локалью. Если flg не равен NIL, год будет отформатирован по модулю 100.

expDat - расширяет строку даты в соответствии с текущей локалью (разделитель и порядок года, месяца и дня). Принимает сокращенный ввод без разделителя и только с днем, или днем ​​и месяцем, или днем, месяцем и годом текущего столетия. Одна точка "." расширяется до "сегодня", а число со знаком до даты, указанной в указанном количестве дней в прошлом или будущем.

strDat - преобразует строку sym в формате даты текущей локали в дату.

datSym - форматирует дату dat в символьном формате (DDmmmYY).

https://picolisp.tiddlyhost.com/#date