& useFullLeith, useStrainTensionVisc,
LOGICAL useStrainTensionVisc
& useFullLeith, useAnisotropicViscAGridMax, useStrainTensionVisc,
CALL WRITE_0D_L( useStrainTensionVisc, INDEX_NONE,
useStrainTensionVisc= .FALSE.
IF (useStrainTensionVisc) THEN