source/unres/minim_data.f90

   1       module minim_data
   2 !-----------------------------------------------------------------------------
   3 ! commom.minim
   4 !      common /minimm/
   5       real(kind=8) :: tolf,rtolf
   6       integer :: maxfun,maxmin,minfun,minmin,&
   7        print_min_ini,print_min_stat,print_min_res
   8 !-----------------------------------------------------------------------------
   9 !      common /przechowalnia/ subroutines: minim_jlee,minimize,minim_dc,
  10 !                                          minim_mcmf,minimize_sc1
  11       real(kind=8),dimension(:),allocatable :: v  !77+maxvar*(maxvar+17)/2 (maxvar=6*maxres)
  12 !-----------------------------------------------------------------------------
  13       end module minim_data