--- trunk/libf/dyn3d/conf_dat3d.f90 2008/07/21 16:05:07 12 +++ trunk/libf/dyn3d/conf_dat3d.f90 2008/07/25 19:59:34 13 @@ -15,7 +15,7 @@ ! - pi/2 et pour que la coordonnée pression soit décroissante. use comconst, only: pi - use nrutil, only: assert_eq + use numer_rec, only: assert_eq REAL, intent(in):: xd(:), yd(:) ! longitudes et latitudes initiales REAL, intent(in):: zd(:) ! pressure levels, in Pa or hPa