Skip to content

Instantly share code, notes, and snippets.

@sogaiu

sogaiu/product.janet

Created April 9, 2025 05:41
Show Gist options
  • Save sogaiu/15cb89d1f9505580e9f96b63d7ec9ccb to your computer and use it in GitHub Desktop.
Save sogaiu/15cb89d1f9505580e9f96b63d7ec9ccb to your computer and use it in GitHub Desktop.
Download ZIP
on calling something a hack...
Raw
product.janet
(defn int-product
[x y]
(defn helper
[counter total]
(if (zero? counter)
total
(helper (dec counter) (+ total y))))
#
(helper x 0))
(comment
(int-product 2 3)
# =>
6
)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment