Modificado el calculo del potencial de confinamiento en la region de la WL.
treec602a5f992c28dbeca9800cfd8ff779e81b1e028
drwxr-xr-x - INP
-rwxr-xr-x 2111 Makefile
-rwxr-xr-x 5426 aux_proc.f90
-rwxr-xr-x 3287 displ_mod.f90
-rwxr-xr-x 4092 displ_slat.f90
-rwxr-xr-x 2852 dot_geo.f90
-rwxr-xr-x 2907 dsdump.f90
-rwxr-xr-x 3679 elipt.f90
-rwxr-xr-x 15092 input.f90
-rwxr-xr-x 7369 input_pzo.f90
-rwxr-xr-x 6202 input_str.f90
-rwxr-xr-x 777 make.ifort
-rwxr-xr-x 362 make.pgi
-rwxr-xr-x 10677 ncpack_displ.f90
-rwxr-xr-x 12950 ncpack_pot.f90
-rwxr-xr-x 12265 ncpack_pzo.f90
-rwxr-xr-x 20025 ncpack_str.f90
-rwxr-xr-x 676 pot.pbs
-rwxr-xr-x 45738 pot_slat.f90
-rwxr-xr-x 11921 potdrv.f
-rwxr-xr-x 7934 poten.f90
-rwxr-xr-x 6246 pzo_mod.f90
-rwxr-xr-x 4563 pzo_slat.f90
-rwxr-xr-x 1293 pzodrv.f90
-rwxr-xr-x 7522 str_mod.f90
-rwxr-xr-x 5560 str_slat.f90
-rwxr-xr-x 1556 strdrv.f90