      subroutine cpl_prism_init_empty
      end
