1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
C C jwg.f C C Copyright (c) 2009 James McKenzie <20@madingley.org>, C All rights reserved. C subroutine RCSJWGF character*100 rcsid data rcsid/ + "$Id$" + / end subroutine C C $Log$ C Revision 1.1 2009/02/08 19:02:42 root C *** empty log message *** C C PROGRAM jwg END