Public Vars

*' (clj)

function

(*') (*' x) (*' x y) (*' x y & more)

Returns the product of nums. (*') returns 1. Supports arbitrary precision. See also: *

Examples

clojure

(ns clojure.test-clojure.reducers
  (:require [clojure.core.reducers :as r]
            [clojure.test.generative :refer (defspec)]
            [clojure.data.generators :as gen])
  (:use clojure.test))

(defequivtest test-reduce
  [reduce r/reduce identity]
  [+' *'])

hraberg/deuce

(ns deuce.emacs.eval
  (:use [deuce.emacs-lisp :only (defun defvar)])
  (:require [clojure.core :as c]
            [deuce.emacs.alloc :as alloc]
            [deuce.emacs.data :as data]
            [deuce.emacs-lisp.cons :as cons]
            [deuce.emacs-lisp :as el])
  (:import [clojure.lang Var])
  (:refer-clojure :exclude [apply eval macroexpand]))

  This function returns t if (i) the first character of its
  documentation is `*', or (ii) it is customizable (its property list
  contains a non-nil value of `standard-value' or `custom-autoload'), or
  (iii) it is an alias for a user variable.

typedclojure/typedclojure

(ns ^:no-doc typed.ann.clojure
  "Type annotations for the base Clojure distribution."
  #?(:cljs (:require-macros [typed.ann-macros.clojure :as macros]))
  (:require [clojure.core :as cc]
            [typed.clojure :as t]
            #?(:clj [typed.ann-macros.clojure :as macros])
            #?(:clj typed.ann.clojure.jvm) ;; jvm annotations
            #?(:clj clojure.core.typed))
  #?(:clj
     (:import (clojure.lang PersistentHashSet PersistentList
                            APersistentMap #_IPersistentCollection
                            #_ITransientSet
                            IRef)
              (java.util Comparator Collection))))

#?@(:cljs [] :default [
cc/+' (t/IFn [t/AnyInteger :* :-> t/AnyInteger]
             [t/Num :* :-> t/Num])
cc/-' (t/IFn [(t/+ t/AnyInteger) :-> t/AnyInteger]
             [(t/+ t/Num) :-> t/Num])
cc/*' (t/IFn [t/AnyInteger :* :-> t/AnyInteger]
             [t/Num :* :-> t/Num])
])
cc/quot (t/IFn #?(:clj [Long Long :-> Long])
               #?(:clj [(t/U Long Double) (t/U Long Double) :-> Double])
               [t/AnyInteger t/AnyInteger :-> t/AnyInteger] 
               [t/Num t/Num :-> t/Num])

videlalvaro/clochure

[ns clojure.test-clojure.reducers
  [:require (clojure.core.reducers :as r)]
  [:use clojure.test]]

[defequivtest test-reduce
  (reduce r/reduce identity)
  (+' *')]

gershwin/gershwin

(ns clojure.test-clojure.reducers
  (:require [clojure.core.reducers :as r])
  (:use clojure.test))

(defequivtest test-reduce
  [reduce r/reduce identity]
  [+' *'])

clojurecup2014/parade-route

(ns clojure.test-clojure.reducers
  (:require [clojure.core.reducers :as r])
  (:use clojure.test))

 (defequivtest test-reduce
  [reduce r/reduce identity]
  [+' *'])