parameters_set

 set the parameters

  INPUT
   (no input) set the values of the parameters used in the simluations

  OUTPUT
   par        input parameters (see below for a more complete
              description of parameters


 $Id: parameters_set.m,v 1.7 2004/07/16 19:44:14 dalai Exp $

0001 % set the parameters
0002 %
0003 %  INPUT
0004 %   (no input) set the values of the parameters used in the simluations
0005 %
0006 %  OUTPUT
0007 %   par        input parameters (see below for a more complete
0008 %              description of parameters
0009 %
0010 %
0011 % $Id: parameters_set.m,v 1.7 2004/07/16 19:44:14 dalai Exp $
0012 
0013 function par = parameters_set(ui,model,coverage,nb_mob,nb_pedestrian,pspeed,nb_vehicular,vspeed,lambda,tmax);
0014 
0015 par.ui = ui;
0016 
0017 par.models = { 'street' 'city' 'hexagonal' };
0018 par.model = model;
0019 
0020 % dimensionnal parameter
0021 if (model == 1)
0022     par.r = 2000 ;
0023 else 
0024     par.r = 1000 ;
0025     par.dist_bs = 200;
0026 end
0027 
0028 par.cov_bs = 100;
0029 par.cov_mob = 50;
0030 
0031 par.coverage = coverage;
0032 
0033 par.mob        = nb_mob;
0034 
0035 par.nb_pedestrian    = nb_pedestrian;
0036 % convert from [km/h] to [m/s]
0037 par.pspeed        = pspeed*10/36;
0038 
0039 par.nb_vehicular    = nb_vehicular;
0040 % convert from [km/h] to [m/s]
0041 par.vspeed        = vspeed*10/36;
0042 
0043 % convert from [msg/min] to [msg/sec]
0044 par.lambda        = lambda/60;
0045 
0046 % convert from [min] to [s]
0047 par.tmax        = tmax*60;
0048 
0049 par.km            = 5;
0050 par.lm            = par.km +1;