IF ( GGL90TKEbottom .EQ. UNSET_RL ) THEN
GGL90TKEbottom = GGL90TKEmin
IF ( GGL90TKEbottom .LT. 0. ) THEN
& GGL90TKEmin, GGL90TKEbottom,
GGL90TKEbottom = UNSET_RL
_RL GGL90TKEmin, GGL90TKEbottom
& - GGL90TKEbottom*c(I,J,kBottom)