1*47944Sbostic /*- 2*47944Sbostic * Copyright (c) 1980 The Regents of the University of California. 3*47944Sbostic * All rights reserved. 423010Skre * 5*47944Sbostic * %sccs.include.proprietary.c% 623010Skre */ 723010Skre 8*47944Sbostic #ifndef lint 9*47944Sbostic static char sccsid[] = "@(#)f77lid_.c 5.2 (Berkeley) 04/12/91"; 10*47944Sbostic #endif /* not lint */ 11*47944Sbostic 1223010Skre /* 1312002Sdlw * f77lid_ - the ID strings for f77 libraries. 1423010Skre * 1512002Sdlw * Usage: 1612002Sdlw * include 'external f77lid' in the declarations in any f77 module. 1712002Sdlw */ 1812002Sdlw 1912002Sdlw extern char libU77_id[], libI77_id[], libF77_id[]; 2012002Sdlw char *f77lid_[] = { libU77_id, libI77_id, libF77_id }; 21