でもfortranの算術if文はありかな