GömbHáromszög(c__):=(Graphics3D[Flatten[{ParametricPlot3D[Evaluate[RotationTransform[φ,{0,0,1}][RotationTransform[θ,{0,1,0}][{0,0,1}]]],{θ,0,π},{φ,0,2 π},RegionFunction->Evaluate[Function[{x,y,z},Evaluate[And@@({x,y,z}.#1>0&)/@Apply[#3.#1\[Cross]#2 #1\[Cross]#2&,NestList[RotateLeft,#1,2],{1}]]]],PlotPoints->30,Mesh->None][[1]],Sphere[#,.06]&/@#,Apply[ParametricPlot3D[RotationTransform[t,#1\[Cross]#2][#1],{t,0,VectorAngle[#1,#2]},PlotStyle->{Tube[0.03]}][[1]]&,Subsets[#,{2}],{1}],Sphere[{0,0,0},.8]},1],Method->{"SpherePoints"->100},ViewPoint->{2.96028143680462`,0.16103319564411386`,-1.6311965316327197`},ViewCenter->{ImageScaled[{0,0,0},-{1,1,1}],{.5,.5}},SphericalRegion->True])&[Normalize/@{c}]
g=GömbHáromszög({2,1,1},{1,3,2},{0,0,1})