OBJFUN=0.d0
do 10 i=1,10
OBJFUN=OBJFUN+X*X*DLOG(X)
OBJFUN=OBJFUN
ってどういう意味ですか?