NCEPLIBS-bufr  11.6.0
 All Data Structures Files Functions Variables Pages
rsvfvm.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine rsvfvm (NEM1, NEM2)
 THIS SUBROUTINE STEPS THROUGH THE "FOLLOWING VALUE" MNEMONIC NEM1 AND, FOR EACH "." CHARACTER ENCOUNTERED (EXCEPT FOR THE INITIAL ONE), OVERWRITES IT WITH THE NEXT CORRESPONDING CHARACTER FROM NEM2 (SEE REMARKS). More...
 

Detailed Description

Author
WOOLLEN
Date
1994-01-06

Definition in file rsvfvm.f.

Function/Subroutine Documentation

subroutine rsvfvm ( character*8  NEM1,
character*8  NEM2 
)

THIS SUBROUTINE STEPS THROUGH THE "FOLLOWING VALUE" MNEMONIC NEM1 AND, FOR EACH "." CHARACTER ENCOUNTERED (EXCEPT FOR THE INITIAL ONE), OVERWRITES IT WITH THE NEXT CORRESPONDING CHARACTER FROM NEM2 (SEE REMARKS).

PROGRAM HISTORY LOG: 1994-01-06 J. WOOLLEN – ORIGINAL AUTHOR 2003-11-04 J. ATOR – ADDED DOCUMENTATION 2003-11-04 S. BENDER – ADDED REMARKS/BUFRLIB ROUTINE INTERDEPENDENCIES 2003-11-04 D. KEYSER – UNIFIED/PORTABLE FOR WRF; ADDED HISTORY DOCUMENTATION

USAGE: CALL RSVFVM (NEM1, NEM2) INPUT ARGUMENT LIST: NEM1 - CHARACTER*8: "FOLLOWING VALUE" MNEMONIC NEM2 - CHARACTER*8: MNEMONIC IMMEDIATELY FOLLOWING NEM1 WITHIN USER DICTIONARY TABLE

OUTPUT ARGUMENT LIST: NEM1 - CHARACTER*8: COPY OF INPUT NEM1 WITH ALL "." CHARACTERS (EXCEPT INITIAL ONE) OVERWRITTEN WITH CORRESPONDING CHARACTERS FROM NEM2

REMARKS: FOR EXAMPLE: if, on input: NEM1 = ".DTH...." NEM2 = "MXTM " then, on output: NEM1 = ".DTHMXTM"

THIS ROUTINE CALLS:        None
THIS ROUTINE IS CALLED BY: NEMTBD   SEQSDX
                           Normally not called by any application
                           programs.

Definition at line 40 of file rsvfvm.f.

Referenced by nemtbd(), and seqsdx().