As I understand, the use of procedures in derived types is somewhat not recommended if high-performance