de.sciss.synth.Rate.scala Maven / Gradle / Ivy

Go to download
Show more of this group Show more artifacts with this name
Show all versions of scalacollider_2.9.2 Show documentation
A sound synthesis library for the SuperCollider server
The newest version!
/*
 *  Rate.scala
 *  (ScalaCollider)
 *
 *  Copyright (c) 2008-2013 Hanns Holger Rutz. All rights reserved.
 *
 *  This software is free software; you can redistribute it and/or
 *  modify it under the terms of the GNU General Public License
 *  as published by the Free Software Foundation; either
 *  version 2, june 1991 of the License, or (at your option) any later version.
 *
 *  This software is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 *  General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public
 *  License (gpl.txt) along with this software; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 *
 *  For further information, please contact Hanns Holger Rutz at
 *  [email protected]
 */

package de.sciss.synth

import collection.immutable.{ IndexedSeq => IIdxSeq }

//object Rate {
//   def highest( rate: Rate, rates: Rate* ) : Rate = rates.foldLeft[ Rate ]( scalar )( (a, b) => if( a.id > b.id ) a else b )
//   def max( rates: Rate* ) : Rate = rates.reduceLeft( (a, b) => if( a.id > b.id ) a else b )

//   {
//      if( rate == demand ) return demand
//      var res = rate
//      rates.foreach { r =>
//         if( r == demand ) return demand
//         if( r.id > res.id ) res = r
//      }
//      res
//   }

//   def lowest( rate: Rate, rates: Rate* ) : Rate = rates.foldLeft[ Rate ]( scalar )( (a, b) => if( a.id < b.id ) a else b )
//   def min( rates: Rate* ) : Rate = rates.reduceLeft( (a, b) => if( a.id < b.id ) a else b )

//   {
//      if( rate == scalar ) return scalar
//      var res = rate
//      rates.foreach { r =>
//         if( r == scalar ) return scalar
//         if( r.id < res.id ) res = r
//      }
//      res
//   }
//}

object MaybeRate {
   def max_?( rates: MaybeRate* ) : MaybeRate = {
      if( rates.isEmpty ) return UndefinedRate
      var res: Rate = scalar
      rates.foreach {
         case UndefinedRate => return UndefinedRate
         case r: Rate => if( r.id > res.id ) res = r
      }
      res
   }
   def min_?(  rates: MaybeRate* ) : MaybeRate = {
      if( rates.isEmpty ) return UndefinedRate
      var res: Rate = demand
      rates.foreach {
         case UndefinedRate => return UndefinedRate
         case r: Rate => if( r.id < res.id ) res = r
      }
      res
   }
   def reduce( rates: MaybeRate* ) : MaybeRate = {
      rates.headOption match {
         case Some( r ) => if( r == UndefinedRate || rates.exists( _ != r )) UndefinedRate else r
         case None => UndefinedRate
      }
   }
}
sealed abstract class MaybeRate {
   def toOption: Option[ Rate ]
   def ?|( r: => Rate ) : Rate
}
case object UndefinedRate extends MaybeRate {
   val toOption : Option[ Rate ] = None
   def ?|( r: => Rate ) : Rate = r
}

object Rate {
   implicit val ordering = Ordering.ordered[ Rate ]
}
/**
 *    The calculation rate of a UGen or a UGen output.
 */
sealed abstract class Rate extends MaybeRate with Ordered[ Rate ] {
   def id: Int
   def methodName: String
   final val toOption: Option[ Rate ] = Some( this )
   final val toIndexedSeq: IIdxSeq[ Rate ] = IIdxSeq( this )
   def ?|( r: => Rate ) : Rate = this
   def min( that: Rate ) = if( id < that.id ) this else that
   def max( that: Rate ) = if( id > that.id ) this else that
   def compare( that: Rate ) : Int = id - that.id
}

//sealed trait scalar  extends Rate { final val id = 0; final val methodName = "ir" }
//sealed trait control extends Rate { final val id = 1; final val methodName = "kr" }
//sealed trait audio   extends Rate { final val id = 2; final val methodName = "ar" }
//sealed trait demand  extends Rate { final val id = 3; final val methodName = "dr" }
//case object scalar  extends scalar {
//   implicit val rate = scalar
//}
//case object control extends control {
//   implicit val rate = control
//}
//case object audio extends audio {
//   implicit val rate = audio
//}
//case object demand extends demand {
//   implicit val rate = demand
//}

case object scalar  extends Rate {
   final val id = 0
   final val methodName = "ir"
//   trait Rated  { def rate: Rate = scalar }
}
case object control extends Rate {
   final val id = 1
   final val methodName = "kr"
//   trait Rated { def rate: Rate = control }
}
case object audio   extends Rate {
   final val id = 2
   final val methodName = "ar"
//   trait Rated   { def rate: Rate = audio }
}
case object demand  extends Rate {
   final val id = 3
   final val methodName = "dr"
//   trait Rated  { def rate: Rate = demand }
}

trait ScalarRated  { def rate: Rate = scalar }
trait ControlRated { def rate: Rate = control }
trait AudioRated   { def rate: Rate = audio }
trait DemandRated  { def rate: Rate = demand }