tie( 
  %NCAR::COMMON::AGORIP, 
  'NCAR::COMMON',
  -id      => 155,
  -name    => 'AGORIP',
  -vars    => {'MDLA' => ['20','i',1,[]],'ISLD' => ['4','i',1,[]],'MWCL' => ['8','i',1,[]],'MWCM' => ['12','i',1,[]],'MWDQ' => ['28','i',1,[]],'SMRL' => [0,'f',1,[]],'MWCD' => ['24','i',1,[]],'MWCE' => ['16','i',1,[]],'INIF' => ['32','i',1,[]]},
);