rest energy and dp

program tub20
implicit none
real:: time196884, bins, ergs
real :: ergs_in_gram, gram_to_ergs , ten_to_the_five
bins = 55.0
ergs = 7.0

time196884= 7


!9 e 20
gram_to_ergs = 9.0
ten_to_the_five=100000.0
ergs_in_gram=gram_to_ergs * ten_to_the_five**4.0

ergs = bins * gram_to_ergs
!units
! (*,*)
write (*,*) bins , ergs , time196884, gram_to_ergs, ergs_in_gram
end program tub20

!end source begin comment

How do I get dp out of this? The method I prefer is the one that beliavske
uses. I might ask him directly except that he thinks I post silly messages.

How do I get
!9 e 20
gracefully?

I was trying to measure the amount of rise/run on my property, and I kid you
not; a cop parks on the gradient, calls a bunch of his buddies, and they
went to work on me:
http://www.zaxfuuq.net/beatdowninabq1.htm

A day in the life.
--
wade ward


.