pl	0	#
		da ener.out
		read {t 1 ek 2 eth 3 eg 4 ekx 5 eky 6 px 7 py 8 alphag 9 alphah 10 Q 11}
		#
		expand 1.5 
		lweight 3
		limits t eth
		era
		box
		connect t eth
		xla t\Omega
		yla E_{th}

