Wednesday, 20 March 2013

logaritmo

tau=2.
do i=1,200
t=0.2*i
x=log(1.+(t/tau)**2.)
write(10,*)t,x
end do