!
! $Header$
!
      real tetarappel(ip1jmp1,llm),taurappel
      common/academic/tetarappel,taurappel