RosettaCodeData/Task/Call-a-function/Fortran/call-a-function-3.f
2016-12-05 22:15:40 +01:00

2 lines
44 B
Forth

H = A + B
IF (blah) H = 3*H - 7