libf/phylmd/comgeomphy.f90

module comgeomphy

  ! From phylmd/comgeomphy.h,v 1.1.1.1 2004/05/19 12:53:09

  ! Passage de la geometrie de la dynamique a la physique

  use dimphy, only: klon

  implicit none

  real airephy(klon), cuphy(klon), cvphy(klon)
  REAL rlatd(klon), rlond(klon)

  save

  private klon

end module comgeomphy
1	module comgeomphy
2
3	! From phylmd/comgeomphy.h,v 1.1.1.1 2004/05/19 12:53:09
4
5	! Passage de la geometrie de la dynamique a la physique
6
7	use dimphy, only: klon
8
9	implicit none
10
11	real airephy(klon), cuphy(klon), cvphy(klon)
12	REAL rlatd(klon), rlond(klon)
13
14	save
15
16	private klon
17
18	end module comgeomphy