comparison base/methods.lisp @ 104:67f96832cfb0

fix indentation

darcs-hash:20070725084350-dc3a5-b8ae7b5716535e5491a25877c14b9640c6cd0eac.gz

 		   (object2 pitch-designator))
   (= (midi-pitch-number object1)
      (midi-pitch-number object2)))
 
 (defmethod interval> ((object1 pitch-interval)
-		   (object2 pitch-interval))
+                      (object2 pitch-interval))
   (> (span object1)
      (span object2)))
 
 (defmethod interval= ((object1 pitch-interval)
 		   (object2 pitch-interval))