if(din<0.5 .and. don>0.8)
如果这个你都不知道，建议你别改程序，要不然出错都找不到原因。