2 ms·

Sorry, I need to learn how to post code here.

• Jtsummers 8y ago
  Put two spaces in front of the content you want to appear as a code block (two spaces in front of each line): this version respects line breaks while this version does not respect line breaks.
• pjmlp 8y ago
  program xfact integer::i print *, fact ([(i, i = 0, 5)]) contains elemental function fact (n) integer, intent (in)::n integer::i fact = product ([(i, i = 1, n)]) end function fact end program xfact