ViewVC Help
View File
|
Revision Log
|
Show Annotations
|
View Changeset
|
Root Listing
root
/
group
/
trunk
/
OOPSE_old
/
src
/
mdtools
/
libmdCode
/
atype_typedefs.F90
Revision:
317
Committed:
Tue Mar 11 23:13:06 2003 UTC
(21 years, 6 months ago) by
gezelter
File size:
208 byte(s)
Log Message:
Bug fixes
File Contents
#
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