V7/usr/src/libF77/abort_.c

Find at most related files.
including files from this version of Unix. 
#include <stdio.h>

abort_()
{
fprintf(stderr, "Fortran abort routine called\n");
_cleanup();
abort();
}