# | Line 49 | Line 49 | module atype_module | |
---|---|---|
49 | ||
50 | type (Vector), pointer, public :: atypes => null() | |
51 | ||
52 | + | |
53 | public :: new_atype | |
54 | public :: delete_atypes | |
55 | ||
56 | + | |
57 | + | |
58 | contains | |
59 | ||
60 | subroutine new_atype(ident, is_Directional, is_LennardJones, & | |
# | Line 102 | Line 105 | end module atype_module | |
105 | atypes => destroy(atypes) | |
106 | end subroutine delete_atypes | |
107 | ||
108 | + | |
109 | + | |
110 | + | |
111 | end module atype_module | |
112 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |