common
     $/dbopidc/ dbopi2dc(nbomax,3,2),dbopidc(nbomax,3,2)