common
     $/dbopindc/ dbopindc(nbomax,3,2*mbond+2)