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 |
# | User | Rev | Content |
---|---|---|---|
1 | mmeineke | 270 | !! module defines atypes available to simulation |
2 | |||
3 | module atype_typedefs | ||
4 | use definitions, only: dp | ||
5 | chuckv | 315 | use vector_class |
6 | mmeineke | 270 | implicit none |
7 | |||
8 | gezelter | 317 | type (Vector), pointer :: atypes => null() |
9 | gezelter | 309 | |
10 | mmeineke | 270 | end module atype_typedefs |