--- trunk/libf/dyn3d/conf_dat2d.f90 2011/01/25 15:11:05 39 +++ trunk/dyn3d/conf_dat2d.f 2014/04/25 14:58:31 97 @@ -1,14 +1,13 @@ module conf_dat2d_m - ! From conf_dat2d.F, version 1.2 2006/01/27 15:14:22 - IMPLICIT NONE contains SUBROUTINE conf_dat2d(xd, yd, xf, yf, champd, interbar) - ! Auteur : P. Le Van + ! From conf_dat2d.F, version 1.2 2006/01/27 15:14:22 + ! Author : P. Le Van ! Ce sous-programme configure le champ de données 2D 'champd' et ! les longitudes et latitudes de telle façon qu'on ait - pi à pi @@ -37,12 +36,11 @@ ! (latitudes, in degrees or radians, in increasing or decreasing ! order, from pole to pole) - LOGICAL, intent(in), optional:: interbar REAL, intent(out):: xf(:), yf(:) ! longitudes and latitudes, in rad REAL, intent(inout):: champd(:, :) + LOGICAL, intent(in), optional:: interbar - ! Variables locales: - + ! Local: INTEGER lons, lats LOGICAL radianlon ! "xd" is in degrees logical invlon ! "xd" contains longitudes between 0 and 2 pi