1C
2C Copyright (c) 1980 The Regents of the University of California.
3C All rights reserved.
4C
5C %sccs.include.proprietary.f%
6C
7C @(#)syml.f 5.2 (Berkeley) 04/12/91
8C
9
10 program syml
11
12 integer symlnk
13 external symlnk
14 write(*,*) symlnk("xyzzy", "poof")
15 end
16