Ignore:
Timestamp:
Dec 19, 2002, 3:52:05 PM (21 years ago)
Author:
lmdzadmin
Message:

Convergence avec la version de Ionela Musat

bilan_dyn.F : correction bug dimension (PF)
conf_gcm.F : remize a zero de la date initiale (LF)
control.h : remize a zero de la date initiale (LF)
diagedyn.F : correction bug dimension (IM)
etat0_netcdf.F : lecture de co2_ppm & solaire ds physiq.def
gcm.F : remize a zero de la date initiale (LF)

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ.3.3/branches/rel-LF/libf/dyn3d/diagedyn.F

    r418 r431  
    6767      REAL ps(ip1jmp1)                       ! pression  au sol
    6868      REAL p (ip1jmp1,llmp1  )  ! pression aux interfac.des couches
    69       REAL pk (ip1jmp1,llmp1  )  ! = (p/Pref)**kappa
     69      REAL pk (ip1jmp1,llm  )  ! = (p/Pref)**kappa
    7070      REAL teta(ip1jmp1,llm)                 ! temperature potentielle
    7171      REAL q(ip1jmp1,llm)               ! champs eau vapeur
Note: See TracChangeset for help on using the changeset viewer.