1 LOGICAL NWPROP, NOMOVE, FSTPRP, NUMELC, CMPARE, SDRTST, 2 & RESTRT, DRYRUN, FRSTNM, PRPVIB, ADSTBK, NOADSY, 3 & MANUAL, MDEANA, PRPONL, PRPBAS, C4FORC 4 CHARACTER*80 PRPBTX 5 DIMENSION KDRYRN(6) 6 COMMON /NUMDER/ KDRYRN, NMORDR, NAORDR, NTORDR, NDCOOR, 7 & NMREDU, NUMCAL, MEMOFF, NMDPRP, NMRDRP, 8 & NARDRP, NMPCAL, NMEPRP, LUNDPR, NWPROP, 9 & NOMOVE, NUMELC, CMPARE, SDRTST, RESTRT, 10 & DRYRUN, FRSTNM, PRPVIB, MANUAL, ADSTBK, 11 & NOADSY, MDEANA, C4FORC 12 COMMON /NMDPRP/ NMEXCI, FSTPRP, PRPONL, PRPBTX, PRPBAS, 13 & NMRDBK, NARDBK 14