next up previous contents
suivant: Unité de gestion matricielle monter: Code source précédent: Code source   Table des matières

Programme principal

{
  ************************************************************
  *                                                                                                                
 **                           Pierre CHIGNAC                                                           
***            Stage de DESS                                                                           
***            Avirl-Septembre 2000                                                                 
 **            CETE du SUD-OUEST -==- South-West CITY
  ************************************************************
}

program modele_trafic_urbain;

uses
  Forms,
  mod_grav in 'mod_grav.pas' {Form1},
  matrix in 'matrix.pas' {matrice},
  param in 'param.pas' {param_f},
  matrix_stat in 'matrix_stat.pas' {Form2},
  repartition in 'repartition.pas' {Form3},
  repartition_utils in 'repartition_utils.pas' {Form4};

{$R *.RES}

//----------------------------------------------------
begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(Tparam_f, param_f);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm4, teta_view);
  Application.Run;
end.


2003-06-21