В Фортране есть способ определить тип переменной?

Возможный вариант использования, где необходим тип переменной, следующий. Мы передаем тип переменной в качестве аргумента функции, чтобы иметь возможность вызывать специфический для типа код с этой функцией, тем самым устраняя необходимость иметь отдельные похожие функции для каждого типа данных.