瀏覽代碼

pertenece cat

David 10 年之前
父節點
當前提交
0d7db42cf5
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      textoPlano/punto 9

+ 1 - 0
textoPlano/punto 9

@@ -1,6 +1,7 @@
 problema boicotPorDisciplna (j:JJOO, cat: (deporte,sexo), p:pais) = res : Int {
 
 	requiere finalizada (j) == false     // asumimos que se saca a los participantes antes de finalizar la competencia
+	requiere pertenece(cat,j)
 
 
 	modifica j;