trunk/phylmd/comgeomphy.f

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, save:: airephy(klon)

  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	guez	168	real, save:: airephy(klon)
12	guez	3
13			private klon
14
15			end module comgeomphy