!---------------------------------------------------------------------------
!---------------------------------------------------------------------------
!---------------------------------------------------------------------------
!
!  Dummy routine for the library.
!
subroutine plot_special

  use cesrv_struct
  use cesrv_interface

  implicit none

  print *, 'ERROR: DUMMY PLOT_SPECIAL CALLED!'
  call err_exit

end subroutine