===================================================== FUNCTION DET2(A) COMMONS: SUBROUTINES USED: micromap-index Mon Jul 17 08:57:43 CEST 2017