/* nag_info_licence (a00acc) Example Program.
*
* Copyright 2024 Numerical Algorithms Group.
*
* Mark 30.1, 2024.
*/
#include <nag.h>
#include <stdio.h>
int main(void) {
Integer exit_status = 0;
printf("nag_info_licence (a00acc) Example Program Results\n\n");
if (!nag_info_licence()) {
printf(" Unable to obtain a licence for this implementation.\n");
exit_status = 1;
goto END;
} else {
printf(" Licence query was successful\n");
}
END:
return exit_status;
}