& OBCS_u1_adv_T, OBCS_u1_adv_S,
INTEGER OBCS_u1_adv_T, OBCS_u1_adv_S
CALL WRITE_0D_I( OBCS_u1_adv_T, INDEX_NONE,
OBCS_u1_adv_T = 0
updateAdvFlx = OBCS_u1_adv_T