tie( 
  %NCAR::COMMON::IDPT, 
  'NCAR::COMMON',
  -id      => 36,
  -name    => 'IDPT',
  -vars    => {'ITPV' => [0,'i',1,[]],'X0' => ['4','f',1,[]],'P00' => ['28','f',1,[]],'P01' => ['52','f',1,[]],'Y0' => ['8','f',1,[]],'P02' => ['72','f',1,[]],'P10' => ['32','f',1,[]],'P03' => ['88','f',1,[]],'P11' => ['56','f',1,[]],'P04' => ['100','f',1,[]],'P12' => ['76','f',1,[]],'P20' => ['36','f',1,[]],'P05' => ['108','f',1,[]],'P13' => ['92','f',1,[]],'P21' => ['60','f',1,[]],'P14' => ['104','f',1,[]],'P22' => ['80','f',1,[]],'P30' => ['40','f',1,[]],'P23' => ['96','f',1,[]],'P31' => ['64','f',1,[]],'P32' => ['84','f',1,[]],'P40' => ['44','f',1,[]],'P41' => ['68','f',1,[]],'P50' => ['48','f',1,[]],'AP' => ['12','f',1,[]],'BP' => ['16','f',1,[]],'CP' => ['20','f',1,[]],'DP' => ['24','f',1,[]]},
);