Не поняла, зачем этот атрибут?? Смысл?

Так, поняла Я когда спрашиваю, быстрее соображаю, - даже если никто не отвечает

Атрибут save применяется, когда мы хотим сохранить для внутренней переменной после завершения процедуры:

• ее значение;
• статус определенности;
• статус ассоциирования (associated(var) = .true.) для ссылок (pointers);
• статус размещения для размещаемых переменных или массивов (allocated(var) == .true.).

Задания атрибута:


Пример


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


Правила работы с атрибутом:

• объект может появляться в списке save один раз;
• при задании атрибута без списка-объектов все объекты в данной программной единице приобретают атрибут save, если могут его иметь;
• задание атрибута save в главной программе не имеет никаого значения;
• при задании commom-блока в главной программе и при помещении в список-объектов commom-блок, этот атрибут приобретают он и все его переменные;
• при задании commom-блока в процедуре и при помещении в список-объектов commom-блок, этот атрибут приобретают он и все его переменные, которые сохраняют свое уникальное значение в каждой процедуре, где они присутствуют в списке-объектов атрибута save.

Атрибут save по умолчанию получают:

• переменные, инициализированные при объявлении;
• переменные, инициализированные в операторе data.

По умолчанию этот атрибут не имеют переменные производного типа, которые в своем описании имеют значения для компонент по умолчанию.


Атрибут save не могут иметь:

• пустой common-блок;
• отдельно объект в common-блоке;
• процедура;
• формальный параметр процедуры;
• результат функции или результирующей переменной функции;
• автоматический объект (внутренние массив или строка);
• именнованная константа;
• объекты, явно объявленные автоматическими черех атрибут automatic.

В разных компиляторах по умолчанию этот атрибут приписывается еще некоторым объектам.
Для CVF и FPS по умолчанию атрибут save имеют все переменные кроме:

• объектов с атрибутом allocatable;
• объектов с атрибутом pointer;
• автоматических объектов, например внутренний массив LocalArray(50) всегда будет размещаться заново при входе в процедуру, но не исключено, что он может быть случайно размещен в том же месте памяти.

Для IVFC так же по умолчанию этот атрибут получают:

• common-блоки;
• локальные переменные нерекурсивных процедур.

Зачем использовать этот атрибут? Может пригодиться, когда вы по каким-то причинам хотите, чтобы переменная помнила свое значение при следуещем входе в проуедуру. Например, чтобы начать с того же места, на котором остановился бинарный боиск в предположении, что очередное значение поиска в массиве лежит рядом или следует в массиве за тем, которое искалось при предыдущем вызове. Тогда поиск будет проходить быстрее.

Спасибочки

Если автор темы считает, что вопрос закрыт, лучше найти и нажать в теме Пометить вопрос решенным. Эта ссылка находится в верхней части формы быстрого ответа, кажись. В списке у темы появится галочка.