Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
Help update old fortran 77 code
decode(nb, 34, cdef(1:nb), err = 32) idea In which, nb is a integer variable. 34: format, which is a variable format. i<nb>, cdef(1:nb): one array err =32 : error output Can anyone help me update it? I try to use read to replace decode. character(LEN=20) FMT write(FMT,*) nb...
