/***************************
 * File name: rl_comp.ch
 **************************/

#include <control.h>

int main() {
    double k = 1;
    array double complex z[1] = {complex(-0.5, 0)};
    array double complex p[4] = {complex(-0.015, 0),
                                 complex(-1, 0),
                                 complex(-2, 0),
                                 complex(-10, 0)};
    array double zeta[1] = {0.4};
    array double omega[1] = {10};
    CControl sys;
    CPlot plot;

    sys.model("zpk", z, p, k);
    sys.sgrid(1, zeta, omega);
    sys.rlocus(&plot, NULL, NULL);

    return 0;
}