fortran逻辑表达式中，and两边必须各有一个英文句点；
长表达式最好用括号括起来，调试程序或再读程序的时候，方便，一目了然
if (x>=0.) and (y>=0.) then应该为： if (x>=0. .and. y>=0.) then其它类似语句依此改正即可。
