import("stdfaust.lib");

my_violin_ui = pm.violinModel(stringLength+vibrato,bowPress,bowVel,bowPos)*outGain
with{
	stringLength = hslider("v:violin/v:[0]string/[0]length[midi: ctrl 72]",0.75,0,2,0.01) : si.smoo;
	bowVel = hslider("v:violin/v:[1]bow/[0]velocity[midi: ctrl 71]",0,0,1,0.01) : si.smoo;
	bowPress = hslider("v:violin/v:[1]bow/[1]pressure[midi: ctrl 74]",0.5,0,1,0.01) : si.smoo;
	bowPos = hslider("v:violin/v:[1]bow/[2]position[midi: ctrl 73]",0.7,0,1,0.01) : si.smoo;
	outGain = hslider("v:violin/outGain",0.5,0,1,0.01);
  	vibrato = os.osc(freq)*amplitude*0.1
	with{
		freq = hslider("vibratoFreq[midi: ctrl 22]",6,1,10,0.1) : si.smoo;
		amplitude = hslider("vibratoAmplitude[midi: ctrl 23]",0.1,0,1,0.01) : si.smoo;
  	};
};

process = my_violin_ui;