meters_to_feet(3f) - [M_units:LENGTH] converts a measurement in meters to feet (LICENSE:PD)
Synopsis
Description
Options
Example
Author
License
elemental real function meters_to_feet(meters)
class(*),intent(in) :: meters
Converts feet to meters using the formula:
feet= meters/12.0/0.0254
feet any standard scalar value supported by anyscalar_to_real(3f). This at least includes REAL, INTEGER, and DOUBLEPRECISION.
Sample program
program demo_meters_to_feet use M_units, only : meters_to_feet implicit none write(*,*)With REAL array input , meters_to_feet([ -1.0, 0.0, 1.0 ]) write(*,*)With INTEGER array input , meters_to_feet([ -1, 0, 1 ]) write(*,*)With DOUBLEPRECISION , meters_to_feet(-1.0d0),meters_to_feet(0.0d0),meters_to_feet(1.0d0) end program demo_meters_to_feetResults
With REAL array input -3.28083992 0.00000000 3.28083992 With INTEGER array input -3.28083992 0.00000000 3.28083992 With DOUBLEPRECISION -3.28083992 0.00000000 3.28083992
John S. Urban
Public Domain
Nemo Release 3.1 | meters_to_feet (3) | February 23, 2025 |