RosettaCodeData/Task/Singly-linked-list-Element-definition/Fortran/singly-linked-list-element-definition.f

9 lines
117 B
FortranFixed
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
type node
real :: data
type( node ), pointer :: next => null()
end type node
!
!. . . .
!
type( node ) :: head