trunk/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	guez	3	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