---

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)

July 22, 2023

Generated by manServer 1.08 from 5e5c73fb-2e77-4139-abd9-3d6dbfa7dc70 using man macros.