c-----------------------------------------------------------------------
	subroutine MINDLESS(na,x)
c is a mindless example subroutine, to show how Kieron's format works.
c the first two comment lines are used for a simple description.
c
c So note that the first line is decorative,
c the second line is the program type, with the name of the progam in
capitals, which must be the same as the file name, in lowercase, ie this
c one is mindless.f
c author: Kieron Burke, 9.22.99 : (who wrote it, when)
c in:	n,x (input variables)
c out:	 (output variables)
c calls:any other subroutine called
c Next come all declarations, dimensions, commons, etc.
	include 'basics.inc'
	dimension f(100)