RosettaCodeData/Task/Enforced-immutability/Fortran/enforced-immutability-2.f
2023-07-01 13:44:08 -04:00

2 lines
43 B
Forth

subroutine sub1(n)
real, intent(in) :: n