bl1 - iprob 12/30 modified T(l) in wavepacket - e^(-(x-xo)**2/sig**2)
      AND
      tsetup_bl1.f - added iprob 30 to an if statement setting 
	wide2=wavestdev2
bl2 - RESTORED AND RECHANGED:               
	NOW the idea is that bl2 is where I play around with the 
	xopause routine to put in my own temperature profile.

bl3 - changed the triple file to accept rx/ry as x0/z0.  ALSO, added
      in the bl1 change of the x-envelope so I could see if it actually
      implemented

      FURTHERMORE, edited the codeit to not bail if iprob = 30 and ry 
	ne 0 for a strictly 2D run
      Yeah, the _bl3 tree isn't going to be restored ever I don't think
	unless you wipe it clean and recreate it.

      Edited the tsetup_bl3.f file - added iprob30, allowing wide2
	to work for it now like 13
bl4 - OH NOES! MORE CODES?  Damn strait.  _bl3 has become the new
	standard, what with its new fangled ability to control 
	z0 and x0 from the codein.
bl5 -
      Anyway, here's the idea:
	bl3 = bl (=zyx) but with x0,z0 in place of RX/RY.  Means you
		can ONLY do 2D runs w/ this.
	      - Also, no x envelope a la bl1
	bl4 = bl3, but with an x envelope created for iprob 30
	bl5 = bl4, but with the cosine term in T(l) set to a constant.
		Done so that I can look at the envelope cleanly.  This
		was done for both 12, 13, and 30. (no, both is NOT 
		grammatically correct in this sense.)
	
3/08/06		ADDED IPROB 31 - Takes away the polynomial.
3/09/06		ADDED IPROB 31 - subtrp_bl5 needs editing as well

2/27/06
	FURTHER EDITED CODE -> Iprob 13 now has rx=ry=0, and uses
	the par0(25) and par0(26) for x0, z0.

bl8 - bl5 w/ diagnostics
bl9 - bl8 w/ diagnostics and moved the fourier transforms.
	bl9 has all the g# cases.

4/11/06
bl8 - restored to bl.  NOW it's being modded to do something like the
	kelvin subroutine.  I worry that setting the mean is
	not the same as setting an initial condition, but we'll see.
4/19/06
bl6 - bl8, but with edits like bl3 to let rx <=> uo       
bl7 - bl8, but with prof3b changed to increase the width of u
	in the z direction.

5/09/06
bl8 - the new _bl6 (rx = uo) but with a slightly different initial velocity
        profile.  The idea is that maybe my initial velocity 'pellet' is 
        too sharp and I need to soften it.  I'm running some bl8 and bl6
        runs off of a similar codein; see how they compare.
6/09/06
bl7 - reset to the code used in wren63.