printTypes Subroutine

  1. kinds.f90
  2. kinds_mod
  3. printTypes

public subroutine printTypes()

Arguments

None

Description

Print the integer kinds for each real type


Source Code

	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