Georgios Tsamis / Mbed 2 deprecated OneFileToRuleThemAll

All the lab works are here!

Dependencies:   ISR_Mini-explorer mbed

Fork of VirtualForces by Georgios Tsamis

main.cpp@26:b020cf253059, 2017-04-20 (annotated)

Committer:
geotsam
Date:
Thu Apr 20 18:54:48 2017 +0000
Revision:
26:b020cf253059
Parent:
25:572c9e9a8809
Child:
27:07bde633af72
shortened go_to_point_with_angle a little bit

Who changed what in which revision?

UserRevisionLine numberNew contents of line
geotsam 0:8bffb51cc345 1 #include "mbed.h"
geotsam 0:8bffb51cc345 2 #include "robot.h" // Initializes the robot. This include should be used in all main.cpp!
geotsam 0:8bffb51cc345 3 #include "math.h"
Ludwigfr 22:ebb37a249b5f 4
Ludwigfr 22:ebb37a249b5f 5 using namespace std;
AurelienBernier 4:8c56c3ba6e54 6
Ludwigfr 22:ebb37a249b5f 7 //fill initialLogValues with the values we already know (here the bordurs)
Ludwigfr 22:ebb37a249b5f 8 void fill_initial_log_values();
Ludwigfr 22:ebb37a249b5f 9 //generate a position randomly and makes the robot go there while updating the map
Ludwigfr 22:ebb37a249b5f 10 void randomize_and_map();
Ludwigfr 22:ebb37a249b5f 11 //go the the given position while updating the map
Ludwigfr 22:ebb37a249b5f 12 void go_to_point_with_angle(float target_x, float target_y, float target_angle);
Ludwigfr 22:ebb37a249b5f 13 //Updates sonar values
geotsam 24:8f4b820d8de8 14 void update_sonar_values(float leftMm, float frontMm, float rightMm);
Ludwigfr 22:ebb37a249b5f 15 //function that check if a cell A(x,y) is in the range of the front sonar S(xs,ys) (with an angle depending on the sonar used, front 0, left pi/3, right -pi/3) returns the probability it's occupied/empty [0;1]
Ludwigfr 22:ebb37a249b5f 16 float compute_probability_t(float x, float y,float xs,float ys, float angleFromSonarPosition, float distanceObstacleDetected);
Ludwigfr 22:ebb37a249b5f 17 //print the map
Ludwigfr 22:ebb37a249b5f 18 void print_final_map();
Ludwigfr 25:572c9e9a8809 19 //print the map with the robot marked on it
Ludwigfr 25:572c9e9a8809 20 void print_final_map_with_robot_position();
geotsam 0:8bffb51cc345 21
Ludwigfr 22:ebb37a249b5f 22 //MATHS heavy functions
Ludwigfr 22:ebb37a249b5f 23 float dist(float robot_x, float robot_y, float target_x, float target_y);
Ludwigfr 22:ebb37a249b5f 24 //returns the probability [0,1] that the cell is occupied from the log value lt
Ludwigfr 22:ebb37a249b5f 25 float log_to_proba(float lt);
Ludwigfr 22:ebb37a249b5f 26 //returns the log value that the cell is occupied from the probability value [0,1]
Ludwigfr 22:ebb37a249b5f 27 float proba_to_log(float p);
Ludwigfr 22:ebb37a249b5f 28 //returns the new log value
Ludwigfr 22:ebb37a249b5f 29 float compute_log_estimation_lt(float previousLogValue,float currentProbability,float originalLogvalue );
Ludwigfr 22:ebb37a249b5f 30 //makes the angle inAngle between 0 and 2pi
Ludwigfr 22:ebb37a249b5f 31 float rad_angle_check(float inAngle);
Ludwigfr 22:ebb37a249b5f 32 //returns the angle between the vectors (x,y) and (xs,ys)
Ludwigfr 22:ebb37a249b5f 33 float compute_angle_between_vectors(float x, float y,float xs,float ys);
Ludwigfr 25:572c9e9a8809 34 float robot_center_x_in_orthonormal_x();
Ludwigfr 25:572c9e9a8809 35 float robot_center_y_in_orthonormal_y();
Ludwigfr 25:572c9e9a8809 36 float robot_sonar_front_x_in_orthonormal_x();
Ludwigfr 25:572c9e9a8809 37 float robot_sonar_front_y_in_orthonormal_y();
Ludwigfr 25:572c9e9a8809 38 float robot_sonar_right_x_in_orthonormal_x();
Ludwigfr 25:572c9e9a8809 39 float robot_sonar_right_y_in_orthonormal_y();
Ludwigfr 25:572c9e9a8809 40 float robot_sonar_left_x_in_orthonormal_x();
Ludwigfr 25:572c9e9a8809 41 float robot_sonar_left_y_in_orthonormal_y();
Ludwigfr 25:572c9e9a8809 42 float estimated_width_indice_in_orthonormal_x(int i);
Ludwigfr 25:572c9e9a8809 43 float estimated_height_indice_in_orthonormal_y(int j);
AurelienBernier 8:109314be5b68 44
Ludwigfr 22:ebb37a249b5f 45 const float pi=3.14159;
Ludwigfr 22:ebb37a249b5f 46 //spec of the sonar
Ludwigfr 22:ebb37a249b5f 47 //TODO MEASURE THE DISTANCE on X and Y of the robot frame, between each sonar and the center of the robot and add it to calculus in updateSonarValues
geotsam 24:8f4b820d8de8 48 const float RANGE_SONAR=50;//cm
geotsam 24:8f4b820d8de8 49 const float RANGE_SONAR_MIN=10;//Rmin cm
geotsam 24:8f4b820d8de8 50 const float INCERTITUDE_SONAR=10;//cm
geotsam 24:8f4b820d8de8 51 const float ANGLE_SONAR=pi/3;//Omega rad
geotsam 24:8f4b820d8de8 52 const float SECURITY_DISTANCE=150;//mm
Ludwigfr 22:ebb37a249b5f 53
Ludwigfr 22:ebb37a249b5f 54 //those distance and angle are approximation in need of measurements
geotsam 24:8f4b820d8de8 55 const float ANGLE_FRONT_TO_LEFT=10*pi/36;//50 degrees
geotsam 24:8f4b820d8de8 56 const float DISTANCE_SONAR_LEFT_X=4;
geotsam 24:8f4b820d8de8 57 const float DISTANCE_SONAR_LEFT_Y=4;
Ludwigfr 22:ebb37a249b5f 58
geotsam 24:8f4b820d8de8 59 const float ANGLE_FRONT_TO_RIGHT=-10*pi/36;//-50 degrees
geotsam 24:8f4b820d8de8 60 const float DISTANCE_SONAR_RIGHT_X=-4;
geotsam 24:8f4b820d8de8 61 const float DISTANCE_SONAR_RIGHT_Y=4;
AurelienBernier 11:e641aa08c92e 62
Ludwigfr 22:ebb37a249b5f 63 const float ANGLE_FRONT_TO_FRONT=0;
Ludwigfr 22:ebb37a249b5f 64 const float DISTANCE_SONAR_FRONT_X=0;
Ludwigfr 22:ebb37a249b5f 65 const float DISTANCE_SONAR_FRONT_Y=5;
Ludwigfr 22:ebb37a249b5f 66
Ludwigfr 22:ebb37a249b5f 67 //TODO adjust the size of the map for computation time (25*25?)
geotsam 24:8f4b820d8de8 68 const float WIDTH_ARENA=120;//cm
geotsam 24:8f4b820d8de8 69 const float HEIGHT_ARENA=90;//cm
geotsam 24:8f4b820d8de8 70
geotsam 24:8f4b820d8de8 71 //const int SIZE_MAP=25;
geotsam 24:8f4b820d8de8 72 const int NB_CELL_WIDTH=24;
geotsam 24:8f4b820d8de8 73 const int NB_CELL_HEIGHT=18;
Ludwigfr 22:ebb37a249b5f 74
Ludwigfr 22:ebb37a249b5f 75 //position and orientation of the robot when put on the map (ODOMETRY doesn't know those)
geotsam 24:8f4b820d8de8 76 const float DEFAULT_X=WIDTH_ARENA/2;
geotsam 24:8f4b820d8de8 77 const float DEFAULT_Y=HEIGHT_ARENA/2;
Ludwigfr 22:ebb37a249b5f 78 const float DEFAULT_THETA=pi/2;
Ludwigfr 22:ebb37a249b5f 79
geotsam 24:8f4b820d8de8 80 //used to create the map 250 represent the 250cm of the square where the robot is tested
geotsam 24:8f4b820d8de8 81 //float sizeCell=250/(float)SIZE_MAP;
geotsam 24:8f4b820d8de8 82 float sizeCellX=WIDTH_ARENA/(float)NB_CELL_WIDTH;
geotsam 24:8f4b820d8de8 83 float sizeCellY=HEIGHT_ARENA/(float)NB_CELL_HEIGHT;
geotsam 24:8f4b820d8de8 84
geotsam 24:8f4b820d8de8 85 float map[NB_CELL_WIDTH][NB_CELL_HEIGHT];//contains the log values for each cell
geotsam 24:8f4b820d8de8 86 float initialLogValues[NB_CELL_WIDTH][NB_CELL_HEIGHT];
Ludwigfr 22:ebb37a249b5f 87
Ludwigfr 22:ebb37a249b5f 88 //Diameter of a wheel and distance between the 2
Ludwigfr 22:ebb37a249b5f 89 const float RADIUS_WHEELS=3.25;
Ludwigfr 22:ebb37a249b5f 90 const float DISTANCE_WHEELS=7.2;
Ludwigfr 22:ebb37a249b5f 91
geotsam 24:8f4b820d8de8 92 const int MAX_SPEED=500;//TODO TWEAK THE SPEED SO IT DOES NOT FUCK UP
AurelienBernier 8:109314be5b68 93
geotsam 24:8f4b820d8de8 94 bool tooClose=false;
geotsam 24:8f4b820d8de8 95 bool turnFromObstacle=false;
AurelienBernier 8:109314be5b68 96
geotsam 26:b020cf253059 97 float alpha; //angle error
geotsam 26:b020cf253059 98 float rho; //distance from target
geotsam 26:b020cf253059 99 float beta;
geotsam 26:b020cf253059 100 float kRho=12, ka=30, kb=-13; //Kappa values
geotsam 26:b020cf253059 101 float linear, angular, angular_left, angular_right;
geotsam 26:b020cf253059 102 float dt=0.5;
geotsam 26:b020cf253059 103 float temp;
geotsam 26:b020cf253059 104 float d2;
geotsam 26:b020cf253059 105 Timer t;
geotsam 26:b020cf253059 106
geotsam 26:b020cf253059 107 int speed=MAX_SPEED; // Max speed at beggining of movement
geotsam 26:b020cf253059 108
geotsam 26:b020cf253059 109 float leftMm;
geotsam 26:b020cf253059 110 float frontMm;
geotsam 26:b020cf253059 111 float rightMm;
geotsam 26:b020cf253059 112
geotsam 0:8bffb51cc345 113 int main(){
geotsam 17:caf393b63e27 114
geotsam 13:41f75c132135 115 i2c1.frequency(100000);
AurelienBernier 2:ea61e801e81f 116 initRobot(); //Initializing the robot
geotsam 0:8bffb51cc345 117 pc.baud(9600); // baud for the pc communication
geotsam 0:8bffb51cc345 118
Ludwigfr 22:ebb37a249b5f 119 measure_always_on();//TODO check if needed
geotsam 24:8f4b820d8de8 120 wait(0.5);
AurelienBernier 19:dbc5fbad4975 121
Ludwigfr 22:ebb37a249b5f 122 fill_initial_log_values();
geotsam 13:41f75c132135 123
geotsam 24:8f4b820d8de8 124 theta=DEFAULT_THETA;
geotsam 24:8f4b820d8de8 125 X=DEFAULT_X;
geotsam 24:8f4b820d8de8 126 Y=DEFAULT_Y;
geotsam 24:8f4b820d8de8 127
geotsam 24:8f4b820d8de8 128 for (int i = 0; i<20; i++) {
Ludwigfr 22:ebb37a249b5f 129 randomize_and_map();
geotsam 24:8f4b820d8de8 130 wait(2);
geotsam 24:8f4b820d8de8 131 print_final_map();
geotsam 17:caf393b63e27 132 }
AurelienBernier 8:109314be5b68 133
AurelienBernier 8:109314be5b68 134 }
AurelienBernier 8:109314be5b68 135
Ludwigfr 22:ebb37a249b5f 136 //fill initialLogValues with the values we already know (here the bordurs)
Ludwigfr 22:ebb37a249b5f 137 void fill_initial_log_values(){
Ludwigfr 22:ebb37a249b5f 138 //Fill map, we know the border are occupied
geotsam 24:8f4b820d8de8 139 for (int i = 0; i<NB_CELL_WIDTH; i++) {
geotsam 24:8f4b820d8de8 140 for (int j = 0; j<NB_CELL_HEIGHT; j++) {
geotsam 24:8f4b820d8de8 141 if(j==0 || j==NB_CELL_HEIGHT-1 || i==0 || i==NB_CELL_WIDTH-1)
Ludwigfr 22:ebb37a249b5f 142 initialLogValues[i][j] = proba_to_log(1);
Ludwigfr 22:ebb37a249b5f 143 else
Ludwigfr 22:ebb37a249b5f 144 initialLogValues[i][j] = proba_to_log(0.5);
AurelienBernier 21:62154d644531 145 }
Ludwigfr 22:ebb37a249b5f 146 }
AurelienBernier 8:109314be5b68 147 }
AurelienBernier 8:109314be5b68 148
Ludwigfr 22:ebb37a249b5f 149 //generate a position randomly and makes the robot go there while updating the map
Ludwigfr 22:ebb37a249b5f 150 void randomize_and_map() {
geotsam 24:8f4b820d8de8 151 //TODO check that it's aurelien's work
geotsam 24:8f4b820d8de8 152 float target_x = (rand()%(int)(WIDTH_ARENA*10))/10;//for decimal precision
geotsam 24:8f4b820d8de8 153 float target_y = (rand()%(int)(HEIGHT_ARENA*10))/10;
Ludwigfr 22:ebb37a249b5f 154 float target_angle = ((float)(rand()%31416)-15708)/10000.0;
geotsam 24:8f4b820d8de8 155
geotsam 24:8f4b820d8de8 156 //TODO comment that
geotsam 24:8f4b820d8de8 157 //pc.printf("\n\r targ_X=%f", target_x);
geotsam 24:8f4b820d8de8 158 //pc.printf("\n\r targ_Y=%f", target_y);
geotsam 24:8f4b820d8de8 159 //pc.printf("\n\r targ_Angle=%f", target_angle);
geotsam 24:8f4b820d8de8 160
Ludwigfr 22:ebb37a249b5f 161 go_to_point_with_angle(target_x, target_y, target_angle);
AurelienBernier 19:dbc5fbad4975 162 }
AurelienBernier 19:dbc5fbad4975 163
Ludwigfr 22:ebb37a249b5f 164 //go the the given position while updating the map
Ludwigfr 22:ebb37a249b5f 165 //TODO clean this procedure it's ugly as hell and too long
Ludwigfr 22:ebb37a249b5f 166 void go_to_point_with_angle(float target_x, float target_y, float target_angle) {
geotsam 24:8f4b820d8de8 167 if(tooClose){
geotsam 24:8f4b820d8de8 168 target_x=X;
geotsam 24:8f4b820d8de8 169 target_y=Y;
geotsam 24:8f4b820d8de8 170 target_angle=theta+pi/2;
geotsam 24:8f4b820d8de8 171 target_angle = atan(sin(target_angle)/cos(target_angle));
geotsam 24:8f4b820d8de8 172 pc.printf("\n\rShould just turn now, new target_angle=%f\n\r", target_angle);
geotsam 24:8f4b820d8de8 173 }
geotsam 24:8f4b820d8de8 174
geotsam 24:8f4b820d8de8 175 alpha = atan2((target_y-Y),(target_x-X))-theta;
geotsam 24:8f4b820d8de8 176 alpha = atan(sin(alpha)/cos(alpha));
geotsam 24:8f4b820d8de8 177 rho = dist(X, Y, target_x, target_y);
geotsam 24:8f4b820d8de8 178
geotsam 24:8f4b820d8de8 179 beta = -alpha-theta+target_angle;
geotsam 24:8f4b820d8de8 180 //beta = atan(sin(beta)/cos(beta));
geotsam 24:8f4b820d8de8 181
geotsam 24:8f4b820d8de8 182 do {
geotsam 24:8f4b820d8de8 183 //pc.printf("\n\n\r entered while");
AurelienBernier 2:ea61e801e81f 184
AurelienBernier 6:afde4b08166b 185 //Timer stuff
AurelienBernier 6:afde4b08166b 186 dt = t.read();
AurelienBernier 6:afde4b08166b 187 t.reset();
AurelienBernier 6:afde4b08166b 188 t.start();
AurelienBernier 6:afde4b08166b 189
geotsam 14:d58f2bdbf42e 190 //Updating X,Y and theta with the odometry values
geotsam 14:d58f2bdbf42e 191 Odometria();
geotsam 24:8f4b820d8de8 192
geotsam 24:8f4b820d8de8 193 leftMm = get_distance_left_sensor();
geotsam 24:8f4b820d8de8 194 frontMm = get_distance_front_sensor();
geotsam 24:8f4b820d8de8 195 rightMm = get_distance_right_sensor();
geotsam 24:8f4b820d8de8 196
geotsam 24:8f4b820d8de8 197 //pc.printf("\n\r leftMm=%f", leftMm);
geotsam 24:8f4b820d8de8 198 //pc.printf("\n\r frontMm=%f", frontMm);
geotsam 24:8f4b820d8de8 199 //pc.printf("\n\r rightMm=%f", rightMm);
Ludwigfr 22:ebb37a249b5f 200
geotsam 24:8f4b820d8de8 201 update_sonar_values(leftMm, frontMm, rightMm);
geotsam 24:8f4b820d8de8 202
geotsam 24:8f4b820d8de8 203 if ((leftMm < SECURITY_DISTANCE || frontMm < SECURITY_DISTANCE || rightMm < SECURITY_DISTANCE) && turnFromObstacle==false) {
AurelienBernier 21:62154d644531 204 tooClose = true;
geotsam 24:8f4b820d8de8 205 turnFromObstacle = true;
geotsam 24:8f4b820d8de8 206 pc.printf("\n\r TOO CLOSE \n\r");
geotsam 24:8f4b820d8de8 207 leftMotor(1,0);
geotsam 24:8f4b820d8de8 208 rightMotor(1,0);
geotsam 24:8f4b820d8de8 209 Odometria();
geotsam 24:8f4b820d8de8 210 go_to_point_with_angle(X, Y, rad_angle_check(theta+pi));
geotsam 14:d58f2bdbf42e 211 break;
AurelienBernier 11:e641aa08c92e 212 }
AurelienBernier 11:e641aa08c92e 213
geotsam 26:b020cf253059 214 compute_angles_and_distance(target_x, target_y, target_angle); //Compute the angles and the distance from target
geotsam 26:b020cf253059 215 compute_linear_angular_velocities(); //Using the angles and distance, compute the velocities needed (linear & angular)
geotsam 24:8f4b820d8de8 216
geotsam 24:8f4b820d8de8 217 //pc.printf("\n\r X=%f", X);
geotsam 24:8f4b820d8de8 218 //pc.printf("\n\r Y=%f", Y);
geotsam 24:8f4b820d8de8 219
geotsam 24:8f4b820d8de8 220 pc.printf("\n\r a_r=%f", angular_right);
geotsam 24:8f4b820d8de8 221 pc.printf("\n\r a_l=%f", angular_left);
geotsam 0:8bffb51cc345 222
AurelienBernier 2:ea61e801e81f 223 //Updating motor velocities
AurelienBernier 1:f0807d5c5a4b 224 leftMotor(1,angular_left);
AurelienBernier 1:f0807d5c5a4b 225 rightMotor(1,angular_right);
geotsam 0:8bffb51cc345 226
AurelienBernier 7:c94070f9af78 227 wait(0.2);
AurelienBernier 6:afde4b08166b 228 //Timer stuff
AurelienBernier 6:afde4b08166b 229 t.stop();
geotsam 24:8f4b820d8de8 230 } while(d2>1 && (abs(target_angle-theta)>0.01) && tooClose==false);
geotsam 24:8f4b820d8de8 231
geotsam 24:8f4b820d8de8 232 //Stop at the end
geotsam 24:8f4b820d8de8 233 leftMotor(1,0);
geotsam 24:8f4b820d8de8 234 rightMotor(1,0);
geotsam 24:8f4b820d8de8 235
geotsam 24:8f4b820d8de8 236 if(turnFromObstacle){
geotsam 24:8f4b820d8de8 237 turnFromObstacle=false;
geotsam 24:8f4b820d8de8 238 tooClose=false;
geotsam 24:8f4b820d8de8 239 }
Ludwigfr 22:ebb37a249b5f 240 }
Ludwigfr 22:ebb37a249b5f 241
Ludwigfr 22:ebb37a249b5f 242 //Updates sonar values
geotsam 24:8f4b820d8de8 243 void update_sonar_values(float leftMm, float frontMm, float rightMm){
Ludwigfr 22:ebb37a249b5f 244
Ludwigfr 22:ebb37a249b5f 245 float currProba;
Ludwigfr 25:572c9e9a8809 246 float i_in_orthonormal;
Ludwigfr 25:572c9e9a8809 247 float j_in_orthonormal;
geotsam 24:8f4b820d8de8 248 for(int i=0;i<NB_CELL_WIDTH;i++){
geotsam 24:8f4b820d8de8 249 for(int j=0;j<NB_CELL_HEIGHT;j++){
geotsam 24:8f4b820d8de8 250 //check if the point A(x,y) in the world frame is within the range of the sonar (which has the coordinates xs, ys in the world frame)
geotsam 24:8f4b820d8de8 251 //check that again
Ludwigfr 22:ebb37a249b5f 252 //compute for front sonar
Ludwigfr 25:572c9e9a8809 253 i_in_orthonormal=estimated_width_indice_in_orthonormal_x(i);
Ludwigfr 25:572c9e9a8809 254 j_in_orthonormal=estimated_height_indice_in_orthonormal_y(j);
Ludwigfr 25:572c9e9a8809 255
Ludwigfr 25:572c9e9a8809 256 currProba=compute_probability_t(i_in_orthonormal,j_in_orthonormal,robot_sonar_front_x_in_orthonormal_x(),robot_sonar_front_y_in_orthonormal_y(),ANGLE_FRONT_TO_FRONT,frontMm/10);
Ludwigfr 22:ebb37a249b5f 257 map[i][j]=map[i][j]+proba_to_log(currProba)+initialLogValues[i][j];//map is filled as map[0][0] get the data for the point closest to the origin
Ludwigfr 22:ebb37a249b5f 258 //compute for right sonar
Ludwigfr 25:572c9e9a8809 259 currProba=compute_probability_t(i_in_orthonormal,j_in_orthonormal,robot_sonar_right_x_in_orthonormal_x(),robot_sonar_right_y_in_orthonormal_y(),ANGLE_FRONT_TO_RIGHT,rightMm/10);
Ludwigfr 22:ebb37a249b5f 260 map[i][j]=map[i][j]+proba_to_log(currProba)+initialLogValues[i][j];
Ludwigfr 22:ebb37a249b5f 261 //compute for left sonar
Ludwigfr 25:572c9e9a8809 262 currProba=compute_probability_t(i_in_orthonormal,j_in_orthonormal,robot_sonar_left_x_in_orthonormal_x(),robot_sonar_left_y_in_orthonormal_y(),ANGLE_FRONT_TO_LEFT,leftMm/10);
Ludwigfr 22:ebb37a249b5f 263 map[i][j]=map[i][j]+proba_to_log(currProba)+initialLogValues[i][j];
Ludwigfr 22:ebb37a249b5f 264 }
Ludwigfr 22:ebb37a249b5f 265 }
Ludwigfr 22:ebb37a249b5f 266 }
Ludwigfr 22:ebb37a249b5f 267
Ludwigfr 25:572c9e9a8809 268 //ODOMETRIA MUST HAVE BEEN CALLED
Ludwigfr 22:ebb37a249b5f 269 //function that check if a cell A(x,y) is in the range of the front sonar S(xs,ys) (with an angle depending on the sonar used, front 0, left pi/3, right -pi/3) returns the probability it's occupied/empty [0;1]
Ludwigfr 22:ebb37a249b5f 270 float compute_probability_t(float x, float y,float xs,float ys, float angleFromSonarPosition, float distanceObstacleDetected){
Ludwigfr 22:ebb37a249b5f 271
Ludwigfr 22:ebb37a249b5f 272 float alpha=compute_angle_between_vectors(x,y,xs,ys);//angle beetween the point and the sonar beam
geotsam 24:8f4b820d8de8 273 float alphaBeforeAdjustment=alpha-theta-angleFromSonarPosition;
Ludwigfr 22:ebb37a249b5f 274 alpha=rad_angle_check(alphaBeforeAdjustment);//TODO I feel you don't need to do that but I m not sure
Ludwigfr 22:ebb37a249b5f 275 float distancePointToSonar=sqrt(pow(x-xs,2)+pow(y-ys,2));
Ludwigfr 22:ebb37a249b5f 276
Ludwigfr 22:ebb37a249b5f 277 //check if the distance between the cell and the robot is within the circle of range RADIUS_WHEELS
Ludwigfr 22:ebb37a249b5f 278 //check if absolute difference between the angles is no more than Omega/2
Ludwigfr 22:ebb37a249b5f 279 if( distancePointToSonar < (RANGE_SONAR)&& (alpha <= ANGLE_SONAR/2 || alpha >= rad_angle_check(-ANGLE_SONAR/2))){
Ludwigfr 22:ebb37a249b5f 280 if( distancePointToSonar < (distanceObstacleDetected - INCERTITUDE_SONAR)){
Ludwigfr 22:ebb37a249b5f 281 //point before obstacle, probably empty
Ludwigfr 22:ebb37a249b5f 282 /*****************************************************************************/
Ludwigfr 22:ebb37a249b5f 283 float Ea=1.f-pow((2*alphaBeforeAdjustment)/ANGLE_SONAR,2);
Ludwigfr 22:ebb37a249b5f 284 float Er;
Ludwigfr 22:ebb37a249b5f 285 if(distancePointToSonar < RANGE_SONAR_MIN){
Ludwigfr 22:ebb37a249b5f 286 //point before minimum sonar range
Ludwigfr 22:ebb37a249b5f 287 Er=0.f;
Ludwigfr 22:ebb37a249b5f 288 }else{
Ludwigfr 22:ebb37a249b5f 289 //point after minimum sonar range
Ludwigfr 22:ebb37a249b5f 290 Er=1.f-pow((distancePointToSonar-RANGE_SONAR_MIN)/(distanceObstacleDetected-INCERTITUDE_SONAR-RANGE_SONAR_MIN),2);
Ludwigfr 22:ebb37a249b5f 291 }
Ludwigfr 22:ebb37a249b5f 292 /*****************************************************************************/
Ludwigfr 22:ebb37a249b5f 293 return (1.f-Er*Ea)/2.f;
Ludwigfr 22:ebb37a249b5f 294 }else{
Ludwigfr 22:ebb37a249b5f 295 //probably occupied
Ludwigfr 22:ebb37a249b5f 296 /*****************************************************************************/
Ludwigfr 22:ebb37a249b5f 297 float Oa=1.f-pow((2*alphaBeforeAdjustment)/ANGLE_SONAR,2);
Ludwigfr 22:ebb37a249b5f 298 float Or;
Ludwigfr 22:ebb37a249b5f 299 if( distancePointToSonar <= (distanceObstacleDetected + INCERTITUDE_SONAR)){
Ludwigfr 22:ebb37a249b5f 300 //point between distanceObstacleDetected +- INCERTITUDE_SONAR
Ludwigfr 22:ebb37a249b5f 301 Or=1-pow((distancePointToSonar-distanceObstacleDetected)/(INCERTITUDE_SONAR),2);
Ludwigfr 22:ebb37a249b5f 302 }else{
Ludwigfr 22:ebb37a249b5f 303 //point after in range of the sonar but after the zone detected
Ludwigfr 22:ebb37a249b5f 304 Or=0;
Ludwigfr 22:ebb37a249b5f 305 }
Ludwigfr 22:ebb37a249b5f 306 /*****************************************************************************/
Ludwigfr 22:ebb37a249b5f 307 return (1+Or*Oa)/2;
Ludwigfr 22:ebb37a249b5f 308 }
Ludwigfr 22:ebb37a249b5f 309 }else{
Ludwigfr 25:572c9e9a8809 310 //not checked by the sonar
Ludwigfr 22:ebb37a249b5f 311 return 0.5;
AurelienBernier 19:dbc5fbad4975 312 }
Ludwigfr 22:ebb37a249b5f 313 }
Ludwigfr 22:ebb37a249b5f 314
Ludwigfr 25:572c9e9a8809 315 void print_final_map() {
Ludwigfr 22:ebb37a249b5f 316 float currProba;
geotsam 24:8f4b820d8de8 317 pc.printf("\n\r");
geotsam 24:8f4b820d8de8 318 for (int y = NB_CELL_HEIGHT -1; y>-1; y--) {
geotsam 24:8f4b820d8de8 319 for (int x= 0; x<NB_CELL_WIDTH; x++) {
geotsam 24:8f4b820d8de8 320 currProba=log_to_proba(map[x][y]);
geotsam 24:8f4b820d8de8 321 if ( currProba < 0.5) {
geotsam 24:8f4b820d8de8 322 pc.printf(" 0 ");
Ludwigfr 22:ebb37a249b5f 323 } else {
Ludwigfr 22:ebb37a249b5f 324 if(currProba==0.5)
geotsam 24:8f4b820d8de8 325 pc.printf(" . ");
Ludwigfr 22:ebb37a249b5f 326 else
geotsam 24:8f4b820d8de8 327 pc.printf(" + ");
Ludwigfr 22:ebb37a249b5f 328 }
Ludwigfr 22:ebb37a249b5f 329 }
geotsam 24:8f4b820d8de8 330 pc.printf("\n\r");
Ludwigfr 22:ebb37a249b5f 331 }
Ludwigfr 22:ebb37a249b5f 332 }
Ludwigfr 22:ebb37a249b5f 333
Ludwigfr 25:572c9e9a8809 334 void print_final_map_with_robot_position() {
geotsam 24:8f4b820d8de8 335 float currProba;
Ludwigfr 25:572c9e9a8809 336 Odometria();
Ludwigfr 25:572c9e9a8809 337 float Xrobot=robot_center_x_in_orthonormal_x();
Ludwigfr 25:572c9e9a8809 338 float Yrobot=robot_center_y_in_orthonormal_y();
Ludwigfr 25:572c9e9a8809 339
Ludwigfr 25:572c9e9a8809 340 float heightIndiceInOrthonormal;
Ludwigfr 25:572c9e9a8809 341 float widthIndiceInOrthonormal;
Ludwigfr 25:572c9e9a8809 342
Ludwigfr 25:572c9e9a8809 343 float heightMalus=-(3*sizeCellX/2);
Ludwigfr 25:572c9e9a8809 344 float heightBonus=sizeCellX/2;
Ludwigfr 25:572c9e9a8809 345
Ludwigfr 25:572c9e9a8809 346 float widthMalus=-(3*sizeCellY/2);
Ludwigfr 25:572c9e9a8809 347 float widthBonus=sizeCellY/2;
Ludwigfr 25:572c9e9a8809 348
geotsam 24:8f4b820d8de8 349 pc.printf("\n\r");
geotsam 24:8f4b820d8de8 350 for (int y = NB_CELL_HEIGHT -1; y>-1; y--) {
geotsam 24:8f4b820d8de8 351 for (int x= 0; x<NB_CELL_WIDTH; x++) {
Ludwigfr 25:572c9e9a8809 352 heightIndiceInOrthonormal=estimated_height_indice_in_orthonormal_y(y);
Ludwigfr 25:572c9e9a8809 353 widthIndiceInOrthonormal=estimated_width_indice_in_orthonormal_x(x);
Ludwigfr 25:572c9e9a8809 354 if(Xrobot >= (heightIndiceInOrthonormal+heightMalus) && Xrobot <= (heightIndiceInOrthonormal+heightBonus) && Yrobot >= (widthIndiceInOrthonormal+widthMalus) && Yrobot <= (widthIndiceInOrthonormal+widthBonus))
geotsam 24:8f4b820d8de8 355 pc.printf(" R ");
Ludwigfr 25:572c9e9a8809 356 else{
Ludwigfr 25:572c9e9a8809 357 currProba=log_to_proba(map[x][y]);
Ludwigfr 25:572c9e9a8809 358 if ( currProba < 0.5)
Ludwigfr 25:572c9e9a8809 359 pc.printf(" 0 ");
Ludwigfr 25:572c9e9a8809 360 else{
Ludwigfr 25:572c9e9a8809 361 if(currProba==0.5)
Ludwigfr 25:572c9e9a8809 362 pc.printf(" . ");
Ludwigfr 25:572c9e9a8809 363 else
Ludwigfr 25:572c9e9a8809 364 pc.printf(" + ");
Ludwigfr 25:572c9e9a8809 365 }
geotsam 24:8f4b820d8de8 366 }
geotsam 24:8f4b820d8de8 367 }
geotsam 24:8f4b820d8de8 368 pc.printf("\n\r");
geotsam 24:8f4b820d8de8 369 }
geotsam 24:8f4b820d8de8 370 }
Ludwigfr 22:ebb37a249b5f 371
Ludwigfr 22:ebb37a249b5f 372
Ludwigfr 22:ebb37a249b5f 373 //MATHS heavy functions
Ludwigfr 22:ebb37a249b5f 374 /**********************************************************************/
Ludwigfr 22:ebb37a249b5f 375 //Distance computation function
Ludwigfr 22:ebb37a249b5f 376 float dist(float robot_x, float robot_y, float target_x, float target_y){
Ludwigfr 22:ebb37a249b5f 377 return sqrt(pow(target_y-robot_y,2) + pow(target_x-robot_x,2));
Ludwigfr 22:ebb37a249b5f 378 }
Ludwigfr 22:ebb37a249b5f 379
geotsam 24:8f4b820d8de8 380 //returns the probability [0,1] that the cell is occupied from the log valAue lt
Ludwigfr 22:ebb37a249b5f 381 float log_to_proba(float lt){
Ludwigfr 22:ebb37a249b5f 382 return 1-1/(1+exp(lt));
Ludwigfr 22:ebb37a249b5f 383 }
Ludwigfr 22:ebb37a249b5f 384
Ludwigfr 22:ebb37a249b5f 385 //returns the log value that the cell is occupied from the probability value [0,1]
Ludwigfr 22:ebb37a249b5f 386 float proba_to_log(float p){
Ludwigfr 22:ebb37a249b5f 387 return log(p/(1-p));
Ludwigfr 22:ebb37a249b5f 388 }
Ludwigfr 22:ebb37a249b5f 389
Ludwigfr 22:ebb37a249b5f 390 //returns the new log value
Ludwigfr 22:ebb37a249b5f 391 float compute_log_estimation_lt(float previousLogValue,float currentProbability,float originalLogvalue ){
Ludwigfr 22:ebb37a249b5f 392 return previousLogValue+proba_to_log(currentProbability)-originalLogvalue;
Ludwigfr 22:ebb37a249b5f 393 }
Ludwigfr 22:ebb37a249b5f 394
Ludwigfr 22:ebb37a249b5f 395 //makes the angle inAngle between 0 and 2pi
Ludwigfr 22:ebb37a249b5f 396 float rad_angle_check(float inAngle){
Ludwigfr 22:ebb37a249b5f 397 //cout<<"before :"<<inAngle;
Ludwigfr 22:ebb37a249b5f 398 if(inAngle > 0){
Ludwigfr 22:ebb37a249b5f 399 while(inAngle > (2*pi))
Ludwigfr 22:ebb37a249b5f 400 inAngle-=2*pi;
Ludwigfr 22:ebb37a249b5f 401 }else{
Ludwigfr 22:ebb37a249b5f 402 while(inAngle < 0)
Ludwigfr 22:ebb37a249b5f 403 inAngle+=2*pi;
Ludwigfr 22:ebb37a249b5f 404 }
Ludwigfr 22:ebb37a249b5f 405 //cout<<" after :"<<inAngle<<endl;
Ludwigfr 22:ebb37a249b5f 406 return inAngle;
Ludwigfr 22:ebb37a249b5f 407 }
Ludwigfr 22:ebb37a249b5f 408
Ludwigfr 22:ebb37a249b5f 409 //returns the angle between the vectors (x,y) and (xs,ys)
Ludwigfr 22:ebb37a249b5f 410 float compute_angle_between_vectors(float x, float y,float xs,float ys){
Ludwigfr 22:ebb37a249b5f 411 //alpha angle between ->x and ->SA
Ludwigfr 22:ebb37a249b5f 412 //vector S to A ->SA
Ludwigfr 22:ebb37a249b5f 413 float vSAx=x-xs;
Ludwigfr 22:ebb37a249b5f 414 float vSAy=y-ys;
Ludwigfr 22:ebb37a249b5f 415 //norme SA
Ludwigfr 22:ebb37a249b5f 416 float normeSA=sqrt(pow(vSAx,2)+pow(vSAy,2));
Ludwigfr 22:ebb37a249b5f 417 //vector ->x (1,0)
Ludwigfr 22:ebb37a249b5f 418 float cosAlpha=1*vSAy/*+0*vSAx*//normeSA;;
Ludwigfr 22:ebb37a249b5f 419 //vector ->y (0,1)
Ludwigfr 22:ebb37a249b5f 420 float sinAlpha=/*0*vSAy+*/1*vSAx/normeSA;//+0*vSAx;
Ludwigfr 22:ebb37a249b5f 421 if (sinAlpha < 0)
Ludwigfr 22:ebb37a249b5f 422 return -acos(cosAlpha);
Ludwigfr 22:ebb37a249b5f 423 else
Ludwigfr 22:ebb37a249b5f 424 return acos(cosAlpha);
Ludwigfr 25:572c9e9a8809 425 }
Ludwigfr 25:572c9e9a8809 426
Ludwigfr 25:572c9e9a8809 427 float robot_center_x_in_orthonormal_x(){
Ludwigfr 25:572c9e9a8809 428 return Y;
Ludwigfr 25:572c9e9a8809 429 }
Ludwigfr 25:572c9e9a8809 430
Ludwigfr 25:572c9e9a8809 431 float robot_center_y_in_orthonormal_y(){
Ludwigfr 25:572c9e9a8809 432 return NB_CELL_WIDTH*sizeCellX-X;
Ludwigfr 25:572c9e9a8809 433 }
Ludwigfr 25:572c9e9a8809 434
Ludwigfr 25:572c9e9a8809 435 float robot_sonar_front_x_in_orthonormal_x(){
Ludwigfr 25:572c9e9a8809 436 return Y+DISTANCE_SONAR_FRONT_Y;
Ludwigfr 25:572c9e9a8809 437 }
Ludwigfr 25:572c9e9a8809 438 float robot_sonar_front_y_in_orthonormal_y(){
Ludwigfr 25:572c9e9a8809 439 return NB_CELL_WIDTH*sizeCellX-X+DISTANCE_SONAR_FRONT_X;
Ludwigfr 25:572c9e9a8809 440 }
Ludwigfr 25:572c9e9a8809 441
Ludwigfr 25:572c9e9a8809 442 float robot_sonar_right_x_in_orthonormal_x(){
Ludwigfr 25:572c9e9a8809 443 return Y+DISTANCE_SONAR_RIGHT_Y;
Ludwigfr 25:572c9e9a8809 444 }
Ludwigfr 25:572c9e9a8809 445 float robot_sonar_right_y_in_orthonormal_y(){
Ludwigfr 25:572c9e9a8809 446 return NB_CELL_WIDTH*sizeCellX-X+DISTANCE_SONAR_RIGHT_X;
Ludwigfr 25:572c9e9a8809 447 }
Ludwigfr 25:572c9e9a8809 448
Ludwigfr 25:572c9e9a8809 449 float robot_sonar_left_x_in_orthonormal_x(){
Ludwigfr 25:572c9e9a8809 450 return Y+DISTANCE_SONAR_LEFT_Y;
Ludwigfr 25:572c9e9a8809 451 }
Ludwigfr 25:572c9e9a8809 452 float robot_sonar_left_y_in_orthonormal_y(){
Ludwigfr 25:572c9e9a8809 453 return NB_CELL_WIDTH*sizeCellX-X+DISTANCE_SONAR_LEFT_X;
Ludwigfr 25:572c9e9a8809 454 }
Ludwigfr 25:572c9e9a8809 455
Ludwigfr 25:572c9e9a8809 456 float estimated_width_indice_in_orthonormal_x(int i){
Ludwigfr 25:572c9e9a8809 457 return sizeCellX/2+i*sizeCellX;
Ludwigfr 25:572c9e9a8809 458 }
Ludwigfr 25:572c9e9a8809 459 float estimated_height_indice_in_orthonormal_y(int j){
Ludwigfr 25:572c9e9a8809 460 return sizeCellY/2+j*sizeCellY;
geotsam 26:b020cf253059 461 }
geotsam 26:b020cf253059 462
geotsam 26:b020cf253059 463 void compute_angles_and_distance(float target_x, float target_y, float target_angle){
geotsam 26:b020cf253059 464 alpha = atan2((target_y-Y),(target_x-X))-theta;
geotsam 26:b020cf253059 465 alpha = atan(sin(alpha)/cos(alpha));
geotsam 26:b020cf253059 466 rho = dist(X, Y, target_x, target_y);
geotsam 26:b020cf253059 467 d2 = rho;
geotsam 26:b020cf253059 468 beta = -alpha-theta+target_angle;
geotsam 26:b020cf253059 469
geotsam 26:b020cf253059 470 //Computing angle error and distance towards the target value
geotsam 26:b020cf253059 471 rho += dt*(-kRho*cos(alpha)*rho);
geotsam 26:b020cf253059 472 temp = alpha;
geotsam 26:b020cf253059 473 alpha += dt*(kRho*sin(alpha)-ka*alpha-kb*beta);
geotsam 26:b020cf253059 474 beta += dt*(-kRho*sin(temp));
geotsam 26:b020cf253059 475 pc.printf("\n\r d2=%f", d2);
geotsam 26:b020cf253059 476 pc.printf("\n\r dt=%f", dt);
geotsam 26:b020cf253059 477 }
geotsam 26:b020cf253059 478
geotsam 26:b020cf253059 479 void compute_linear_angular_velocities(){
geotsam 26:b020cf253059 480 //Computing linear and angular velocities
geotsam 26:b020cf253059 481 if(alpha>=-1.5708 && alpha<=1.5708){
geotsam 26:b020cf253059 482 linear=kRho*rho;
geotsam 26:b020cf253059 483 angular=ka*alpha+kb*beta;
geotsam 26:b020cf253059 484 }
geotsam 26:b020cf253059 485 else{
geotsam 26:b020cf253059 486 linear=-kRho*rho;
geotsam 26:b020cf253059 487 angular=-ka*alpha-kb*beta;
geotsam 26:b020cf253059 488 }
geotsam 26:b020cf253059 489 angular_left=(linear-0.5*DISTANCE_WHEELS*angular)/RADIUS_WHEELS;
geotsam 26:b020cf253059 490 angular_right=(linear+0.5*DISTANCE_WHEELS*angular)/RADIUS_WHEELS;
geotsam 26:b020cf253059 491
geotsam 26:b020cf253059 492 //Slowing down at the end for more precision
geotsam 26:b020cf253059 493 // if (d2<25) {
geotsam 26:b020cf253059 494 // speed = d2*30;
geotsam 26:b020cf253059 495 // }
geotsam 26:b020cf253059 496
geotsam 26:b020cf253059 497 //Normalize speed for motors
geotsam 26:b020cf253059 498 if(angular_left>angular_right) {
geotsam 26:b020cf253059 499 angular_right=speed*angular_right/angular_left;
geotsam 26:b020cf253059 500 angular_left=speed;
geotsam 26:b020cf253059 501 } else {
geotsam 26:b020cf253059 502 angular_left=speed*angular_left/angular_right;
geotsam 26:b020cf253059 503 angular_right=speed;
geotsam 26:b020cf253059 504 }
geotsam 24:8f4b820d8de8 505 }