edwaraco

Credenciales Maquina Virtual

user: weimcamo
pass: weimcamo
User: edwaraco
pass: edwaraco
User: redesg3
pass: RedesGrupo3
Contraseña root: admin123

edwaraco

(ns-unmap *ns* 'users)
; Con el ejemplo se puede observar que nos regala gratis validaciones que ya no tendríamos que hacer en nuestro código.
; Ejemplo: Para una una combinación que no existe, siempre nos retornará (str "You can access with " y " in " x)
(defmulti test1 (fn [x y & xs] [x (class y)]))

(defmethod test1 ["id" Long] [x y & xs]
  (str y " is a Long"))

(defmethod test1 ["name" String] [x y & xs]
  (str y " is a String"))

edwaraco

(defn run-len [[character & chain]]
  (loop [character character
         [letter & tail] chain
         acc 1
         new-chain (str character 0)]
    (if (nil? character)
      ""
      (if (nil? letter)
        new-chain
        (if (= character letter)