de_mod.f

      MODULE de_mod
      USE stel_kinds
      USE gade_mod
      IMPLICIT NONE
      INTEGER :: n_pop, n_free, nopt, nfev
      REAL(rprec), DIMENSION(:,:), ALLOCATABLE :: ui_XC
 
      END MODULE de_mod