Group: comp.lang.fortran · Group Profile · Search for 40000000 in comp.lang.fortran
Author: James Tursa
Date: Aug 5, 2007 00:52
...ca(2), cx(2), cy(2), cz(2) C-EQV equivalence (two,itwo),(a,ia),(b,ib),(x,ix),(y,iy),(z,iz) C-DAT data two/2.d0/ data ctwo/' 4100','40000000'/ data ca /'AB00BBC0','BAC0AB00'/ data cx /'6A13BFE5','BEE56A13'/ data cy /'F2F44059','3F59F2F4'/ data cz /'4AA04006','3F064AA0'/ C----- C\ C Detect floating point format. 1 = alpha f_float, 2 = ieee...
|