vg2Max=viscAhGridMax/deltaTmom
& viscAhGrid, viscAhGridMax, viscAhGridMin,
IF ( viscAhGridMax .EQ. 1.D21 ) viscAhGridMax = 0.25
_RL viscAhGridMax
AlinMax=viscAhGridMax*L2rdt
vg2Max=viscAhGridMax*recip_dt
viscAhGridMax = 1.D21