;; imam-roster -- mosque imam scheduling roster
(define-data-var slot-count uint u0)
(define-map slots uint { imam: principal, mosque: (string-ascii 30), day: uint, prayer: (string-ascii 10) })
(define-public (add-slot (mosque (string-ascii 30)) (day uint) (prayer (string-ascii 10)))
(let ((id (+ (var-get slot-count) u1)))
(var-set slot-count id)
(map-set slots id { imam: tx-sender, mosque: mosque, day: day, prayer: prayer }) (ok id)))
(define-read-only (get-slot (id uint)) (map-get? slots id))
(define-read-only (get-count) (var-get slot-count))