_RL subMeso_LfMin
& subMeso_Ceff, subMeso_invTau, subMeso_LfMin
CALL WRITE_0D_RL( subMeso_LfMin, INDEX_NONE,
subMeso_LfMin = 1.0 _d +3
& subMeso_LfMin, subMeso_Lmax, GM_K3D_b1,
& subMeso_LfMin )