C Library Functions - rgetvalue (3)
NAME
rgetvalue(3f) - [M_calculator] given numeric variable name return real value directly from calculator dictionary for efficiency
(LICENSE:PD)
CONTENTS
Synopsis
Definition
Options
Example
Author
License
SYNOPSIS
real function rgetvalue(varnam)
character(len=*),intent(in) :: varnam
DEFINITION
Given numeric variable name return real value.
Note this is breaking the rule of only accessing the calculator thru calculator(3f).
It should only be used from optional user-defined substitute_subroutine(3f) routines to avoid recursion
OPTIONS
|
varnam |
name of calculator variable to look up that is assumed to
be a valid defined name of a numeric variable. If it does
not exist zero is returned without an error being reported.
|
|
EXAMPLE
Program:
program demo_rgetvalue
use M_calculator, only : rnum0
use M_calculator, only: rgetvalue
implicit none
real :: value1
value1=rnum0(A=100/2) ! store something into calculator
write(*,*)value1,rgetvalue(A)
end program demo_rgetvalue
Results:
50.0000000 50.0000000
AUTHOR
John S. Urban
LICENSE
Public Domain
| Nemo Release 3.1 | rgetvalue (3) | June 29, 2025 |
Generated by manServer 1.08 from a56145af-9ece-4f5d-bf93-9ab625254474 using man macros.