This subroutine identifies the minima of the coarse map grid. It is called by map_search. The code is based on a routine by Greg Howes, 2006.
Type  Intent  Optional  Attributes  Name  

double precision,  intent(in),  dimension(:,:), pointer  ::  val 
Array of determinant of the dispersion tensor. 

integer,  intent(in)  ::  numroots 
Number of roots. 

integer,  intent(out),  dimension(1:2,1:numroots)  ::  iroots 
Indices of roots. 

integer,  intent(out)  ::  nroots 
Number of roots found. 