Доброго дня. При написании быстрого преобразования Фурье на фортране возникла необходимость (и желание) использовать двоичную инверсию чисел, для нахождения индексов последовательных элементов. Для того, чтобы реализовать это, нужен тип переменных unsigned integer. Если конкретнее, то нужны целые числа размером 1 и 4 байта, у которых самый левый бит был бы значащим, а не знаковым.

Порывшись в Бартеньеве, полазив по гуглу мне показалось, что такой тип не предусмотре для данного стандарта. И вот вопрос: можно ли его создать самому? Или он все-таки там есть? Это наверно просто делается, но я пока не понимаю как.

В 95-м вроде как расширение есть, но и от компилятора зависит.

The Fortran 95 compiler accepts a new data type, UNSIGNED, as an extension to the language. Four KIND parameter values are accepted with UNSIGNED: 1, 2, 4, and 8, corresponding to 1-, 2-, 4-, and 8-byte unsigned integers, respectively.

http://docs.oracle.com/cd/E19422-01/819-3686/4_f95.html

Я не знаток фортрана (стараюсь близко не подходить), но вроде бы его нет. Хотя есть расширение unsigned (kind=1,2,4,8) для Sun Fortran, ни gfortran ни ifort его похоже не поддерживают. Можно почитать еще вот это: http://software.intel.com/en-us/forums/topic/297670. Там есть обсуждение (ближе к концу) расширений для ifort. Но это не переносимо, конечно.

Про 95й-то я знаю, просто не дадут мне на него перейти, когда вся лаба на 90м )

Сейчас идея появилась не мудрить, а просто использовать для unsigned integer*1 и *4 просто integer*2 и *4, посмотрим как выйдет.

 

 

Для того, чтобы реализовать это, нужен тип переменных unsigned integer

 

Для проведения двоичной инверсии необходимости в беззнаковых числах нет

Что можете посоветовать?

Понятно, что должен быть способ без них обойтись, надо просто найти его. Чем и занимаюсь.

Начало four1:

http://www.fing.edu.uy/if/cursos/fiscomp/e...ec/book/f12.pdf