anchor.diff:  (in-package :cl-patterns)
   
  -;; macro for k---s--- shit
  +;;; macro for k---s--- shit
   
   (defmacro ds (map &rest items)
     (let ((res (mapcar #'symbol-name items)))
  
positive.code: 
  (print (perc 0 .2 .4))
  
  ;; mapping
  
  ;; (defun linlin)
  
  
negative.code: 	;; 	);
  	;; 	^pow(outMax/outMin, log(this/inMin) / log(inMax/inMin)) * outMin;
  	;; }
  
  ;;; buffer - return a sound from an object
  ;; object can be:
  ;; URL (use youtube-dl --extract-audio)
  ;; pathname (read it as a sound file)
  ;; envelope (convert it to a wavetable)
  ;; string (text to speech)
  
  (defgeneric buffer (object))
  
  (defmethod buffer ((object pathname)))
  
  (defmethod buffer ((object string)))
  