IF (cosPower.NE.0.) THEN
& **cosPower
& viscAz, cosPower, viscAstrain, viscAtension,
& cosPower, cAdjFreq, omega, rotationPeriod,
_RL cosPower
cosPower = 0.