libf/dyn3d/comdissip.f90

module comdissip

  ! From dyn3d/comdissip.h,v 1.1.1.1 2004/05/19 12:53:07

  implicit none

  LOGICAL lstardis
  INTEGER niterdis

  REAL tetavel,tetatemp,coefdis,gamdissip

end module comdissip
1	module comdissip
2
3	! From dyn3d/comdissip.h,v 1.1.1.1 2004/05/19 12:53:07
4
5	implicit none
6
7	LOGICAL lstardis
8	INTEGER niterdis
9
10	REAL tetavel,tetatemp,coefdis,gamdissip
11
12	end module comdissip