Searched refs:ZoneB (Results 1 – 3 of 3) sorted by relevance
1 …ZoneB";}i:8;a:3:{i:0;s:98:"<zoneZZ><zoneA> these <b>words</b> </zoneA><zoneB> <b>and</b> these to …
30992 type (Zone_Axis_Type), intent(out):: ZoneB local31006 ZoneB%nlayer=031007 ZoneB%uvw=u31078 ZoneB%rx=bas(:,1)31079 ZoneB%ry=bas(:,2)31083 if (ZoneB%rx(i) < 0) coun1=coun1+131084 if (ZoneB%ry(i) < 0) coun2=coun2+131085 if (ZoneB%rx(i) == 0) coun01=coun01+131086 if (ZoneB%ry(i) == 0) coun02=coun02+131088 if (coun1 >= 2 .or. (coun1 == 1 .and. coun01 == 2)) ZoneB%rx=-ZoneB%rx[all …]