title: Absolute value squared of a complex number in Fortran
body: <p>Is there an intrinsic function in Fortran to compute the square modulus <code>|z|^2</code> of a complex number <code>z</code>? </p>
  
  <p>If not, is there a simpler or better way to compute it than the following?</p>
  
  <pre><code>REAL(z, precision_specifier)**2 + AIMAG(z)**2
  </code></pre>