Как реализовать связанный список в fortran 2003-2008

Question

Мне нужно реализовать структуру данных списка ссылок для моего кода молекулярной динамики в fortran 2003/2008 Я использую новейшие компиляторы fortran (Intel).

Как я могу реализовать связанный список наилучшим образом, я бы предпочел, чтобы в Fortran не было блокировки без ожидания, если это возможно в Fortran.

Спасибо.

Answer 1

Проще всего создать пользовательский тип с элементами данных и указателем на следующий элемент. Это предполагает односвязный список. например,

type MyList_type 
     integer :: FirstItem 
     real :: SecondItem 
     etc 
     type (MyList_type), pointer :: next_ptr => null() 
    end type MyList_type 

Затем создайте первый элемент с «allocate». После этого вы пишете код для перемещения по списку, используя next_ptr для перехода по списку. Используйте «связанную» внутреннюю функцию, чтобы проверить, определен ли next_ptr еще, или вы достигли конца списка.

Если вы пишете обычную последовательную программу Fortran, тогда блокировка/отсутствие ожидания не является проблемой. Если вы пишете многопоточную/параллельную программу, то непротиворечивый доступ к переменным является проблемой.

Вот еще несколько примеров: http://fortranwiki.org/fortran/show/Linked+list. Еще лучше, связанные списки в Фортране четко объясняются в книге «Fortran 90/95 Explained» Меткалфа и Рида.