```clj
(count (conj system-names system-name))
;;or
(-> system-names count inc)
```