forward(YREAL x, YREAL y) { //Yj = longitude //Yk = latitude int j_ll=(int)x; int k_ll=(int)y; if (j_ll==Yj && k_ll==Yk) { //printf("j_ll=%d ; k_ll=%d\n",j_ll,k_ll); YS1_uinter(Yi,YTemps)=YS1_u(Yj,Yk);//la 1ere sortie du module uinter pour le floater i est la valeur du module u en Yj Yk YS2_uinter(Yi,YTemps)=YS1_u(Yj+1,Yk); YS3_uinter(Yi,YTemps)=YS1_u(Yj,Yk+1); YS4_uinter(Yi,YTemps)=YS1_u(Yj+1,Yk+1); YS5_uinter(Yi,YTemps)=YS1_v(Yj,Yk); YS6_uinter(Yi,YTemps)=YS1_v(Yj+1,Yk); YS7_uinter(Yi,YTemps)=YS1_v(Yj,Yk+1); YS8_uinter(Yi,YTemps)=YS1_v(Yj+1,Yk+1); YS1_xinter(Yi,YTemps)=(YREAL)Yj; YS2_xinter(Yi,YTemps)=(YREAL)Yj+1; YS3_xinter(Yi,YTemps)=(YREAL)Yj; YS4_xinter(Yi,YTemps)=(YREAL)Yj+1; YS5_xinter(Yi,YTemps)=(YREAL)Yk; YS6_xinter(Yi,YTemps)=(YREAL)Yk; YS7_xinter(Yi,YTemps)=(YREAL)Yk+1; YS8_xinter(Yi,YTemps)=(YREAL)Yk+1; } } backward(YREAL x, YREAL y) { int j_ll=(int)x; int k_ll=(int)y; if (j_ll==Yj && k_ll==Yk) { YG1_u(Yj,Yk)+=YG1_uinter(Yi,YTemps); YG1_u(Yj+1,Yk)+=YG2_uinter(Yi,YTemps); YG1_u(Yj,Yk+1)+=YG3_uinter(Yi,YTemps); YG1_u(Yj+1,Yk+1)+=YG4_uinter(Yi,YTemps); YG1_v(Yj,Yk)+=YG5_uinter(Yi,YTemps); YG1_v(Yj+1,Yk)+=YG6_uinter(Yi,YTemps); YG1_v(Yj,Yk+1)+=YG7_uinter(Yi,YTemps); YG1_v(Yj+1,Yk+1)+=YG8_uinter(Yi,YTemps); } }