RosettaCodeData/Task/Enforced-immutability/Fortran/enforced-immutability-2.f

3 lines
43 B
FortranFixed
Raw Permalink Normal View History

2015-02-20 00:35:01 -05:00
subroutine sub1(n)
real, intent(in) :: n