11 |
! Calcul des coordonnées ilon et jlat de la maille scalaire dans |
! Calcul des coordonnées ilon et jlat de la maille scalaire dans |
12 |
! laquelle se trouve le point (lon, lat). |
! laquelle se trouve le point (lon, lat). |
13 |
|
|
|
USE comgeom, only: rlonu, rlatv |
|
14 |
USE dimens_m, only: iim, jjm |
USE dimens_m, only: iim, jjm |
15 |
|
USE dynetat0_m, only: rlonu, rlatv |
16 |
|
|
17 |
REAL, intent(in):: lon, lat ! in rad |
REAL, intent(in):: lon, lat ! in rad |
18 |
INTEGER, intent(out):: ilon, jlat |
INTEGER, intent(out):: ilon, jlat |