(use atom
     http-client)

(define FEED
  (with-input-from-request
    "https://mastodon.social/users/usercount.atom"
    #f
    (lambda [] (read-atom-doc (current-input-port)))))

(define (main -)
    (print (feed? FEED))) ;=> #f -- but WHY???