Выделить Знак | * 0 0 0 | Умножить |
*y дает _1, если величина y
отрицательна; 0,
если она равна нулю; 1, если положительна. В общем
случае, *y
есть точка пересечения единичного круга на комплексной плоскости
с линией, проведенной из начала координат через точку y .
Например:*_3 0 5 3j4 _1 0 1 0.6j0.8Сравнение с нулем определено фразой (y%|y)*t<:|y и учитывает погрешность, где t обозначает ее (настраиваемую *!.t) величину. |
* обозначает умножение, определенное в элементарной арифметике и расширенное для комплексных чисел обычным образом:t=:+.x,y [ x=:2j4 [ y=:5j3 r=:-/*/t [ i=:+/ . * t (x,:y);t;r;i;(r j. i);(x*y) +---+---+--+--+-----+-----+ |2j4|2 4|_2|26|_2j26|_2j26| |5j3|5 3| | | | | +---+---+--+--+-----+-----+ |
* y=: _4 0 4 _1 0 1 >:@* y 0 1 2 f=: %: f ^: * " 0 y NB. Обратный к f, Тождество, или f 16 0 2 (* y) { ;:'Yes No Maybe' NB. Выбор по индексу ({) +-----+---+--+ |Maybe|Yes|No| +-----+---+--+ g=: <:`-:`+:@.*"0 NB. См. Сообразно (@.) g y _8 _1 2Диада * , примененная к списку и таблице, иллюстрирует важность соответствия, как обсуждается в Разделе II B:
m=: i. 3 4 [ v=: 3 2 1 m ; (v*m) ; (m*v) ; (+/ m*v) ; (v +/ . * m) +---------+----------+----------+-----------+-----------+ |0 1 2 3|0 3 6 9|0 3 6 9|16 22 28 34|16 22 28 34| |4 5 6 7|8 10 12 14|8 10 12 14| | | |8 9 10 11|8 9 10 11|8 9 10 11| | | +---------+----------+----------+-----------+-----------+