We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 7292778 commit 3763ab8Copy full SHA for 3763ab8
src/stdlib_math.fypp
@@ -474,7 +474,7 @@ contains
474
#:endfor
475
476
#:for k1, t1 in REAL_KINDS_TYPES
477
- elemental function deg2rad_${k1}$(theta)result(result)
+ elemental function deg2rad_${k1}$(theta) result(result)
478
${t1}$, intent(in) :: theta
479
${t1}$ :: result
480
result = theta * PI_${k1}$ / 180.0_${k1}$
0 commit comments