Sign up ×
Mathematica Stack Exchange is a question and answer site for users of Mathematica. It's 100% free, no registration required.

I'm trying to print Christoffel symbols of the second kind for a surface in $\mathbb R^3$. I currently am using something along the lines of

  Print[Subscript[Subscript[\[CapitalGamma]^k, i], j]],
  {i, 2}, {j, 2}, {k, 2}

Unfortunately the superscript '1' is suppressed. How do I force them to display?

share|improve this question
Instead of \[CapitalGamma]^k use Superscript[\[CapitalGamma], k]. – Artes May 8 '13 at 17:20
Do on its own can be used for nested loops. No need to repeat Do three times. – Sjoerd C. de Vries May 8 '13 at 17:30
@Artes Is there a way to do that with a control sequence? The code showing in my question is just how it copies out of Mathematica - I originally typed "Ctrl+6", "k", "Ctrl+Space". – merv May 8 '13 at 17:34
The Superscript page tells you the (partial) cause for your problem: "Input of the form x^y in a notebook is interpreted as Power[x,y], not as Superscript[x,y]." – Sjoerd C. de Vries May 8 '13 at 17:39
@SjoerdC.deVries The documentation makes it seem like "Ctrl+^" should be inserting \Superscript, not merely ^. – merv May 8 '13 at 17:49

Your Answer


By posting your answer, you agree to the privacy policy and terms of service.

Browse other questions tagged or ask your own question.