forrtl: severe (161): Program Exception - array bounds exceeded  
Image              PC        Routine            Line        Source              
top.exe            00402FD4  INIT                      516  single.FOR 
top.exe            00401266  MAIN$SINGLE               147  single.FOR 
top.exe            0044ABA9  Unknown               Unknown  Unknown 
top.exe            004300E9  Unknown               Unknown  Unknown 
kernel32.dll       7C817077  Unknown               Unknown  Unknown 

b =

    0.3000
    0.2923
    6.7388
    9.8584
    0.4863
    1.1719
    0.7152
    7.2475
    0.9622
    1.0511
    1.0728
    1.0480
    1.0009
    0.9459
         0
         0
         0
         0
         0
         0


f =

    6.2800
   31.2000
  195.0000
   49.4000
   21.8000
   15.7000
   37.9000
   58.3000
   20.3000
   11.9000
    9.9200
   46.7000
   82.0000
   32.9000
   19.0000
   12.6000
    8.8700
    7.0000
    6.1500
    5.0200


ans =

  1.0e+004 *

    0.0036
    0.0955
    3.5442
    0.1564
    0.0454
    0.0211
    0.1383
    0.2606
    0.0374
    0.0118
    0.0078
    0.2084
    0.6561
    0.1021
    0.0361
    0.0159
    0.0079
    0.0049
    0.0038
    0.0025

forrtl: severe (161): Program Exception - array bounds exceeded  
Image              PC        Routine            Line        Source              
top.exe            00402FD4  INIT                      516  single.FOR 
top.exe            00401266  MAIN$SINGLE               147  single.FOR 
top.exe            0044ABA9  Unknown               Unknown  Unknown 
top.exe            004300E9  Unknown               Unknown  Unknown 
kernel32.dll       7C817077  Unknown               Unknown  Unknown 
??? Error using ==> minus
Matrix dimensions must agree.

Error in ==> verify at 35
   (f-b).^2