RosettaCodeData/Task/Call-a-function/Fortran/call-a-function-3.f
2023-07-01 13:44:08 -04:00

2 lines
44 B
Forth

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