kind(3f) - [FORTRAN:INTRINSIC:KIND INQUIRY] Kind of an entity
k = kind(x)
kind(x) returns the kind value of the entity X.
X Shall be of type LOGICAL, INTEGER, REAL, COMPLEX or CHARACTER.
The return value is a scalar of type INTEGER and of the default integer kind.
Sample program:
program demo_kind implicit none integer,parameter :: kc = kind( ) integer,parameter :: kl = kind(.true.)print *, "The default character kind is ", kc print *, "The default logical kind is ", kl end program demo_kind
[[Fortran 95]] and later
[[Inquiry function]]
kind (3) | March 11, 2021 |