+++ /dev/null
- 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