tie( 
  %NCAR::COMMON::INTPR, 
  'NCAR::COMMON',
  -id      => 178,
  -name    => 'INTPR',
  -vars    => {'NP' => ['12','i',1,[]],'TENSN' => ['8','f',1,[]],'MLLINE' => ['32','i',1,[]],'FPART' => ['4','f',1,[]],'IPAU' => [0,'i',1,[]],'ADDTB' => ['28','f',1,[]],'SMALL' => ['16','f',1,[]],'ADDLR' => ['24','f',1,[]],'ICLOSE' => ['36','i',1,[]],'L1' => ['20','i',1,[]]},
);