tie( 
  %NCAR::COMMON::AGORIQ, 
  'NCAR::COMMON',
  -id      => 159,
  -name    => 'AGORIQ',
  -vars    => {'SMLL' => [0,'f',1,[]]},
);