      subroutine user_ntuple_block_ini
c
c routine to initialize user block in column-wise ntuples 
c for ntuple package
c dummy
c
        implicit none
c
        end










