! ! $Header$ ! !jyg+nrlmd< !!! integer iflag_pbl !!! common/compbl/iflag_pbl integer iflag_pbl,iflag_pbl_split common/compbl/iflag_pbl,iflag_pbl_split !>jyg+nrlmd !$OMP THREADPRIVATE(/compbl/)