Manual Reference Pages - stuffa (3)
NAME
stuffa(3f) - [M_calculator] stuffa(3f): directly store a string into calculator variable name table (LICENSE:PD)
CONTENTS
Synopsis
Definition
Options
Example
Author
License
SYNOPSIS
subroutine stuffa(varnam,string,ioflag)
character(len=*),intent(in) :: varnam character(len=*),intent(in) :: string character(len=*),intent(in),optional :: ioflag
DEFINITION
Breaking the rule of only accessing the calculator thru calculator(3f):a direct deposit of a value into the calculator assumed to be used only by friendly calls, for efficiency and to avoid problems with recursion if a routine called by the calculator in JUOWN1(3f) wants to store something back into the calculator variable table.
OPTIONS
varnam variable name to create or replace in calculator module string string to associate with the calculator variable name varnam ioflag journal logging type passed on to journal(3f) procedure. If it is not present or blank, the journal(3f) routine is not evoked.
EXAMPLE
Sample program:
program demo_stuffa use M_calculator, only : stuffa use M_calculator, only : snum0 implicit none call stuffa(’$A’,’’) call stuffa(’$mystring’,’this is the value of the string’) write(*,*)snum0(’$mystring’) call stuffa(’$mystring’,’this is the new value of the string’) write(*,*)snum0(’$mystring’) end program demo_stuffa
AUTHOR
John S. Urban
LICENSE
Public Domain
| stuffa (3) | March 11, 2021 |
