integer,dimension(:),allocatable :: itype_pdb !(maxres) initialize in molread
!-----------------------------------------------------------------------------
!-----------------------------------------------------------------------------
+! common.box
+ real(kind=8) :: boxxsize,boxysize,boxzsize
+
end module geometry_data