+ real(kind=8),dimension(:,:), allocatable :: catprm
+
+ real(kind=8),dimension(:,:), allocatable :: eps_scbase, &
+ sigma_scbase, &
+ sigmap1_scbase,sigmap2_scbase, &
+ dhead_scbasei, dhead_scbasej, epshead_scbase,&
+ sig0head_scbase, rborn_scbasei,rborn_scbasej,alphapol_scbase,epsintab_scbase,&
+ aa_scbase,bb_scbase
+ real(kind=8),dimension(:,:,:), allocatable :: alphasur_scbase, &
+ wdipdip_scbase,wqdip_scbase,chi_scbase,chipp_scbase,chis_scbase