Try the 1st one with
Code: Select all
REAL(KIND=dp) :: f(2), g
Code: Select all
Mean SPL on Boundary 1
MATC:
Value [dB]: Frequency [Hz]
4.324772836989E+001 1.000000000000E+002
UDF:
Value [dB]: Frequency [Hz]
4.324711041416E+001 1.000000000000E+002
Code: Select all
(0.00002_dp * sqrt(2.0_dp)))