Subroutine vom_adapt_roots


VARIABLES

maxval_tmpreal*8
?  
2207, 2219, 2220, 2221, 2243, 2244, 2245