Symbol | Description | Uses |
chk1 | 4 |
File | Line number | Procedure | Code |
./pkg/exch2/w2_set_f2f_index.F | 232 | W2_SET_F2F_INDEX |
chk1 = facet_pij(1,i,j)*facet_pij(1,ii,jj) |
./pkg/exch2/w2_set_f2f_index.F | 247 | W2_SET_F2F_INDEX |
IF ( chk1.NE.1 .OR. chk2.NE.0 .OR. chk5.NE.0 .OR. |
./pkg/exch2/w2_set_f2f_index.F | 254 | W2_SET_F2F_INDEX |
& ' Bug in Matrix Product:',chk1,chk2,chk3,chk4,chk5,chk6 |
./pkg/exch2/w2_set_f2f_index.F | 39 | W2_SET_F2F_INDEX |
INTEGER chk1, chk2, chk3, chk4, chk5, chk6 |