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