tie( 
  %NCAR::COMMON::AGOCHP, 
  'NCAR::COMMON',
  -id      => 175,
  -name    => 'AGOCHP',
  -vars    => {'CHS1' => [0,'c','504',[]],'CHS2' => ['2016','c','504',[]]},
);