[фортран] Что-то я в этой жизни не понимаю....

(сам фортран в последний раз пользовал лет пятнадцать назад, так что могу быть неточным в формулировках)

скорее всгео с точки зрения вызывающих сущностей твоя функция не задекларирована и возвращающее значение взялось исходя из первой буквы её имени (F)
вот такой вариант будет работать (потому что декларация будет по I)

FUNCTION INT_FUNC(N)
INTEGER :: INT_FUNC
INTEGER :: N
INT_FUNC = N + 1
RETURN
END FUNCTION

PROGRAM TASK
PRINT *, INT_FUNC(10)
END PROGRAM

скорее всгео с точки зрения вызывающих сущностей твоя функция не задекларирована и возвращающее значение взялось исходя из первой буквы её имени (F)

забавно... то есть имя функции всегда содержит тип возвращаемого события? и для каждого типа есть префиксы?

содержит тип возвращаемого события

содержит возвращаемый тип

Кстати сработало.. спасибо...

попробуй в самом начале написать «implicit none».

оно отменит определение типа по первой букве

Вот из-за таких сюрпризов я и бросил фортран и перешел на С. Приходится иногда искать по 20 минут ошибку подобную этой. Самое обидное вначале ищешь в другом месте.

Ошибка еще в том, что по умолчанию стоит:

IMPLICIT REAL(A-H, O-Z), INTEGER(I-N) IMPLICIT

Отсюда функция F(N) - по умолчанию real :(

//Когда использовал, жестко задавал тип переменной.

Да без implicit none как уже выше сказали никуда, везде будут сюрпризы =) А так Фортран вполне себе нормальный язык. Да, забыл что хотел умного сказать... Пишите интерфейсы к функциям чтобы не было таких ошибок.

ага, еще где-то слышал, что у него стандартная библиотека хорошо оптимизирована под вычисления, проги побыстрее, чем на С получаются.

правда, сам язык временами доставляет, взять хотя бы эти страшные интерфейсы или implicit %)

Так получается что неявные определения типа по первой букве перекрывают явное указание типа функции?

Иначе бы из-за чего не сработало это

      INTEGER FUNCTION FUNC(N)
      INTEGER N
      FUNC = N + 1
      RETURN
      END FUNCTION

AFAIK, gcc/g77/gfotran используют одну и ту же библиотеку матфункций, так что различия могут накопиться только из-за способа вызова -- у C по значению (что включает дополнительное копирования переменной в стеке), у Фортрана -- по ссылке.