154 |
CcnhDebugEnds |
CcnhDebugEnds |
155 |
|
|
156 |
C-- I can now shut door3 because I know everyone has reached |
C-- I can now shut door3 because I know everyone has reached |
157 |
C-- door1. I can't shut door1 because I don't know if everyone |
C-- door1. I can not shut door1 because I do not know if everyone |
158 |
C-- has "gone" through the door yet. Nobody has yet reached |
C-- has "gone" through the door yet. Nobody has yet reached |
159 |
C-- door3 because they have to go through door2 first. |
C-- door3 because they have to go through door2 first. |
160 |
IF ( myThid .EQ. 1 ) THEN |
IF ( myThid .EQ. 1 ) THEN |
195 |
key2(1,myThid) = INVALID |
key2(1,myThid) = INVALID |
196 |
|
|
197 |
C-- I can now shut door1 because I know everyone has reached |
C-- I can now shut door1 because I know everyone has reached |
198 |
C-- door2. I can't shut door2 because I don't know if everyone |
C-- door2. I can not shut door2 because I do not know if everyone |
199 |
C-- has "gone" through the door yet. Nobody has yet reached |
C-- has "gone" through the door yet. Nobody has yet reached |
200 |
C-- door1 because they have to go through door3 first. |
C-- door1 because they have to go through door3 first. |
201 |
IF ( myThid .EQ. 1 ) THEN |
IF ( myThid .EQ. 1 ) THEN |
231 |
key3(1,myThid) = INVALID |
key3(1,myThid) = INVALID |
232 |
|
|
233 |
C-- I can now shut door2 because I know everyone has reached |
C-- I can now shut door2 because I know everyone has reached |
234 |
C-- door3. I can't shut door3 because I don't know if everyone |
C-- door3. I can not shut door3 because I do not know if everyone |
235 |
C-- has "gone" through the door yet. Nobody has yet reached |
C-- has "gone" through the door yet. Nobody has yet reached |
236 |
C-- door2 because they have to go through door1 first. |
C-- door2 because they have to go through door1 first. |
237 |
IF ( myThid .EQ. 1 ) THEN |
IF ( myThid .EQ. 1 ) THEN |