! Replaces academic.h ! $Id: lmdz_academic.f90 5159 2024-08-02 19:58:25Z evignon $ MODULE lmdz_academic USE lmdz_dimensions, ONLY: iim, jjm, llm, ndm USE lmdz_paramet IMPLICIT NONE; PRIVATE PUBLIC tetarappel, knewt_t, kfrict, knewt_g, clat4 REAL :: tetarappel(ip1jmp1, llm) REAL :: knewt_t(llm) REAL :: kfrict(llm) REAL :: knewt_g REAL :: clat4(ip1jmp1) END MODULE lmdz_academic