Scilab, trace2 function

function [] = trace2(N, T, cc)
    exec('**/calcg.sci', -1)
    n = size(T, 1);

    // Si le vecteur T n'est pas un vecteur colonne
    if (n == 1) then
        T = T';
        n = size(T, 1)
    end

    g = zeros(1, N);
    t = linspace(T(1), T(n), N);

    for i = 1:N
        g(1, i) = calcg(t(i), T, cc)
    end

    plot(t, g);
endfunction