case = 1;

if (case == 1,{
	A =-3;
	B = 3;
	s = plothsizes();
		plotinit(0, s[2]-1, s[2]-1);
		plotscale(0, -1,1, -1,1);
		plotrecth(0, x=-2.15, 3, [x+I*sqrt((x^3+A*x+B)), x-I*(sqrt(x^3+A*x+B))],"Complex");
		plotdraw([0, -1,1]);});
		/*----------------------------------------------------------------------*/
if (case == 2,{
A = 1;
B = 0;
s = plothsizes();
    plotinit(0, s[2]-1, s[2]-1);
    plotscale(0, -1,1, -1,1);
    plotrecth(0, x=-1, 3, [x+I*sqrt((x^3+A*x+B)), x-I*(sqrt(x^3+A*x+B))],"Complex") ;
    plotdraw([0, -1,1]); });
/*----------------------------------------------------------------------*/
if (case == 3,{
A =-1;
B =0;
s = plothsizes();
    plotinit(0, s[2]-1, s[2]-1);
    plotscale(0, -1,1, -1,1);
    plotrecth(0, x=-1.1, 3, [x+I*sqrt((x^3+A*x+B)), x-I*(sqrt(x^3+A*x+B))],"Complex");
    plotdraw([0, -1,1]);});
/*----------------------------------------------------------------------*/
if (case == 4,{
A = 0;
B = 3;
s = plothsizes();
    plotinit(0, s[2]-1, s[2]-1);
    plotscale(0, -1,1, -1,1);
    plotrecth(0, x=-1.5, 3, [x+I*sqrt((x^3+A*x+B)), x-I*(sqrt(x^3+A*x+B))],"Complex") ;
    plotdraw([0, -1,1]); });
	/*----------------------------------------------------------------------*/
if (case == 5,{
s = plothsizes();
    plotinit(0, s[2]-1, s[2]-1);
    plotscale(0, -1,1, -1,1);
    plotrecth(0, x=-1.1, 1, [x+I*sqrt((x^3+x^2)), x-I*(sqrt(x^3+x^2))],"Complex") ;
    plotdraw([0, -1,1]); });
/*----------------------------------------------------------------------*/
if (case == 6,{
s = plothsizes();
    plotinit(0, s[2]-1, s[2]-1);
    plotscale(0, -1,1, -1,1);
    plotrecth(0, x=-0.3, 1, [x+I*sqrt((x^3)), x-I*(sqrt(x^3))],"Complex") ;
    plotdraw([0, -1,1]); });
	/*----------------------------------------------------------------------*/
