struct dMvbPar {
                 short NZDIM;
                 short NZBIG;
                 short NCHDIM;
                 short NPHUSE;
                 short NPHDIM;
                 short NSHELL;
                 short NSEGMENT;
                };