& v_bdry_values_SI_base
_RL v_bdry_values_SI_base
& v_bdry_values_SI_base(i,j,bi,bj) *
& v_bdry_values_SI_base, 0, myThid )
& v_bdry_values_SI_base (i,j,bi,bj)