Script

#include<stdio.h> #include<stdlib.h> #include<math.h> #include"gauss.h"//Biblioteca para gerar pulso gaussiano inicial. #define dx 0.1 //Tamanho de passo dx. #define v 1.0 //Velocidade do pulso. #define L 100 //Tamanho da corda. #define t_max 300 //Tempo de simulação. void propagate(); void main() { propagate(); } void propagate() { int i, n; double u[t_max][L], dt, alpha; //u[t][x] é o deslocamento u(x,t) da corda na posição x e no instante t. dt = dx/v; for(i = 0 ; i < t_max; i++)//Condições de contorno fixas. Corda presa nas extremidades. { u[i][0] = 0.0; u[i][L-1] = 0.0; } for(n = 0 ; n < 2 ; n++)//Pulso gaussiano inicial. { for(i = 1 ; i < L-1 ; i++) { u[n][i] = gaussiana(i); } } alpha = v * dt/dx; for(n = 1; n < t_max ; n++)//Iterações do programa baseado no algoritmo Staggered-Leapfrog. { for(i = 1 ; i < L-1 ; i++) { u[n+1][i] = alpha*alpha*u[n][i+1] + 2.0*u[n][i]*(1.0 - alpha*alpha) + alpha*alpha*u[n][i-1] - u[n-1][i]; } printf("set title 'Tempo = %d'\nset xrange [%d:%d]\nset yrange [%lf:%lf]\npl \'-' w lp pt 7 ps 0.8 \n", n,0,L,-1.0,1.0); for(i = 0; i<L; i++) printf("%d\t%lf\n",i,u[n+1][i]); printf("e\npause 0.05\n"); /* As últimas 4 linhas do programa (4 linhas acima) tem a função de graficar os dados estimados no gnuplot a cada iteração. Com uma pausa de 0.05 o comando "pl \'-'" indica que um conjunto de dados está para ser plotado. */ } }