C C Common variables C DOUBLE PRECISION DR(NR2), R(0:NR2) C INTEGER NK C COMMON / RSIZE / DR, R, NK C