Print the integer kinds for each real type
Nodes of different colours represent the following:
Solid arrows point from a procedure to one which it calls. Dashed arrows point from an interface to procedures which implement that interface. This could include the module procedures in a generic interface or the implementation in a submodule of an interface in a parent module.
subroutine printTypes
!! Print the integer kinds for each real type
write(*,*) 'sp: ',sp
write(*,*) 'dp: ',dp
write(*,*) 'ep: ',ep
write(*,*) 'qp: ',qp
write(*,*) 'wp: ',wp
end subroutine printTypes