File tree Expand file tree Collapse file tree 3 files changed +19
-0
lines changed Expand file tree Collapse file tree 3 files changed +19
-0
lines changed Original file line number Diff line number Diff line change @@ -12,5 +12,7 @@ ADD_EXAMPLE(math_arange)
1212ADD_EXAMPLE(math_argd)
1313ADD_EXAMPLE(math_arg)
1414ADD_EXAMPLE(math_argpi)
15+ ADD_EXAMPLE(math_deg2rad)
16+ ADD_EXAMPLE(math_rad2deg)
1517ADD_EXAMPLE(math_is_close)
1618ADD_EXAMPLE(meshgrid)
Original file line number Diff line number Diff line change 1+ program example_math_deg2rad
2+ use stdlib_math, only: deg2rad
3+ implicit none
4+ print * , deg2rad(0.0 ) ! 0.0
5+ print * , deg2rad(90.0 ) ! 1.57508
6+ print * , deg2rad(- 180.0 ) ! -3.1416
7+
8+ end program example_math_deg2rad
Original file line number Diff line number Diff line change 1+ program example_math_rad2deg
2+ use stdlib_math, only: rad2deg
3+ use stdlib_constants, only: PI_sp
4+ implicit none
5+ print * , rad2deg(0.0 ) ! 0.0
6+ print * , rad2deg(PI_sp / 2.0 ) ! 90.0
7+ print * , rad2deg(- PI_sp) ! -3.1416
8+
9+ end program example_math_rad2deg
You can’t perform that action at this time.
0 commit comments