Позволяет ли фортран задать данные, которые будут доступны во всех подпрограммах?
Конкретный пример. Есть n-e кол-во подпрограмм, каждая из которых будет использовать число Пи. Есть возможность задать эту константу в каком-то отдельном общедоступном модуле, вместо того, чтобы в каждой подпрограмме задавать его заново? Задать где-то отдельно константу PI и из каждого уголка программы спокойно использовать её не беспокоясь о том, что я её не задал в начале подпрограммы.
Также интересует ещё один момент. Есть одна программа, которая постоянно обращается к подпрограмме, которая в свою очередь считывает несколько массивов и проводит с ними операции. То есть кол-во таких обращений может исчисляться в тысячах или миллионах раз. В итоге мы постоянно открываем файл, считываем из него массив, закрываем файл, используем массив в вычислениях, а потом, при следующем обращении к данной подпрограмме, мы проделываем всю эту процедуру заново. Сначала я решил, что какая собственно разница сколько раз мы считываем одно и то же, компьютер же не устаёт. Но потом оказалось, что программа выводит какое-то ограниченное кол-во результатов операций, а дальше действовать отказывается. Причём это кол-во постоянно разное. Сначала было 27, потом 5906. Я подумал, может происходит какое-то переполнение оперативной памяти или что-то вроде этого. Не знаю. В любом случае, надеюсь, что вы поняли, что я имел в виду, несмотря на корявость повествования.

Заранее благодарю за ответ.