- #1
Arokiamary
- 1
- 0
Please help ! FORTRAN ..
SUBROUTINE PRGTAC
COMMON IA(2),IB(2),J,JSUM,IFL
NR=4000-JSUM
IF(NR-51) 200,100,100
100 JSUM=0
RETURN
200 IF(NR.EQ.6 .OR. NR.EQ.7) PRINT 1
1 FORMAT(1H1)
In the above given lines from a program.. What does the 4th line intepret ? (200,100,100)
and what does 1H1 in the format mean ? .. Thank you :)
SUBROUTINE PRGTAC
COMMON IA(2),IB(2),J,JSUM,IFL
NR=4000-JSUM
IF(NR-51) 200,100,100
100 JSUM=0
RETURN
200 IF(NR.EQ.6 .OR. NR.EQ.7) PRINT 1
1 FORMAT(1H1)
In the above given lines from a program.. What does the 4th line intepret ? (200,100,100)
and what does 1H1 in the format mean ? .. Thank you :)