unres_package_Oct_2016 from emilial

[unres4.git] / source / unres / data / map_data.f90

diff --git a/source/unres/data/map_data.f90 b/source/unres/data/map_data.f90
new file mode 100644 (file)
index 0000000..b706d35
--- /dev/null
+++ b/source/unres/data/map_data.f90
@@ -0,0 +1,10 @@
+      module map_data
+!-----------------------------------------------------------------------------
+! commom.map
+!      common /mapp/
+      integer :: nmap
+      integer,dimension(:),allocatable :: kang,res1,res2,nstep !(maxvar)
+      real(kind=8),dimension(:),allocatable :: ang_from,ang_to !(maxvar)
+!-----------------------------------------------------------------------------
+!-----------------------------------------------------------------------------
+      end module map_data