- gg_tube_SC(3,i)=gg_tube_SC(3,i)
- &+ssgradtube*tubetranene(itype(i))
- gg_tube(3,i-1)= gg_tube(3,i-1)
- &+ssgradtube*tubetranene(itype(i))
+C gg_tube_SC(3,i)=gg_tube_SC(3,i)
+C &+ssgradtube*tubetranene(itype(i))
+C gg_tube(3,i-1)= gg_tube(3,i-1)
+C &+ssgradtube*tubetranene(itype(i))