/GrADS/script/qctlinfo.gsf

ret = qctlinfo( fn, id [, num] )

test.gs

rc = gsfallow( 'on' )
'open t'
say qctlinfo( 1, 'xdef' )
ga-> test
xdef 144 linear 0 2.5

test.gs

rc = gsfallow( 'on' )
'open t'
say qctlinfo( 1, 'vlist' )
ga-> test
t