Skip to content

Instantly share code, notes, and snippets.

(define (table headers #:config [config null] . body)
(table-env
(if (null? config)
(apply tabular headers body)
(apply tabular headers #:config config body))))
@ggVGc
ggVGc / table.rkt
Created April 16, 2023 12:19
default arg
(define (tabular #:config [config null] headers . entries)
(when (null? config)
(set! config
(make-list (length headers) "l")))
@ggVGc
ggVGc / table.rkt
Created April 16, 2023 12:18
table.rkt
#lang racket
(require "latex.rkt")
(provide
table
table-env
tabular)
(define (table #:config [config null] headers . body)
(table-env