ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE_old/src/mdtools/libmdCode/atype_typedefs.F90
(Generate patch)

Comparing trunk/OOPSE_old/src/mdtools/libmdCode/atype_typedefs.F90 (file contents):
Revision 270 by mmeineke, Fri Feb 14 17:08:46 2003 UTC vs.
Revision 275 by mmeineke, Tue Feb 18 21:06:36 2003 UTC

# Line 34 | Line 34 | module atype_typedefs
34   !! Atype for soft sticky dipole water module
35    type :: ssd_atype
36  
37 +     integer :: atype_ident
38 +    
39   !! Lennard-Jones portion of SSD model
40       type (lj_atype) :: lj_params
41      
# Line 44 | Line 46 | module atype_typedefs
46   !! Pointer for linked list creation
47       type (ssd_atype), pointer :: next => null()
48       type (ssd_atype), pointer :: prev => null()
49 +
50    end type ssd_atype
51   !! Pointer list for ljAtype
52    type :: ssd_identPtrList

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines