Searched refs:R8WORD (Results 1 – 1 of 1) sorted by relevance
53 REAL*8 R8WORD, ZERO local62 EQUIVALENCE(R8WORD,I4WORD(1))63 EQUIVALENCE(R8WORD,L1BYTE(1))117 R8WORD = BUFFER(I)194 DOUBLE PRECISION R8WORD, ZERO local255 R8WORD = ZERO295 BUFFER(MDATA) = R8WORD299 & R8WORD466 SUBROUTINE R8BITREP(R8WORD) argument478 REAL*8 R8WORD, R8COPY local[all …]