S2Triangulation/calcBario is a function. [bario, tId] = calcBario(sT, v, tId)
[bario,tId] = calcBario(sT,v,tId)