fortran程序出错

if (x>=0.) and (y>=0.) then 应该为： if (x>=0. .and. y>=0.) then 其它类似语句依此改正即可。