Subroutine finalize
Use CommonInfo_Module
Use User_Module
!Use Hamilt_Module
Use Jacobi_Module
Implicit None

!=====================================================================
! Routine to deallocate arrays in modules

   if (.not.readin) then
     deallocate(smalls,larges)
   end if

Return
End Subroutine finalize