HTML version of Scripted Foils prepared 27 December 1996

Foil 10 Examples of POINTER's in Fortran90

From CPS615-Introduction to F90 Features, Rationale for HPF and Problem Architecture Delivered Lectures of CPS615 Basic Simulation Track for Computational Science -- 24 September 96. by Geoffrey C. Fox *
Secs 128.1
1 One can define a linked list as:
2 TYPE ENTRY
  • REAL VALUE
  • INTEGER INDEX
  • TYPE(ENTRY), POINTER :: NEXT
3 END TYPE ENTRY
4 ALLOCATE Creates dynamically elements in a linked list
5 CURRENT = ENTRY( NEW_VALUE, NEW_INDEX, FIRST)
6 FIRST => CURRENT
7 adds a new entry at start of linked list and renames it with POINTER FIRST
Table Font Size

© Northeast Parallel Architectures Center, Syracuse University, npac@npac.syr.edu

If you have any comments about this server, send e-mail to webmaster@npac.syr.edu.

Page produced by wwwfoil on Fri Aug 15 1997