function uexa(x,t,kappa,l,io,task)

c General information:

c     This function uexa will crash when called.  Used to ensure that
c     no exact solution is being used.

c     Copyright 1996 Leon van Dommelen
c     Version 1.0 Leon van Dommelen 12/16/96

c Arguments are all ignored:

c External variables and info for compiling or changing function uexa:

c     The following utility routines from ../../../lib/util.f were used:

c        fatal(module,text1,text2,text3) kills the program after a
c     fatal error, printing the lines "text1", "text2" and "text3".
      external fatal

c Executable statements:

      call fatal('uexa',
     &'The exact solution is undefined.',
     &'Please select compatible subroutines.',' ')

c Exit:

c     Jump here when done:
 900  return
      end