Changeset 157
- Timestamp:
- 07/15/15 15:35:02 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
altifloat/src/locate.h
r129 r157 8 8 { 9 9 //printf("j_ll=%d ; k_ll=%d\n",j_ll,k_ll); 10 YS1_uinter(Yi,YTemps)=YS1_u (Yj,Yk,YTemps); //uLowerLeft //la 1ere sortie du module uinter pour le floater i est la valeur du module u en Yj Yk11 YS2_uinter(Yi,YTemps)=YS1_u (Yj+1,Yk,YTemps); //uLowerRight12 YS3_uinter(Yi,YTemps)=YS1_u (Yj,Yk+1,YTemps); //uUpperLeft13 YS4_uinter(Yi,YTemps)=YS1_u (Yj+1,Yk+1,YTemps); //uUpperRight10 YS1_uinter(Yi,YTemps)=YS1_utot(Yj,Yk,YTemps); //uLowerLeft //la 1ere sortie du module uinter pour le floater i est la valeur du module u en Yj Yk 11 YS2_uinter(Yi,YTemps)=YS1_utot(Yj+1,Yk,YTemps); //uLowerRight 12 YS3_uinter(Yi,YTemps)=YS1_utot(Yj,Yk+1,YTemps); //uUpperLeft 13 YS4_uinter(Yi,YTemps)=YS1_utot(Yj+1,Yk+1,YTemps); //uUpperRight 14 14 15 15 YS1_xinter_u(Yi,YTemps)=(YREAL)Yj+0.5; //iIndexLowerLeft … … 28 28 { 29 29 //printf("j_ll=%d ; k_ll=%d\n",j_ll,k_ll); 30 YS5_uinter(Yi,YTemps)=YS1_v (Yj,Yk,YTemps); //vLowerLeft //la 1ere sortie du module uinter pour le floater i est la valeur du module u en Yj Yk31 YS6_uinter(Yi,YTemps)=YS1_v (Yj+1,Yk,YTemps); //vLowerRight32 YS7_uinter(Yi,YTemps)=YS1_v (Yj,Yk+1,YTemps); //vUpperLeft33 YS8_uinter(Yi,YTemps)=YS1_v (Yj+1,Yk+1,YTemps); //vUpperRight30 YS5_uinter(Yi,YTemps)=YS1_vtot(Yj,Yk,YTemps); //vLowerLeft //la 1ere sortie du module uinter pour le floater i est la valeur du module u en Yj Yk 31 YS6_uinter(Yi,YTemps)=YS1_vtot(Yj+1,Yk,YTemps); //vLowerRight 32 YS7_uinter(Yi,YTemps)=YS1_vtot(Yj,Yk+1,YTemps); //vUpperLeft 33 YS8_uinter(Yi,YTemps)=YS1_vtot(Yj+1,Yk+1,YTemps); //vUpperRight 34 34 35 35 YS1_xinter_v(Yi,YTemps)=(YREAL)Yj; //iIndexLowerLeft … … 50 50 if (j_ll==Yj && k_ll==Yk) 51 51 { 52 YG1_u (Yj,Yk,YTemps)+=YG1_uinter(Yi,YTemps);53 YG1_u (Yj+1,Yk,YTemps)+=YG2_uinter(Yi,YTemps);54 YG1_u (Yj,Yk+1,YTemps )+=YG3_uinter(Yi,YTemps);55 YG1_u (Yj+1,Yk+1,YTemps)+=YG4_uinter(Yi,YTemps);52 YG1_utot(Yj,Yk,YTemps)+=YG1_uinter(Yi,YTemps); 53 YG1_utot(Yj+1,Yk,YTemps)+=YG2_uinter(Yi,YTemps); 54 YG1_utot(Yj,Yk+1,YTemps )+=YG3_uinter(Yi,YTemps); 55 YG1_utot(Yj+1,Yk+1,YTemps)+=YG4_uinter(Yi,YTemps); 56 56 } 57 57 … … 60 60 if (j_ll==Yj && k_ll==Yk) 61 61 { 62 YG1_v (Yj,Yk,YTemps)+=YG5_uinter(Yi,YTemps);63 YG1_v (Yj+1,Yk,YTemps)+=YG6_uinter(Yi,YTemps);64 YG1_v (Yj,Yk+1,YTemps)+=YG7_uinter(Yi,YTemps);65 YG1_v (Yj+1,Yk+1,YTemps)+=YG8_uinter(Yi,YTemps);62 YG1_vtot(Yj,Yk,YTemps)+=YG5_uinter(Yi,YTemps); 63 YG1_vtot(Yj+1,Yk,YTemps)+=YG6_uinter(Yi,YTemps); 64 YG1_vtot(Yj,Yk+1,YTemps)+=YG7_uinter(Yi,YTemps); 65 YG1_vtot(Yj+1,Yk+1,YTemps)+=YG8_uinter(Yi,YTemps); 66 66 } 67 67 }
Note: See TracChangeset
for help on using the changeset viewer.