local function R(R,x,K,I)R=1-R/I return K*(1-(sin(R*1.5707963267949)+(sin(R*3.1415926535898)*(cos(R*3.1415926535898)+1))*.5))+x end local function x(R,x,K,I)R=R/I return K*sin(sin(R*3.1415926535898)*1.5707963267949)+x end
-- Arceusinator's Easing Functions
local function RevBack(t, b, c, d)
	t = 1 - t / d
	return c
			* (1 - (sin(t * 1.5707963267948965579989817342720925807952880859375) + (sin(
				t * 3.14159265358979311599796346854418516159057617187
			) * (cos(t * 3.14159265358979311599796346854418516159057617187) + 1) * 0.5)))
		+ b
end

local function RidiculousWiggle(t, b, c, d)
	t = t / d
	return c
			* sin(
				sin(t * 3.14159265358979311599796346854418516159057617187)
					* 1.5707963267948965579989817342720925807952880859375
			)
		+ b
end
