# | Line 35 | Line 35 | end subroutine | |
---|---|---|
35 | is_Shape, is_FLARB, status) | |
36 | ||
37 | end subroutine | |
38 | + | |
39 | + | !clears memory up |
40 | + | subroutine deleteAtypes() |
41 | + | use atype_module,ONLY: delete_atypes |
42 | + | call delete_atypes() |
43 | + | end subroutine deleteatypes |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |