//
    // Datei:    runge.script 5.11.2001
    // Autors:    Jani Puumalainen ja Kirsi Helkala
    //

    WORLD_X_MAX = +6.0
    WORLD_X_MIN = -6.0
    WORLD_Y_MAX = +1.8
    WORLD_Y_MIN = -1.0

    // Figurenbeschreibung
    // ===================

    e[1]  = O;   point;   fixed;          0.0,0.0; "hidden"
    e[2]  = OX;  point;   fixed;          1.0,0.0; "hidden"
    e[3]  = OY;  point;   fixed;          0.0,1.0; "hidden"
    e[4]  = K;   point;   coordSystem;    O,O,OX,O,OY,300,300,200,200;
    e[5]  = f2;   line;    curve; "t","1/(1+t^2)",-5.0,5.0,350; blue;0;blue;0
    e[6]  = f;   line;    curve;  "t","1/(1+t^2)",-5.0,5.0,350; blue;0;blue;0
    e[7]  = p1;  point;   fixed;          -5.0,.03846153846; "hidelabel"
    e[8]  = p2;  point;   fixed;           5.0,.03846153846;  "hidelabel"
    e[9]  = n1;  line;    connect;         p1,p2;,red;0;red;0
    e[10]  = n2;  line;    curve;  "t","1.000000000-.3846153846*10^(-1)*t^2",-5.0,5.0,350; red;0;red;0
    e[11]  = n3;  line;    curve; "t",".2929864254+.3*10^(-10)*t-.1018099548*10^(-1)*t^2-.3000000000*10^(-11)*t^3",-5.0,5.0,350; red;0;red;0
    e[12]  = n4;  line;    curve;  "t","1.000000000-.3*10^(-9)*t-.1710875333*t^2+.5305039790*10^(-2)*t^4",-5.0,5.0,350; red;0;red;0
    e[13] = n5;  line;    curve;  "t",".5673076925+.1*10^(-9)*t-.6923076921*10^(-1)*t^2-.4*10^(-11)*t^3+.1923076922*10^(-2)*t^4",-5.0,5.0,350; red;0;red;0
    e[14] = n6;  line;    curve; "t","1.000000000+.2*10^(-9)*t-.3513636930*t^2-.2*10^(-10)*t^3+.3353190254*10^(-1)*t^4+.3*10^(-11)*t^5-.8406326538*10^(-3)*t^6",-5.0,5.0,350; red;0;red;0
    e[15] = n7;  line;    curve; "t",".7526413935-.13*10^(-8)*t-.1846620581*t^2+.37*10^(-9)*t^3+.1452155246*10^(-1)*t^4-.39*10^(-10)*t^5-.3311103168*10^(-3)*t^6+.9100000000*10^(-12)*t^7",-5.0,5.0,350; red;0;red;0
    e[16] = n8;  line;    curve; "t","1.000000000+.3*10^(-9)*t-.5281213817*t^2-.16*10^(-9)*t^3+.9818752965*10^(-1)*t^4-.1*10^(-10)*t^5-.6580160674*10^(-2)*t^6+.2*10^(-12)*t^7+.1374446094*10^(-3)*t^8",-5.0,5.0,350; red;0;red;0
    e[17] = n9;  line;    curve; "t",".8615381525+.4*10^(-9)*t-.3304369333*t^2-.35*10^(-9)*t^3+.4916564804*10^(-1)*t^4+.47*10^(-10)*t^5-.2874589317*10^(-2)*t^6-.33*10^(-11)*t^7+.5535942337*10^(-4)*t^8+.6800000001*10^(-13)*t^9",-5.0,5.0,350; red;0;red;0
    e[18] = n10; line;    curve; "t",".9999999995-.4*10^(-9)*t-.6742081450*t^2+.1973755655*t^4-.15*10^(-9)*t^5-.2441176476*10^(-1)*t^6-.7*10^(-11)*t^7+.1266968326*10^(-2)*t^8-.2262443440*10^(-4)*t^10",-5.0,5.0,350; red;0;red;0
    e[19] = ch1; line;    curve; "t",".1342607812*t+.5253164556",-5.0,5.0,350; black;0;black;0
    e[20] = ch2; line;    curve; "t","-.5063291140*10^(-1)*t^2+.4*10^(-11)*t+.9999999999",-5.0,5.0,350; black;0;black;0
    e[21] = ch3; line;    curve; "t","-.6*10^(-11)*t^3-.9603841531*10^(-2)*t^2+.2496998796+.9*10^(-10)*t",-5.0,5.0,350; black;0;black;0
    e[22] = ch4; line;    curve; "t","-.1417193078*t^2-.14*10^(-10)*t^3+.18*10^(-10)*t+.4394397142*10^(-2)*t^4+.9999999996",-5.0,5.0,350;black;0;black;0
    e[23] = ch5; line;    curve; "t","-.4383249719*10^(-1)*t^2+.137*10^(-11)*t^5+.4440886607-.364*10^(-10)*t^3+.2261*10^(-9)*t+.1138506417*10^(-2)*t^4",-5.0,5.0,350;black;0;black;0
    e[24] = ch6; line;    curve; "t",".9999999992-.2571601270*t^2+.94*10^(-12)*t^5-.10*10^(-10)*t^3+.12*10^(-9)*t-.4346674446*10^(-3)*t^6+.1945136814*10^(-1)*t^4",-5.0,5.0,350; black;0;black;0
    e[25] = ch7; line;    curve; "t","-.139*10^(-12)*t^7+.6082597153-.1068321511*t^2+.20*10^(-11)*t^5+.587*10^(-10)*t^3+.150*10^(-9)*t-.1283654563*10^(-3)*t^6+.6546638274*10^(-2)*t^4",-5.0,5.0,350; black;0;black;0
    e[26] = ch8; line;    curve; "t","-.49*10^(-12)*t^7-.3805372810*t^2-.2851*10^(-10)*t^5+.50*10^(-10)*t^3+.4510789871*10^(-4)*t^8+.9999999991-.4*10^(-9)*t-.2582427192*10^(-2)*t^6+.5015716412*10^(-1)*t^4",-5.0,5.0,350;black;0;black;0
    e[27] = ch9; line;    curve; "t","-.4*10^(-12)*t^7-.1924649930*t^2-.198*10^(-13)*t^9-.32*10^(-10)*t^5-.596*10^(-9)*t^3+.7308216636+.1411269736*10^(-4)*t^8-.4*10^(-9)*t-.8961562650*10^(-3)*t^6+.2019085961*10^(-1)*t^4",-5.0,5.0,350; black;0;black;0
    e[28] = ch10;line;    curve; "t",".2*10^(-13)*t^7-.4990604601*t^2+.1108*10^(-12)*t^9-.371*10^(-9)*t^5-.1366*10^(-8)*t^3-.4775210712*10^(-5)*t^10+.3330709460*10^(-3)*t^8+.9999999987+.51*10^(-9)*t-.8540464312*10^(-2)*t^6+.9830883072*10^(-1)*t^4",-5.0,5.0,350; black;0;black;0
    e[29] = n;   measure; controller;     0.0,1.0,0.0,10.0,120,"Newton n = ","";
    e[30] = m;   measure; controller;     0.0,1.0,0.0,10.0,120,"Chebyshev n = ","";
    // animation = "ne10,1,15,200,0";

    hidden[1] = "if (calculate(n) != 0) hide (f)"
    hidden[2] = "if (calculate(n) != 1) hide (n1)"
    hidden[3] = "if (calculate(n) != 2) hide (n2)"
    hidden[4] = "if (calculate(n) != 3) hide (n3)"
    hidden[5] = "if (calculate(n) != 4) hide (n4)"
    hidden[6] = "if (calculate(n) != 5) hide (n5)"
    hidden[7] = "if (calculate(n) != 6) hide (n6)"
    hidden[8] = "if (calculate(n) != 7) hide (n7)"
    hidden[9] = "if (calculate(n) != 8) hide (n8)"
    hidden[10] = "if (calculate(n) != 9) hide (n9)"
    hidden[11] = "if (calculate(n) != 10) hide (n10)"

    hidden[12] = "if (calculate(m) != 0) hide (f)"
    hidden[13] = "if (calculate(m) != 1) hide (ch1)"
    hidden[14] = "if (calculate(m) != 2) hide (ch2)"
    hidden[15] = "if (calculate(m) != 3) hide (ch3)"
    hidden[16] = "if (calculate(m) != 4) hide (ch4)"
    hidden[17] = "if (calculate(m) != 5) hide (ch5)"
    hidden[18] = "if (calculate(m) != 6) hide (ch6)"
    hidden[19] = "if (calculate(m) != 7) hide (ch7)"
    hidden[20] = "if (calculate(m) != 8) hide (ch8)"
    hidden[21] = "if (calculate(m) != 9) hide (ch9)"
    hidden[22] = "if (calculate(m) != 10) hide (ch10)"