История изменений

Исправление no-such-file, 04.04.22 15:20 (текущая версия) :

нормальный язык

Блеванул от этого недоязыка. Смотри как надо

(loop 
  for element-a in A 
  for element-b in B 
  for element-c in C 
  collect (if (plusp element-c) element-a element-b))

Исходная версия no-such-file, 04.04.22 15:16:

нормальный язык

Блеванул от этого недоязыка. Смотри как надо

(loop 
  for element-a in A 
  for element-b in B 
  for element-c in C 
  collect (if (plusp element-c) element-a element-b))