DEC had very convenient format specifier <n> where n defined number of spaces for example. Possibly also number of digits in mantissa etc like instead of fixed e10.4 you write e<i1>.<j1>, which is equivalent to it if i=10, j=4, but i do not remember this for sure already. Very convenient. For example with iii=3 this
Write(11, '(<iii>x, i4)') iii
was writing iii and 3 spaces before it which is equivalent to
Write(11, '(3x, i4)') iii
You can do similar thing today in FTN95 only in 4 lines of text
character chFormat*16
chformat = '(xxxx, i4)'
write(chformat(2:5), '(i4.4)') = iii
Write(11, chformat) iii
Hell.