adamgomespinto

(ns aula4.exercicio
  (:require [aula4.data :as data]))

;; retornar o vetor de clientes a chave `:full-name` adicionada nos mapas de clientes.
;; (full-name deve ser a concatenacao do `:first-name` com o `:last-name`).
(defn retorna-vetor-de-nomes
  [clientes]
  (map (fn [cliente] (assoc cliente :full-name (str (:first-name cliente) " " (:last-name cliente)))) clientes))

;; retornar clientes que tem `:age` maior que 35. Usar tanto `filter` quanto `remove`.

adamgomespinto

(ns exercicios.exercicio
  (:require [exercicios.data :as data]))

(defn altera-endereco-novo
  [endereco-antigo endereco-novo]
  (merge endereco-antigo endereco-novo))

(defn atualizar-endereco-cliente
  [cliente endereco-novo]
  (update cliente :endereco altera-endereco-novo endereco-novo))

adamgomespinto

(ns final.exercicios
  (:require [final.data :as data]))


;; Criar funcao que, dado um vetor de clientes, deve atualizar o endereco de um cliente e retorna o vetor de clientes.
;; A funcao deve atualizar o endereco apenas com os valores presentes no mapa do novo endereco.
;; Para saber a posicao do cliente no vetor pode usar (.indexOf <vetor> <elemento>).

(defn busca-cliente
  [clientes id-cliente]