diff --git a/sources/io.F90 b/sources/io.F90 index a0c5e8e..ceeaace 100644 --- a/sources/io.F90 +++ b/sources/io.F90 @@ -2819,7 +2819,7 @@ module io call XMLGetAttributeValue(xml_ptr, 'BinaryFiles', array_name, & 'data_type', str) select case(str) - case('float64', 'int64') + case('complex64', 'float64', 'int64') item_size = 8 case('float32', 'int32') item_size = 4