The SRFI document says:
|~x
week number of year with Monday as first day of week (00...53)
but the reference implementation does:
(cons #\x (lambda (date pad-with port)it is probably a copy and paste error while composing
(display (date->string date tm:locale-short-date-format) port)))