Re: defining an arbitrary type in your newer Fortrans


Walter Spector wrote:


INTEGER, PARAMETER :: dbl_k = KIND (1.0d0) ! Double precision kind
REAL(dbl_k), ALLOCATABLE, DIMENSION(:,:) :: TwoDimmer


Whew! That's a little roundabout, but certainly better than my
ancient recourse to the old (IBMish?) REAL * 8. Of course we never used
that on the CDC's which didnt have bytes and single precision was quite
adequate.

Overall I have no major problems with the new Fortrans. Just a bit
surprised that this one particular type feature hasnt been embraced yet.

.