promoted memory_type from int to derived type