& OBCS_u1_adv_Tr
INTEGER OBCS_u1_adv_Tr(PTRACERS_num)
CALL WRITE_1D_I( OBCS_u1_adv_Tr, PTRACERS_numInUse, INDEX_NONE,
& OBCS_u1_adv_Tr,
OBCS_u1_adv_Tr(iTracer) = 0
updateAdvFlx = OBCS_u1_adv_Tr(iTr)