parameters_chk

 the console version of simulhope

  INPUT
   i          iteration index
   imax       maximum number of iterations

  OUTPUT


 $Id: parameters_chk.m,v 1.3 2004/07/15 11:25:59 dalai Exp $

0001 % the console version of simulhope
0002 %
0003 %  INPUT
0004 %   i          iteration index
0005 %   imax       maximum number of iterations
0006 %
0007 %  OUTPUT
0008 %
0009 %
0010 % $Id: parameters_chk.m,v 1.3 2004/07/15 11:25:59 dalai Exp $
0011 
0012 
0013 function error = parameters_chk(par)
0014 
0015 error = 0;
0016 
0017 disp(' ');
0018 disp(dispconsole('|','=','|'));
0019 disp(dispconsole('|','List of selected parameters','','','|'));
0020 disp(dispconsole('|','=','|'));
0021 
0022 % type of model %
0023 disp(dispconsole('|','type of model',':',char(par.models(par.model)),'|'));
0024 
0025 % number of base-stations %
0026 %disp(dispconsole('|','number of base-stations',':',sprintf('%s bs',num2str(par.bs)),'|'));
0027 
0028 % coverage %
0029 disp(dispconsole('|','network coverage',':',sprintf('%d%%',par.coverage),'|'));
0030 
0031 % dimensionnal parameter %
0032 %  if (isnan(par.r)==1)
0033 %      disp(dispconsole('|','dimensionnal parameter',':','you did not enter a number','|'));
0034 %      error = error + 1;
0035 %  elseif (par.r < 1)
0036 %      disp(dispconsole('|','dimensionnal parameter',':','must be superior to 1','|'));
0037 %      error = error + 1;
0038 %  elseif (isnan(par.r) == 0)
0039 %      disp(dispconsole('|','dimensionnal parameter',':',sprintf('%s [m]',num2str(par.r)),'|'));
0040 %      error = error;
0041 %  end
0042 
0043 % number of buildings %
0044 %  %  if (par.model ==2)
0045 %  %  if (isnan(par.nbuld)==1)
0046 %  %      disp(dispconsole('|','number of buidings',':','you did not enter a number','|'));
0047 %  %      error = error +1;
0048 %  %  elseif (isnan(par.nbuld) == 0)
0049 %  %      disp(dispconsole('|','number of buildings',':',num2str(par.nbuld),'|'));
0050 %  %      error = error ;
0051 %  %  end
0052 %  %  end
0053 
0054 % number of users %
0055 if (isnan(par.mob)==1)
0056     disp(dispconsole('|','number of users',':','you did not enter a number','|'));
0057     error = error + 1;
0058 elseif (par.mob < 1)
0059     disp(dispconsole('|','number of users',':','must be at least equal to 1','|'));
0060     error = error + 1;
0061 elseif (isnan(par.mob) == 0)
0062     disp(dispconsole('|','number of users',':',sprintf('%s users',num2str(par.mob)),'|'));
0063     error = error ;
0064 end
0065 
0066 % pedestrian mobility
0067 disp(dispconsole('|','number of pedestrians',':',num2str(par.nb_pedestrian),'|'));
0068 
0069 % speed for pedestrian
0070 if (isnan(par.pspeed)==1)
0071     disp(dispconsole('|','pedestrians speed',':','you did not enter a number','|'));
0072     error = error + 1;
0073 elseif (isnan(par.pspeed) == 0)
0074     disp(dispconsole('|','pedestrian speed',':',sprintf('%s [km/h]',num2str(par.pspeed*36/10)),'|'));
0075     error = error ;
0076 end
0077 
0078 % vehicular mobility
0079 disp(dispconsole('|','number of vehicules',':',num2str(par.nb_vehicular),'|'));
0080 
0081 % speed for vehicular
0082 if (isnan(par.vspeed)==1)
0083     disp(dispconsole('|','vehiculars speed',':','you did not enter a number','|'));
0084     error = error + 1 ;
0085 elseif (isnan(par.vspeed) == 0)
0086     disp(dispconsole('|','vehiculars speed',':',sprintf('%s [km/h]',num2str(par.vspeed*36/10)),'|'));
0087     error = error;
0088 end
0089 
0090 % arrival rate lambda %
0091 if (isnan(par.lambda)==1)
0092     disp(dispconsole('|','arrival rate (lambda)',':','you did not enter a number','|'));
0093     error = error + 1 ;
0094 elseif (isnan(par.lambda) == 0)
0095     disp(dispconsole('|','arrival rate (lambda)',':',sprintf('%s [msg/min]',num2str(par.lambda*60)),'|'));
0096     error = error;
0097 end
0098 
0099 % time of simulation %
0100 if (isnan(par.tmax)==1)
0101     disp(dispconsole('|','time of simulation',':','you did not enter a number','|'));
0102     error = error + 1 ;
0103 elseif (isnan(par.tmax) == 0)
0104     disp(dispconsole('|','time of simulation',':',sprintf('%s [min]',num2str(par.tmax/60)),'|'));
0105     error = error;
0106 end
0107 
0108 %  % plotting the path %
0109 %  if (par.plot_path==1)
0110 %      disp(dispconsole('|','plotting the path',':','yes','|'));
0111 %  elseif (par.plot_path==0)
0112 %      disp(dispconsole('|','plotting the path',':','no','|'));
0113 %  end
0114 %
0115 %  disp(dispconsole('='));
0116 %  disp(dispconsole('|','Processing informations',' ','','|'));
0117 %  disp(dispconsole('='));
0118 
0119 if (error==0)
0120     disp(dispconsole('|','checking selected parameters',':','ok','|'));
0121 else
0122     disp(dispconsole('|','checking selected parameters',':','FAILURE','|'));
0123     disp(dispconsole('|',sprintf('you have %d error(s) in your parameter', error),'s','','|'));
0124     disp(dispconsole('|','Check the list of parameters to correct the wrong parameter','c','','|'));
0125 end
0126