IMSL library: Crash in function surface_fitting

Have a big issue with surface_fitting routine: It doesn't accept fine grid of spline breakpoints. I attached simplest possible project to demonstrate this issue. IF 11.0 Project contains file surface_fitting_ex1.f90 that ships with IMSL. In this code Integer parameter ngrid specify number of knots in a grid of breakpoints. Code ships with ngrid=9 on 2X2 square grid. 

Code works if ngrid<15. At ngrid>=15 surface_fitting routine throws an unhandled exception. Sure this value is too low to cause any computational problems but still it does. I tried IF 13.3 with updated version of IMSL6 but the only benefit was that surface_fitting started crashing from ngrid=16 and up. If there is any solution to this problem please let me know.