Mercurial > rlm
view src/rlm/light_base.clj @ 9:1065e7d615a4 tip
deactivate some cruft.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Mon, 08 Jul 2013 12:51:12 -0400 |
parents | c7df1ea6fd71 |
children |
line wrap: on
line source
1 (ns rlm.light-base2 {:author "Robert McIntyre"}3 (:refer-clojure :only [])4 (:require [rlm [ns-rlm]]))8 ;;We start with absolutely nothing and build from there9 (rlm.ns-rlm/ns-clear) ;; all we have is [def if ns in-ns].12 (clojure.core/use13 :reload14 '[clojure15 [core16 :only17 [18 ;; object stuff19 extend-type22 *command-line-args* *err* *out* *warn-on-reflection* val name read-line23 ;;REPL24 find-doc doc print-doc print-namespace-doc25 ;;Regexes26 re-pattern re-matcher re-groups re-seq re-matches re-find27 ;; Unsorted28 meta type with-meta vary-meta defmacro str let binding with-bindings bound-fn bound-fn* eval29 time macroexpand-1 macroexpand destructure comment test rand rand-int subs hash30 definline alter-var-root format printf defonce refer-clojure gen-class load letfn31 gen-interface definterface reify munge defrecord deftype extenders defprotocol32 extend extend-protocol slurp clojure-version char assert read33 ;; Printing34 print-method print-dup newline flush print println prn with-in-str with-out-str35 print-str println-str *print-length* *print-level* print-ctor primitives-classnames36 ;;Agents37 agent send send-off release-pending-sends38 add-watch remove-watch agent-error restart-agent set-error-handler! error-handler39 set-error-mode! error-mode shutdown-agents40 ;;Ref41 ref deref42 ;;Atom43 atom swap! compare-and-set! reset! set-validator! get-validator alter-meta!44 reset-meta! commute alter ref-set ref-history-count ref-min-history ref-max-history45 ensure sync dosync46 ;;MultiMethods47 defmulti defmethod remove-all-methods remove-method prefer-method48 methods get-method prefers49 ;;Numerics50 inc dec rem quot rationalize mod numerator denominator51 ;;Bits52 bit-and bit-or bit-xor bit-and-not bit-clear bit-set53 bit-flip bit-test bit-shift-left bit-shift-right54 ;; Logic55 not =56 ;; Creation57 symbol gensym keyword int declare num long float double short byte boolean58 bigint bigdec transient persistent! assoc!59 ;; Lists60 list list* rest next cons first second last butlast61 ;; Maps62 hash-map sorted-map sorted-map-by find select-keys keys vals63 merge merge-with zipmap create-struct defstruct struct-map struct get-in64 assoc-in update-in map-indexed key65 ;; Sets66 set sorted-set sorted-set-by disj split-at split-with67 ;; Vectors68 vector vec subvec vector-of69 ;; Arrays70 to-array into-array alength aclone aget aset aset-int aset-long71 aset-boolean aset-float aset-double aset-short aset-long aset-byte aset-char72 aset-int make-array to-array-2d amap areduce boolean-array byte-array char-array73 short-array double-array object-array int-array long-array booleans chars74 shorts floats ints doubles longs partition-all75 ;; Seqs76 lazy-seq nth rseq reverse concat peek pop sequence every? not-every? some77 not-any? take take-while drop drop-last take-last drop-while cycle repeat78 replicate iterate range line-seq sort sort-by partition doseq dorun doall79 take-nth interleave lazy-cat tree-seq file-seq xml-seq distinct80 replace subseq rsubseq interpose seque not-empty flatten group-by count81 partition-by frequencies shuffle82 ;; Functions83 fn defn defn- apply complement constantly identity comp juxt partial repeatedly84 trampoline memoize pmap pcalls pvalues fnil85 ;; List Comprehensions86 reduce reductions map mapcat filter remove keep keep-indexed for87 ;; Predicates88 instance? seq? char? string? map? vector? nil?89 false? true? symbol? keyword? delay? future? future-done?90 even? odd? contains? number? integer? ratio? decimal? reversible?91 float? rational? special-symbol? var? class? bound? thread-bound? counted?92 distinct? empty? coll? list? set? ifn? fn? associative? sequential? sorted?93 extends? satisfies? future-cancelled?94 comparator95 ;; Comparason96 compare not= identical? ==97 ;; Control Flow98 when when-not cond delay force if-not and or locking -> ->> while case99 if-let when-let dotimes await await-for with-open doto loop condp future-call100 future future-cancel promise deliver101 ;;Namespaces102 create-ns find-ns remove-ns all-ns the-ns ns-name ns-map ns-unmap ns-publics103 ns-imports ns-interns refer ns-refers alias ns-aliases ns-unalias ns-resolve104 resolve ns require use loaded-libs compile intern namespace-munge105 ;; Java106 .. import class enumeration-seq107 ;;Objects108 bases make-hierarchy supers isa? parents ancestors descendants derive underive109 ;; Symbols110 *ns* *1 *2 *3 *e *compile-path*111 ;; Proxies112 get-proxy-class construct-proxy init-proxy update-proxy proxy-mappings proxy113 proxy-super bean114 ;; Vars115 var-get117 ]]]120 '[rlm121 [function-utils :only [mix defmix runonce]]122 [rlm-commands :only [undef ns-reset ns-nuke reload keymap-clojure keymap-normal rlm]]123 [ns-rlm :only [ns-clear ns-clone ls]]124 [play-all :only [play-all-music]]125 [shell-inspect :only [command-line?]]126 [shell-write :only [sw]]127 [classpath-utils :only [classpath add-to-classpath]]128 [dreams :only [megadef megaundef silence]]129 [map-utils :only [map-keys map-vals filter-keys filter-vals]]130 [decorators :only [preserve-meta]]131 [visualize :only [visual]]132 [identify :only [identify]]133 [push :only [push-gen push]]134 ]135 '[coderloop136 [utils :only [read-integer read-big-integer read-integers trans-print digits]]137 [export-files :only [export-archive]]]139 '[sunil140 [curry :only [decorate curry defn-decorated]]]142 '[clojure.contrib143 [import-static :only [import-static]]144 [combinatorics :only [cartesian-product subsets selections145 permutations lex-permutations combinations]]146 [duck-streams :only [file-str read-lines]]147 [str-utils :only [re-split re-gsub str-join]]148 [seq :only [separate indexed rotations find-first positions]]149 [math :only [expt round gcd lcm floor ceil]]150 [repl-utils :only [show expression-info]]151 [def :only [defn-memo defvar defmacro-]]154 ]156 '[clojure.contrib.generic157 [arithmetic :only [+ - / *]]158 [collection :only [assoc conj dissoc get empty into seq]]159 [comparison :only [pos? neg? zero? > < <= >= max min]]160 [math-functions :only161 [sqr approx= conjugate sgn acos asin atan atan2162 cos exp log pow rint sin tan]]163 [functor :only [fmap]]]165 ;; '[letd :only [with-separator display-local-bindings letd]]167 '[clojure168 [repl :only [source]]]170 '[clojure.java171 [javadoc :only [javadoc add-local-javadoc]]]173 )175 ;;java stuff177 (import '[java.lang ProcessBuilder Enum SuppressWarnings Throwable178 InterruptedException Thread$UncaughtExceptionHandler RuntimeException179 Thread$State ArrayIndexOutOfBoundsException IllegalAccessError Process180 SecurityException InstantiationException ThreadGroup System181 EnumConstantNotPresentException OutOfMemoryError Double Package182 ExceptionInInitializerError RuntimePermission UnknownError183 IncompatibleClassChangeError184 ArithmeticException StackTraceElement NoSuchFieldError InternalError Thread185 SecurityManager Cloneable NegativeArraySizeException StringBuilder Appendable186 Byte Math Exception IllegalAccessException ClassNotFoundException187 UnsatisfiedLinkError188 IllegalArgumentException AssertionError Short StrictMath ClassCircularityError189 NoSuchFieldException Comparable Readable UnsupportedClassVersionError190 IllegalThreadStateException Iterable Object VirtualMachineError191 InheritableThreadLocal192 ThreadLocal ClassLoader CloneNotSupportedException TypeNotPresentException193 Void194 Character NoClassDefFoundError IllegalStateException LinkageError Boolean195 String196 InstantiationError Float Runnable IndexOutOfBoundsException ClassFormatError197 NullPointerException NoSuchMethodError ClassCastException Class198 StringIndexOutOfBoundsException Override ThreadDeath CharSequence Number199 IllegalMonitorStateException Error NumberFormatException VerifyError200 StringBuffer201 NoSuchMethodException Long ArrayStoreException UnsupportedOperationException202 Integer203 Deprecated StackOverflowError AbstractMethodError Runtime]204 '[java.math BigDecimal BigInteger]205 'java.util.concurrent.Callable206 'clojure.lang.Compiler207 )209 ;; jme3 stuff211 (set! clojure.core/*print-length* 20)213 (clojure.java.javadoc/add-local-javadoc "/home/r/mobius/temp-clj/javadoc")216 (clojure.java.javadoc/add-local-javadoc "/home/r/roBin/jdk6-docs/docs/api")217 (clojure.java.javadoc/add-local-javadoc218 "/home/r/roBin/lpsolve-doc/lpsolve.sourceforge.net/5.5/Java/docs/api")221 (defmethod / [java.lang.Number java.lang.Number]222 [x y] (clojure.core// x y))224 (defmethod - [java.lang.Number java.lang.Number]225 [x y] (clojure.core/- x y))227 (import-static java.lang.Math PI E)