! Replaces academic.h
! $Id: lmdz_academic.f90 5159 2024-08-02 19:58:25Z fairhead $

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