소스 검색

asldkajsdlkj

Martu 10 년 전
부모
커밋
3ce9884082
1개의 변경된 파일1개의 추가작업 그리고 3개의 파일을 삭제
  1. 1 3
      textoPlano/punto 10

+ 1 - 3
textoPlano/punto 10

@@ -6,9 +6,7 @@ problema losMasFracasados (j: JJOO, p:Pais) = result:[Atleta]{
 
 	asegura noGanaronMedallas: (paraTodo x <- [noGanoMedallas(atl, comp) | atl <- result, comp <- todasLasCompetencias(j), finalizada(comp)]) x;
 	asegura todosDelPais: (paraTodo x <- result) nacionalidad(x) == p;
-	asegura (paraTodo x <- result, y <- atletas(j), nacionalidad(j)==p) competenciasEnLasQueParticipó(j, x) >= competenciasEnLasQueParticipó(j, y);
-
-	//asegura enOrden: (paraTodo i <- [0..|result|-2]) competenciasEnLasQueParticipó(j, result[i]) >= competenciasEnLasQueParticipó(j, result[i+1]);	
+	asegura (paraTodo x <- result, y <- atletas(j), nacionalidad(y)==p) competenciasEnLasQueParticipó(j, x) >= competenciasEnLasQueParticipó(j, y);
 }
 
 aux competenciasEnLasQueParticipó(j: JJOO, a:Atleta) : int =