GNU gdb (Ubuntu 8.1-0ubuntu3.2) 8.1.0.20180409-git
Copyright (C) 2018 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.  Type "show copying"
and "show warranty" for details.
This GDB was configured as "x86_64-linux-gnu".
Type "show configuration" for configuration details.
For bug reporting instructions, please see:
<http://www.gnu.org/software/gdb/bugs/>.
Find the GDB manual and other documentation resources online at:
<http://www.gnu.org/software/gdb/documentation/>.
For help, type "help".
Type "apropos word" to search for commands related to "word"...
Reading symbols from bounder...done.
(gdb) Starting program: /home/burkardt/public_html/f_src/gdb_test/bounder 

Program received signal SIGBUS, Bus error.
0x0000555555554e25 in test02 () at bounder.f90:122
122	    b(j) = j + 1
(gdb) $1 = 100000
(gdb) A debugging session is active.

	Inferior 1 [process 25859] will be killed.

Quit anyway? (y or n) [answered Y; input not from terminal]