Компьютерное моделирование физических явлений. Малютин В.М - 93 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

ul[[4, 3]] = 1;
{ul, ulp}
{{{0,0,0,0,0},{0,1,0,0,2},{0,1,0,3,2},{0,1,1,0,0},{0,0,0,0,0}},{1,2,2}}
h). Для ячейки u [[4, 4]] мы используем такой же анализ, как в шаге e. Изменяем
значение ячейки ul [[4, 4]] на меньшее из значений ячеек ulp[[1]] и ulp[[3]] и
также изменяем значения в списке ulp так, что наибольшее значение из ulp[[1]] и
ulp[[3]] становится равным меньшему из ulp[[1]] и ulp[[3]]. Значения в ячейках
ul[[4, 4]] и ulp[[2]] становятся равными 1. (Шаг 4a2c)
ul[[4, 4]] = Min[ulp[[1]], ulp[[3]]];
ulp[[Max[ulp[[1]], ulp[[3]]]]] = Min[ulp[[1]], ulp[[3]]];
{ul, ulp}
{{{0,0,0,0,0},{0,1,0,0,2},{0,1,0,3,2},{0,1,1,1,0},{0,0,0,0,0}},{1,1,2}}
i). Для ячейки u[[5, 5]] сначала изменяем значение ul[[5, 5]] на (1 + Max[ul]) и
затем добавляем Max[ul] к списку ulp. (Шаг 4a2a)
ul[[5, 5]] = 1 + Max[ul];
AppendTo[ulp, Max[ul]];
{ul, ulp}
{{{0,0,0,0,0},{0,1,0,0,2},{0,1,0,3,2},{0,1,1,1,0},{0,0,0,0,4}},{1,1,2,4}}
На этом заканчивается просмотр участка u, используя шаг 4. Список ul теперь выглядит
так:
TableForm[ul]
00000
01002
01032
01110
00004
Ячейки, идентифицированные на участке ul как принадлежащие к группам 3 и 2
неправильно маркированы, а маркированные 1, 2 или 3 фактически принадлежат одной и
той же группе.
Шаг 5 корректирует участки, маркированные неправильно.
Значения в списке ulp указывают на изменения, которые происходят в списке ul, чтобы
правильно идентифицировать группы, к которым принадлежат ячейки.
Это делается так:
ulp[[k]]=m , где m - целое число. Если k=m, то участки, маркированные как
принадлежность к группе k, маркированы верно. Если m<k, участки, маркированные как
принадлежащие к группе k, должны повторно маркироваться как принадлежащие к группе
m.
В нашем примере,
ulp
{1,1,2,4}
93

Страницы