/* Stereo Field Rotation - A Stereo Field Rotation plug-in
 *
 * Copyright (c) 2008
 * No rights reserved.
 * 
 * Permission to use, copy, modify, and/or distribute this software for any
 * purpose with or without fee is hereby granted.
 * 
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

desc:Stereo Field Rotation

slider1:0<-90,90,1>Rot °

@slider
angle = slider1 / 180 * $pi;

cos_coef = cos(angle);
sin_coef = sin(angle);
@sample

l = spl0;
r = spl1;

spl0 = l*cos_coef - r*sin_coef;
spl1 = l*sin_coef + r*cos_coef;