mdtools/libmdCode/atype_typedefs.F90

!! module defines atypes available to simulation

module atype_typedefs
  use definitions, only: dp
  use vector_class
  implicit none

  type (Vector), pointer :: atypes => null()

end module atype_typedefs
Revision:	317
Committed:	Tue Mar 11 23:13:06 2003 UTC (21 years, 4 months ago) by gezelter
File size:	208 byte(s)
Log Message:	Bug fixes
#	Content
1	!! module defines atypes available to simulation
2
3	module atype_typedefs
4	use definitions, only: dp
5	use vector_class
6	implicit none
7
8	type (Vector), pointer :: atypes => null()
9
10	end module atype_typedefs