Custom Query (96 matches)

Dans "etat0_netcdf", on a la déclaration :

real pls(iip1,jjp1,llm)

et l'appel :

CALL startget(varname, iip1, jjm, rlonv, rlatv, llm, pls, workvar, vvent, 0.0, jjp1, rlonu, rlatu, interbar )

Dans la procédure appelée, "startget_dyn", on a, pour cet appel précis :

iml = iip1 jml = jjm lml = llm

et la déclaration :

REAL, INTENT(in) :: pls(iml, jml, lml)

qui équivaut donc à :

REAL, INTENT(in) :: pls(iip1, jjm, llm)

Les profils des arguments "pls" effectif et muet ne correspondent donc pas. Les éléments des argument "pls" effectifs et muet sont associés en suivant l'ordre des éléments de tableau (le premier indice varie le plus vite, puis le second etc.). Donc, par exemple, on va avoir :

pls_muet(:, 1, 2) = pls_effectif(:, jjp1, 1)

Si, dans "startget_dyn", les trois dimensions de "pls" sont toujours interprétées comme longitude, latitude, niveau vertical alors on va utiliser comme valeurs au second niveau vertical et au pôle nord des valeurs qui correspondent en fait au premier niveau vertical et au pôle sud. Le décalage s'accentue au fur et à mesure qu'on progresse dans les éléments du tableau. On a par exemple ensuite :

pls_muet(:, 1, 3) = pls_effectif(:, jjp1-1, 2)

On utilise comme valeurs au troisième niveau vertical et au pôle nord des valeurs qui correspondent en fait au second niveau vertical et à la dernière latitude avant le pôle sud.

In the procedure "inter_bary", there are the arguments:

INTEGER jmodmax
real fmod(jmodmax+1)

The corresponding actual arguments in "inter_barxy" are:

INTEGER jmod
REAL fmody(jjp1)

If "jmod = jjm+1" in "inter_barxy" then the size of the dummy argument "fmod" is greater than the size of the actual argument "fmody". This is forbidden by the Fortran standard. There is the risk of incorrectly overwriting memory.

The case "jmod = jjm+1" in "inter_barxy" occurs after the call to "startget" for variable "v" in "etat0_netcdf".

The raz_date parameter is not taken into account when the reference dates read in the start.nc file and the run.def namelist are equal even though it should be. This causes problems when one starts a simulation from the restart files of a previous simulation but using a different calendar: the time axis of the new simulation is off which can lead to "shifts" in the seasons.