102{
103 if( major == 1)
104 {
105 if( *mycol == npcol-1 )
106 {
107 *mycol = 0;
108 if( *myrow == nprow-1 )
109 {
110 *myrow = 0;
111 }
112 else
113 {
114 *myrow = *myrow + 1;
115 }
116 }
117 else
118 {
119 *mycol = *mycol + 1;
120 }
121 }
122 else
123 {
124 if( *myrow == nprow-1 )
125 {
126 *myrow = 0;
127 if( *mycol == npcol-1 )
128 {
129 *mycol = 0;
130 }
131 else
132 {
133 *mycol = *mycol + 1;
134 }
135 }
136 else
137 {
138 *myrow = *myrow + 1;
139 }
140 }
141}