"getVarCov" in lme

#1
Is "getVarCov" of lme output gives variance-covariance of estimated "Standard Deviation" of random effects or variance-covariance of estimated "variance" of random effects .

Code:
library(nlme)

fm1 <- lme(distance ~ age, data = Orthodont)
VarCorr(fm1)
getVarCov(fm1)
That is ,
Code:
 VarCorr(fm1)
Subject = pdSymm(age) 
            Variance   StdDev    Corr  
(Intercept) 5.41508687 2.3270339 (Intr)
age         0.05126947 0.2264276 -0.609
Residual    1.71620459 1.3100399
Is getVarCov(fm1)[1,1] variance of as.numeric(VarCorr(fm1)[1,"Variance"]) or of as.numeric(VarCorr(fm1)[1,"StdDev"]) ?

Many Thanks!Regards.