implicit none real :: r comples :: c integer :: size_real, size_complex
r = 0. ; c = cmplx( 0.,0.) inquire( iolength=size_real ) r ! = 4 inquire( iolength=size_complex) c ! = 4 also; should give 8 end Size of a complex variable should be twice that of the corresponding real kind, but inquire gives the same value. (Similar problem if kind is changed.) Writing to direct access files opened using this record length will die because the record length is too small. -- Summary: inquire(iolength= ) for complex give incorrect value Product: gcc Version: 4.1.0 Status: UNCONFIRMED Severity: normal Priority: P2 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: weinert at cmth dot phys dot uwm dot edu CC: gcc-bugs at gcc dot gnu dot org GCC build triplet: i386-linux GCC host triplet: i386-linux GCC target triplet: i386-linux http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23428