==========================================================
 
      Linear fit based on least squared method
      y = a x + b
      x(n) input vector of length l
      y(n) input vector of length l
 
 ==========================================================
 
subroutine linearfit(x,y,l,a,b)
 
COMMONS: 
common-initi.f
 
SUBROUTINES USED:
 
micromap-index
Mon Jul 17 08:57:45 CEST 2017