!-----------------------------------------------------------------------
      real(4),pointer::zeffij(:,:,:)
      COMMON/Z0EFFT/ZEFFIJ
!-----------------------------------------------------------------------