We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents 023d7a5 + a420183 commit 7c83cf4Copy full SHA for 7c83cf4
example/complex_transforms.f90
@@ -33,7 +33,7 @@ program complex_transforms
33
print complex_format, "fft_f = ", fft_f
34
print complex_format, "f_round_trip = ",f_round_trip
35
36
- !call assert(all(abs(f_round_trip - f) < tolerance), "inverse of forward FFT must yield the original function")
+ call assert(all(abs(f_round_trip - f) < tolerance), "inverse of forward FFT must yield the original function")
37
38
contains
39
0 commit comments