! $Id: academic.h 5116 2024-07-24 12:54:37Z abarral $

      common/academic/tetarappel,knewt_t,kfrict,knewt_g,clat4
      REAL :: tetarappel(ip1jmp1,llm)
      REAL :: knewt_t(llm)
      REAL :: kfrict(llm)
      REAL :: knewt_g
      REAL :: clat4(ip1jmp1)