public Bit981(UGLink UGL) : this() { Bit981 B = new Bit981(); if (UGL.rcBit81 is Bit81) { int no = UGL.rcBit81.no; B._BQ[no] = UGL.rcBit81; foreach (int rc in UGL.rcBit81.IEGet_rc()) { B._BQ[no].BPSet(rc); } if (!UGL.rcBit81.IsZero()) { noBit |= (1 << no); } } else { UCell uc = UGL.UC as UCell; foreach (var n in uc.FreeB.IEGet_BtoNo()) { B._BQ[n].BPSet(uc.rc); noBit |= (1 << n); } } }
public Bit981(Bit981 Q) : this() { this.noBit = Q.noBit; for (int n = 0; n < sz; n++) { this._BQ[n] = Q._BQ[n]; } }
public int PrepareUGLinkMan(bool printB = false) { UGLLst = new List <UGLink>(); UGLink.IDnum0 = 0; //In UGLLst, rcb-Links is first, and cell-Links is second. This order is used in the algorithm. // 1)rcb-Links for (int no = 0; no < 9; no++) //no:digit { Bit81 BPnoB = new Bit81(pBDL, (1 << no)); for (int tfx = 0; tfx < 27; tfx++) //tfx:house { Bit81 Q = pHouseCells[tfx] & BPnoB; if (Q.IsZero()) { continue; } Q.no = no; Q.ID = (tfx << 4) | no; //ID is the usage within this algorithm(UGLinkMan). if (UGLLst.All(P => (P.rcBit81.no != no || P.rcBit81 != Q))) { UGLLst.Add(new UGLink(Q)); } //Q is unique? // else{ usedLKIgnrLst.Add(Q.ID); } //House is different but cells pattern is the same. } } // 2)cell-Links foreach (var UC in pBDL.Where(p => p.No == 0)) { UGLLst.Add(new UGLink(UC)); // cell elements } if (printB) { UGLLst.ForEach(P => WriteLine(P.ToString("prepare"))); // _usedLKLst_ToRCBString("### usedLKIgnrLst",usedLKIgnrLst); } _BDL_B9 = new Bit981(); foreach (var P in pBDL.Where(p => (p.FreeB) > 0)) { foreach (var no in P.FreeB.IEGet_BtoNo()) { _BDL_B9._BQ[no].BPSet(P.rc); } } for (int n = 0; n < 9; n++) { if (_BDL_B9._BQ[n].Count == 0) { _BDL_B9._BQ[n] = null; } } return(UGLLst.Count); }
public uint CompareTo(Bit981 B) { for (int n = 0; n < sz - 1; n++) { if (this._BQ[n] == B._BQ[n]) { return((uint)(this._BQ[n].CompareTo(B._BQ[n]))); } } return((uint)(this._BQ[sz - 1].CompareTo(B._BQ[sz - 1]))); }
static public Bit981 operator-(Bit981 A, Bit981 B) { Bit981 C = new Bit981(); for (int n = 0; n < sz; n++) { C._BQ[n] = A._BQ[n] - B._BQ[n]; } __Set_nzBit(C); return(C); }
//public Bit81 Get_BP81A2(int n0, int n1){ return _BQ[n0]&_BQ[n1]; } /* * public void rcbBitReset(int n, int tfx){ * if(n!=0xF) RCBbit[n].BitReset(tfx); * } */ public Bit981 Copy() { Bit981 Scpy = new Bit981(); for (int n = 0; n < sz; n++) { Scpy._BQ[n] = new Bit81(_BQ[n]); } Scpy.noBit = this.noBit; return(Scpy); }
public override bool Equals(object obj) { Bit981 A = obj as Bit981; if (A == null) { return(false); } for (int k = 0; k < sz; k++) { if (_BQ[k] != A._BQ[k]) { return(false); } } return(true); }
static private void __Set_nzBit(Bit981 C) { int noBit = 0; for (int n = 0; n < sz; n++) { if (C._BQ[n].IsZero()) { noBit &= ((1 << n) ^ 0x7FFFFFFF); } else { noBit |= (1 << n); } } C.noBit = noBit; }
public IEnumerable <UBasCov2> IEGet_BaseSet(int sz, int rnk) //### BaseSet generator { if (GLK_UList_All.Count < sz * 2 + rnk) { yield break; } BSstatus2 = new BaseSet_Status2(sz, rnk); //Marking method // #1:Focus on the link(LK0) and follow the connecting links. A link of size(sz) is a candidate for BaseSet/CoverSet. // (This alone won't make it faster.) // #2:Select BaseSet from the candidates and check suitability. // Excludes generation G1 links. // #3:Also select the CoverSet from the candidates. At least common elements with baseset are required. // Light selection and aptitude testing. // Efficient evaluation of aptitude of baseSet is important. // #4:If there is no solution for the candidate starting from LK0, record LK0 in the invalid list. // #2':Select BaseSet from the candidates, exclude links in the invalid list. Bit324 invalidLink = new Bit324(); foreach (var LK0 in GLK_UList_All) //#1 LK0:First link { _chkX1 = false; _chkX2 = false; // if( SDK_Ctrl.UGPMan.stageNo>=12 && sz>=3 ){//&& rnk==1){ // _chkX1=false; _chkX2=true; // if(LK0.ToAppearance()=="r4#2"){ // WriteLine($"--->{LK0.ToAppearance()}"); // _chkX1=false; _chkX2=true; // } // } if (_chkX1) { WriteLine($"\r-1- baseset sz:{sz} rnk:{rnk} first:{LK0} -"); } GLK_UList_Marked.Clear(); QueueGlk.Clear(); rcnGenNo = new int[9, 81]; //### gen ### BasCovCandidates = new Bit324(); #region ----- marking for LK0 ------------------------- BasCovCandidates.BPSet(LK0.IDsq); //1)BC_Set 候補のリスト ## 初のリンク(LK0)の登録 LK0._gen = 1; foreach (var NDx in LK0.ConnectLinks) //LK0の他端ノードNDx に着目 { var(rc, no) = (NDx >> 4, NDx & 0xF); // (rc,no) <-- NDx rcnGenNo[no, rc] = 1; //### gen ### //NDXの世代<-1 set rcnGenNo QueueGlk.Enqueue(NDx); //Enqueue(ND1) if (_chkX1) { WriteLine($"@{_jkc_++} -1.5- Enqueue {rc.ToRCString()}#{no+1}"); } } //==== sz>=2 ==== while (QueueGlk.Count > 0) { var ND2 = QueueGlk.Dequeue(); var(rc, no) = (ND2 >> 4, ND2 & 0xF); int gen = rcnGenNo[no, rc]; //### gen ### if (_chkX1) { WriteLine($"@{_jkc_++} -2- Dequeue {rc.ToRCString()}#{no+1}-G{gen}"); } if (gen > sz) { continue; } foreach (var LKpair in GLK_connection[rc, no]) { var(no2, rc2) = (LKpair.no2, LKpair.rc2); var gen2 = rcnGenNo[no2, rc2]; //### gen ### UGLink_unit LKx = LKpair.objUGL; LKx._gen = gen; bool hit = BasCovCandidates.IsHit(LKx.IDsq); BasCovCandidates.BPSet(LKx.IDsq); //1)BC_Set 候補のリスト ビット表現で重複を回避 if (_chkX1) { string st3 = $"@{_jkc_++} -2.5- Link set {LKx} {(hit? "---": "New")}"; WriteLine(st3); } if (gen2 == 0) { rcnGenNo[no2, rc2] = gen + 1; //### gen ### if (gen < sz) { QueueGlk.Enqueue(LKpair.rcno); if (_chkX1) { string st3 = $"@{_jkc_++} -3- Enqueue {rc2.ToRCString()}#{no2+1}-G{gen+1}"; st3 += " " + LKx.ToString(); WriteLine(st3); } } } } } GLK_UList_Marked.Add(LK0); //First is LK0. BasCovCandidates.BPReset(LK0.IDsq); //reset LK0. foreach (var LX in BasCovCandidates.IEGet_Index().Select(kx => GLK_UList_All[kx])) { GLK_UList_Marked.Add(LX); } if (_chkX2) { string stBC = $"\r@{_jkc_++} BasCovCandidates({GLK_UList_Marked.Count}) :"; GLK_UList_Marked.ForEach(LK => stBC += $" {LK.ToAppearance(Gen:true)}"); //#### debug print WriteLine(stBC); } if (GLK_UList_Marked.Count < sz) { continue; } #endregion ----- marking ------------------------- #region ----- selecte ------------------------- var GLK_UList_Sel = new List <UGLink_unit>(); Combination cmbBas = new Combination(GLK_UList_Marked.Count, sz); string st, stw = ""; int nxt = int.MaxValue; //(skip function) string stT = ""; while (cmbBas.Successor(nxt)) { nxt = int.MaxValue; if (cmbBas.Index[0] != 0) { continue; //"The first link is fixed at 0!" } GeneralLogicGen2.ChkBas0++; //***** var usedLKIDsq = new Bit324(); var BaseSetLst = new List <UGLink_unit>(); var HB981 = new Bit981(); //BaseSet bitPattern long RCBN_frameA = 0; int[] RCB_frameB9 = new int[9]; foreach (var(kx, elementX) in cmbBas.IEGetIndex2()) { nxt = kx; var UGL = GLK_UList_Marked[elementX]; if (kx >= 1 && UGL._gen == 1) { goto LnxtCombination; // (#2) excludes generation G1 links. } if (invalidLink.IsHit(UGL.IDsq)) { goto LnxtCombination; // (#2')exclude links in the invalid list. } usedLKIDsq.BPSet(UGL.IDsq); BaseSetLst.Add(UGL); foreach (var P in UGL.ConnectLinks) { int no2 = P & 0xF, rc2 = P >> 4; if (HB981.IsHit(no2, rc2)) { goto LnxtCombination; // BaseSet links do not overlap. } HB981.BPSet(no2, rc2); } long RCBN_frameB = UGL.RCBN_frameB; //bit expression of [ UC.FreeB<<27 | 1<<(UC.b+18)) | 1<<(UC.c+9) | (1<<UC.r) ] int freebX = (int)(RCBN_frameB >> 27); foreach (var no in freebX.IEGet_BtoNo()) { RCB_frameB9[no] |= (int)(RCBN_frameB & 0x7FFFFFF); } RCBN_frameA |= UGL.RCBN_frameB; //bit expression of rcb if (kx > 0) { if (!Check_rcbnCondition(sz, rnk, elementX, RCBN_frameA)) { goto LnxtCombination; //(### extremely efficient) ???? } } } if (!Check_rcbnCondition(sz, rnk, 0, RCBN_frameA)) { goto LnxtCombination; //Evaluate BaseSet pattern. Extremely efficient. } if (sz >= 2) { BSstatus2.Prepare(usedLKIDsq, BaseSetLst, HB981, RCB_frameB9); //check 421 52.1sec //check 124 53.6sec if (!BSstatus2.Check_4()) { goto LnxtCombination; //Each element of LK0 is associated with the rest of the links. } if (!BSstatus2.Check_2()) { goto LnxtCombination; //Each cell(A) is in a position to link with other cells. } if (!BSstatus2.Check_1()) { goto LnxtCombination; //A and B are not linked by other link(C). } // if( !BSstatus2.Check_3() ) goto LnxtCombination; //There is a limit to the number of cells that have no links other than BaseSet. // Check_1 and _3 are almost the same evaluation. Check_3 is a heavy process. // if( !BSstatus2.Check_5() ) goto LnxtCombination; //XXX Almost no effect. Check_1-4 has been determined. } var BasCov = new UBasCov2(usedLKIDsq, BaseSetLst, HB981, sz); if (_chkX2) { string st2 = $"\r{_jkc_++} BaseSet:"; BaseSetLst.ForEach(P => st2 += " " + P.ToAppearance()); // WriteLine(st2); WriteLine($"Check_5---->{st2}"); //################### } yield return(BasCov); LnxtCombination: continue; } //*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==* invalidLink.BPSet(LK0.IDsq); //#4:If there is no solution for the candidate starting from LK0, record LK0 in the invalid list. //*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==* #endregion ----- selecte ------------------------- } yield break; }
//1..4....8.9.1...5.....63.....13.5.79..3...8..76.2.94.....75.....1...6.4.8....4..2 public IEnumerable <UBasCov2> IEGet_CoverSet(UBasCov2 BasCov, int rnk) //### CoverSet generator { if (GLK_UList_All == null) { yield break; } int sz = BasCov.sz; if (GLK_UList_Marked.Count < sz) { yield break; } var BaseSetLst = BasCov.BaseSetLst; var usedLKIDsq = BasCov.usedLKIDsq; //used links var HB981 = BasCov.HB981; //BaseSet bit expression int noBit = HB981.noBit; //bit expression of digits containing cell elements var UGLCovCandidates = new List <UGLink_unit>(); // UGLCovCandidates:candidate link #region Preparation(Create UGLCovCandidates) //Preparation: select candidates for CoverSet.(this process is extremely effective!) // 1)First select BaseSet, then select CoverSet to cover. // 2)CoverSet requirements: // .Exclude links that do not contain BaseSet elements // .Rank=0 includes two or more elements of BaseSet // .Rank>0 contains one or more elements of BaseSet Bit81 Bcmp = HB981.CompressToHitCells(); //x long RCBN_frameBex = BaseSetLst.Aggregate((long)0,(p,q)=>p|q.RCBN_frameBex); foreach (var P in GLK_UList_Marked) //Exclude Baseset links //x if((RCBN_frameBex&P.RCBN_frameB) == 0) continue; { if (BaseSetLst.Contains(P)) { continue; } if (P.type == 0) // 0:link { if ((noBit & (1 << P.no)) == 0) { continue; //Exclude links with digits not included in BaseSet. } int Bcount = (HB981._BQ[P.no] & P.rcBit81).BitCount(); //Bcount : Number of cells in common with BaseSet. if (Bcount == 0) { continue; //Link without common parts is excluded from candidate links. } if (rnk == 0 && Bcount < 2) { continue; //if rank=0, the CoverSet has two or more common items } UGLCovCandidates.Add(P); } else // 1:cell { if (noBit.BitCount() <= 1) { continue; //For links within a cell, the Coverset digits must be 2 or more. } if ((noBit & P.FreeB) == 0) { continue; //Exclude links with digits not included in BaseSet. } int B = noBit & P.FreeB; //Common digits of BaseSet and link if (B == 0) { continue; //Link without common parts are excluded from candidate links. } int rc = P.rc; //focused cell int kcc = 0, kccLim = (rnk == 0)? 2:1; foreach (var no in B.IEGet_BtoNo()) //no:Candidate digit of forcused cell. { if (!HB981._BQ[no].IsHit(rc)) { continue; //do not check if BaseSet does not include no. } if (++kcc >= kccLim) { UGLCovCandidates.Add(P); break; } //number of digits contained in BaseSet satisfies the condition(kccLim). } } } if (_chkX2) { string st2 = $"{_jkc_++} UGLCovCandidates for CoverSet:"; st2 = UGLCovCandidates.Aggregate(st2, (p, q) => p + " " + q.ToAppearance());//#### debug print WriteLine(st2); } #endregion Preparation(Create UGLCovCandidates) #region CoverSet generator if (UGLCovCandidates.Count < sz + rnk) { yield break; } Bit981 HC981 = new Bit981(); //CoverSet Bit981 Can981 = new Bit981(); //Items that break "Locked"(excludable candidates) Combination cmbCvr = new Combination(UGLCovCandidates.Count, sz + rnk); int nxt = int.MaxValue; while (cmbCvr.Successor(nxt)) //Combination one-element generator { ++GeneralLogicGen2.ChkCov1; HC981.Clear(); Array.ForEach(cmbCvr.Index, m => HC981 |= UGLCovCandidates[m].rcnBit); //CoverSet bit expression if (!(HB981 - HC981).IsZero()) { goto LNextSet; //BaseSet is covered? } Bit981 CsubB = HC981 - HB981; //CsubB:excludable candidates if (CsubB.IsZero()) { goto LNextSet; // is exist? } var CoverSetLst = new List <UGLink_unit>(); Array.ForEach(cmbCvr.Index, m => CoverSetLst.Add(UGLCovCandidates[m])); //CoverSet List if (rnk == 0) { Can981 = CsubB; } //(excludable candidates) else //if(rnk>0){ // rank=k // Consider the case of covering n-BaseSet with (n+k)-CoverSet. // In order to be an analysis algorithm, the following conditions must be satisfied. // 1:(n+k)-CoverSet completely covers n-BaseSet. // 2:(k+1) of the (n+k) links of CoverSet have elements in common which are not included in the n-BaseSet. // When these conditions are satisfied, the elements of the intersection of condition 2 are not true. { bool SolFound = false; Can981.Clear(); foreach (int n in CsubB.noBit.IEGet_BtoNo()) { foreach (int rc in CsubB._BQ[n].IEGetRC()) { int kc = CoverSetLst.Count(Q => Q.rcnBit.IsHit(n, rc)); if (kc == rnk + 1) { Can981.BPSet(n, rc); SolFound = true; } } } if (!SolFound) { continue; } } ++GeneralLogicGen2.ChkCov2; //***** BasCov.addCoverSet(CoverSetLst, HC981, Can981, rnk); if (_chkX2) { string st = $"{_jkc_++} ◆CoverSet:"; foreach (var P in CoverSetLst) { st += $" {P.ToAppearance()}"; //#### debug print } WriteLine(st); } yield return(BasCov); LNextSet: continue; } yield break; #endregion CoverSet generator }
public void addCoverSet(List <UGLink> covUGLs, Bit981 HC981, Bit981 Can981, int rnk) { this.covUGLs = covUGLs; this.HC981 = HC981; this.Can981 = Can981; this.rnk = rnk; }
public UBasCov(List <UGLink> basUGLs, Bit981 HB981, int sz, Bit324 usedLK) { this.basUGLs = basUGLs; this.HB981 = HB981; this.sz = sz; this.usedLK = usedLK; }
public Bit981B() { _true = new Bit981(); _false = new Bit981(); }
public void Board_Check(string msg = "") { if (BSstatus == null || BSstatus.sz <= 1) { return; } Bit981 HB981 = BSstatus.HB981; //BaseSet bitPattern List <int> usedLKLst = BSstatus.usedLKLst; if (msg != "") { Write($"=>{msg}"); } string st = _usedLKLst_ToRCBString($"\rBaseSet usedLKLst:{_jkc_} -->", usedLKLst); usedLKLst.ForEach(P => st += $" {P}"); WriteLine(st); WriteLine(___frame_ToRCBString_2(BSstatus)); List <int> MLst = new List <int>(); foreach (var nx in HB981.noBit.IEGet_BtoNo()) { MLst.Add(nx); } for (int r = 0; r < 9; r++) { st = $" {r+1} "; MLst.ForEach(nx => { string M = $" {nx+1}"; var A = HB981._BQ[nx].Get_RowBitPatten(r); for (int c = 0; c < 9; c++) { st += ((A & (1 << c)) > 0)? M: " ."; } st += " "; }); for (int c = 0; c < 9; c++) { if (BSstatus._frame_T.IsHit(r * 9 + c)) { st += BSstatus._frame_81.IsHit(r * 9 + c)? " X": " B"; } else { st += " ."; } } if (r == 1) { st += " B is a BaseSet"; } if (r == 2) { st += " X is not used."; } WriteLine(st); } }
public IEnumerable <UBasCov> IEGet_BaseSet(int sz, int rnk) { if (UGLLst == null) { yield break; } BSstatus = new BaseSet_Status(sz, rnk); List <UGLink> basUGLs = BSstatus.basUGLs; //BaseSet List Bit981 HB981 = BSstatus.HB981; //BaseSet bitPattern Bit324 usedLK = BSstatus.usedLK; //usedLink(by serial number) List <int> usedLKLst = BSstatus.usedLKLst; long RCBN_frameA = 0; _jkc_ = 0; var cmbBas = new Combination(UGLLst.Count, sz); int nxt = int.MaxValue; //(skip function) while (cmbBas.Successor(nxt)) { GeneralLogicGen.ChkBas0++; //***** _jkc_++; // sz=1 *==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==* if (sz == 1) { UGLink UGL = UGLLst[cmbBas.Index[0]]; if (UGL.UC is UCell) { goto LNextSet; //only row/column/block link. } HB981.Clear(); HB981.BPSet(UGL.rcBit81.no, UGL.rcBit81, tfbSet: false); //accumulate rcbn info. in HB981. basUGLs.Clear(); basUGLs.Add(UGL); //set UGL in BaseSet GeneralLogicGen.ChkBas1++; //***** goto LBSFound; //possibility of solution } //=================================================================================================================== // sz>=2 *==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==* HB981.Clear(); basUGLs.Clear(); usedLKLst.Clear(); BSstatus.Clear(); RCBN_frameA = 0; int[] _RCB_frameB = new int[9]; for (int k = 0; k < sz; k++) //(r:row c:column b:block n:digit => rcbn) { nxt = k; UGLink UGL = UGLLst[cmbBas.Index[k]]; RCBN_frameA |= UGL.RCBN_frameB; //bit expression of rcbn if (!Check_rcbnCondition(sz, rnk, k, RCBN_frameA)) { goto LNextSet; //### extremely efficient } if (UGL.rcBit81 is Bit81) // ........................ rcb link ........................ { int no = UGL.rcBit81.no; if (k > 0 && HB981.IsHit(no, UGL.rcBit81)) { goto LNextSet; //elements already included in HB981 } HB981.BPSet(no, UGL.rcBit81, tfbSet: true); //accumulate rcbn info. in HB981. usedLKLst.Add(UGL.rcBit81.ID); //(ID=tfx<<4 | no) //[rcb_link type]register ID to used list. _RCB_frameB[no] |= (int)UGL.RCBN_frameB & 0x3FFFFFF; } else // ....................... Cell link ........................ { UCell UC = UGL.UC; int rc = UC.rc; //In UGLLst, rcb-Links is first, and cell-Links is second. //Even in combination, this order is maintained. //Therefore, the condition "cell-links have common parts with rcb-Links?" is satisfied. foreach (var no in UC.FreeB.IEGet_BtoNo(9)) { if (k > 0 && HB981.IsHit(no, rc)) { goto LNextSet; //Not BaseSet as it has no intersection. } HB981.BPSet(no, rc, tfbSet: true); //accumulate rcbn info. in HB981. _RCB_frameB[no] |= rc.ToRCBitPat(); } int IDrc = rc << 4 | 0xF; //( 0xF:Cell type identification flag ) usedLKLst.Add(IDrc); //(ID=rc<<4| no) //[cell type]register ID to used list. } basUGLs.Add(UGL); //set UGL in BaseSet // ........................................................... } BSstatus.RCB_frameB = _RCB_frameB; __UsedLinkToFrame(HB981, usedLKLst, BSstatus); //// if(SDK_Ctrl.UGPMan.stageNo==8 && _usedLKLst_ToRCBString("",usedLKLst)==" c1#3 c1#6"){ //// Board_Check("*** Check_6 ?"); //// } if (SDK_Ctrl.UGPMan.stageNo == 20 && _usedLKLst_ToRCBString("", usedLKLst) == " r3#2 r4#2 r3#8") { WriteLine(_usedLKLst_ToRCBString($"usedLKLst:{_jkc_}", usedLKLst, addFreeBB: true)); Board_Check(); } //*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==* // Board_Check(); //1..4....8.9.1...5.....63.....13.5.79..3...8..76.2.94.....75.....1...6.4.8....4..2 if (!BSstatus.Check_1()) { goto LNextSet; //A and B are not linked by other link(C). } if (!BSstatus.Check_2()) { goto LNextSet; //Each cell(A) is in a position to link with other cells. } if (!BSstatus.Check_3()) { goto LNextSet; //There is a limit to the number of cells that have no links other than BaseSet. } //*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==*==* /* * //if(SDK_Ctrl.UGPMan.stageNo==12 && sz>=3){// && rnk==1 ){ * if(SDK_Ctrl.UGPMan.stageNo==9 && sz>=2){// && rnk==1 ){ * WriteLine($"\r sz:{sz} rnk:{rnk} jkc:{_jkc_}"); * Check_rcbnCondition(sz,rnk,sz,RCBN_frameA,printB:true); * basUGLs.ForEach(P=>WriteLine(P.ToString("BaseSet"))); * } */ LBSFound: usedLK.Clear(); basUGLs.ForEach(P => usedLK.BPSet(P.IDnum)); //IDrc: rc<<17 | 1<<16 UBasCov UBC = new UBasCov(basUGLs, HB981, sz, usedLK); yield return(UBC); //--------------------------------------------------------------------------------------- LNextSet: continue; } yield break; void __UsedLinkToFrame(Bit981 HB981, List <int> usedLKLst, BaseSet_Status BSstatus) { int[] _frame_0 = new int[9]; int[] _frame_1 = new int[9]; Bit81 _frame_T = new Bit81(); int frm, _cellC = 0; foreach (var no in HB981.noBit.IEGet_BtoNo()) { _frame_0[no] = frm = HB981._BQ[no].IEGetRC().Aggregate(0, (Q, rc) => Q | rc.ToRCBitPat()); _frame_1[no] = ___frame_ResetUsed(frm, no, usedLKLst); _frame_T |= HB981._BQ[no]; } Bit81 _frame_81 = new Bit81(_frame_T); usedLKLst.ForEach(P => { if ((P & 0xF) == 0xF) { _frame_81.BPReset(P >> 4); _cellC++; } }); BSstatus._frame_0 = _frame_0; BSstatus._frame_1 = _frame_1; BSstatus._frame_T = _frame_T; BSstatus._frame_81 = _frame_81; BSstatus._cellC = _cellC; //(Number of cell links in BaseSet) } }