common/pfield/rbfld(0:10,0:nptcb),zbfld(0:10,0:nptcb),
     * prmin,pzmin,pdr,pdz,nrp,nzp,pzmax