This routine sets the application name to be of the form

TASKNAME ( PACKAGE VN.n-n )

That is, the taskname (which would be the default history if we did not change it) with the package name and the version number. The version number is specified at compile time.

CALL SURF_SET_APP_NAME( TSKNAME, STATUS )

TASKNAME = _CHAR (Given)

STATUS = _INTEGERS (Given & Returned)

• This routine should be compiled using the C pre-processor with a define for the PKG_VERS cpp variable. This variable should include the required quotes (since CPP will not change quoted strings). An example could be: f77 -DPKG_VERS="’5.2-4’" surf_set_app_name.F The V is prepended automatically.

Copyright ©1995,1996,1997,1998,1999 Particle Physics and Astronomy Research Council. All Rights Reserved.