[ViewVC] Diff of: group/trunk/mdtools/md_code/atype

Comparing trunk/mdtools/md_code/atype_typedefs.F90 (file contents):
Revision 247 by chuckv, Mon Jan 27 18:28:11 2003 UTC vs.
Revision 266 by chuckv, Wed Feb 12 16:25:39 2003 UTC

+     type(lj_atype), pointer :: this => null()
+  end type lj_identPtrList
-+
+!! Atype for soft sticky dipole water module
-+
+  type :: ssd_atype
-+
-+
+!! Lennard-Jones portion of SSD model
-+
+     type (lj_atype) :: lj_params
-+
-+
+     logical :: hasDipole
-+
+     real ( kind = dp ) :: dipoleMoment = 0.0_dp
-+
+     real ( kind = dp ) :: w0
-+
+     real ( kind = dp ) :: v0
-+
+!! Pointer for linked list creation
-+
+     type (ssd_atype), pointer :: next => null()
-+
+     type (ssd_atype), pointer :: prev => null()
-+
+  end type ssd_atype
-+
+!! Pointer list for ljAtype
-+
+  type :: ssd_identPtrList
-+
+     logical :: exclude = .false.
-+
+     type(ssd_atype), pointer :: this => null()
-+
+  end type ssd_identPtrList
-+
-+
-+
-+
+end module atype_typedefs

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