=====================================================
 
SUBROUTINE SUM4(C,A,a1,B)
 
COMMONS: 
 
SUBROUTINES USED:
 
micromap-index
Mon Jul 17 08:57:44 CEST 2017