Swiss court rejects Russia’s appeal against Olympic doping ban but halves its length