В эту функцию я вообще не въезжаю - она зачем??

Товарисч Кр@ш,
Добавлено @ 23:05
Тут глюк случился в процессе запостения. Потрите дубль плз.

Функция Transfer позволяет заставить смотреть на некоторый объект по другому, отображает один тип данных в другой. Учитывая то, что все представляется битами, скажем, на символ, котрый этими битами представляется, можно посмотреть как на целое число. Если битов не хватает, то они дополняются (обычно нулями), если их в исходном объекте избыточно, то берутся первые нужные, остальные не задействуются.
Во-первых, чтобы далеко не ходить, можно есть функции, которые по символу возвращают его целочисленное значение, или по целочисленному значению возвращают соответствующий символ. В этом случае в битовом представлении они идентичны.
Из символа целый: IChar, IAChar. Вторая делает это на основе кодов ASCII.
Из целого в символьный: Char, AChar.
Вернемся к нашим баранам. Transfer( source, mold [, size] )
source -- на что хотим посмотреть по-новому; может быть и массивом,
mold -- смотрим на исходник как на тип, что у mold; может быть и массивом,
size -- если задан, то возвращается одномерный массив размера size, каждый элемент которого типа, что у mold.
Тут такое поведение:

• если mold скаляр и size отсутствует, то результат скаляр;
• если mold массив и size отсутствует, то результат массив одномерный. Его размер мал, насколько это возможно, но в байтах не меньше, чем у source.
• если size присутствует, то результат одномерный массив размера size.

Пример

Результаты выполнения


Можно применять, когда хотим например иметь список разнородных элементов и смотреть на узел, то как на один тип объектов, то как на другой. Призван заменить equivalence, но не рекомендую использовать оба, хотя у последнего есть одно применение. Можно обозначить одно и то же начало у одномерного у трехмерного массивов одного размера. Тогда, если мы захотим искать, скажем, максимальный элемент в трех мерном массиве, с которым и работаем, то можно проводить этот поиск в одномерном массиве, который в по памяти совпадает с трехмерным. Понадобится всего один цикл, не нужно будет расчитывать положение очередного элемента трехмерного массива, все будет делаться через одну индексацию. Это сэкономит время.

Последний пример - очень доходчивый. Только я буду дольше программу писать с трансфером, чем она по трем индексам искать максимальный элемент!!

Люблю все на практике объяснять.

Хм. Тогда трехиндексный поиск работает быстрее, чем я думал.

Не, это просто я - тормоз

Тогда поиск может позволить себе работать и помедленее.
Жду новых вопросов в твоих изысканиях.

Это сообщение отредактировал(а) Cr@$h - 31.1.2006, 16:55

Дык, вопросы тока начинаюцца Мне Фортран новый стал уже нравицца...

Это хорошо, солидарен. Жду пока кто-нить Fortran 2003 нормально реализует. Там полное ООП, исключения, поддержка Си на уровне типов и много-много всего. Но это уже совсем другая история...

Хм. Он мне нравится потому, что на матлаб похож а си - ну его совсем... не дамское это дело...

Родился от Fortran.

Не знаю, по ме так он просто запутанный. Fortran более строже, ИМХО.

Кстати, в этом ключе добавлю. Я использовал в примере модный конструктор для массива наподобие:

вместо классического

Добавлен последним стандартом и уже в некоторых местах реализован.

А его я начал изучать совсем недавно, так что это я торомоз.

Это сообщение отредактировал(а) Cr@$h - 31.1.2006, 22:47

Этот модный конструктор - уже совсем на матлаб похож

Мне тоже фортран за строгость нравицца Ничего лишнего, аккуратно и прозрачно, и теперь уже без странностей 77-го - вообще красота

Жаль, много кода на 77-ом написано, болшая часть netlib.org, наверное. А ведь его можно было ой как сократить да оптимизировать...