NCEPLIBS-bufr  11.5.0
 All Data Structures Files Functions Variables Pages
strcln.f
Go to the documentation of this file.
1 C> @file
2 C> @author WOOLLEN @date 1994-01-06
3 
4 C> THIS SUBROUTINE RESETS THE MNEMONIC STRING CACHE IN THE
5 C> BUFR INTERFACE (ARRAYS IN COMMON BLOCK /STCACH/). THE MNEMONIC
6 C> STRING CACHE IS A PERFORMANCE ENHANCING DEVICE WHICH SAVES TIME
7 C> WHEN THE SAME MNEMONIC STRINGS ARE ENCOUNTERED IN A PROGRAM, OVER
8 C> AND OVER AGAIN (THE TYPICAL SCENARIO).
9 C>
10 C> PROGRAM HISTORY LOG:
11 C> 1994-01-06 J. WOOLLEN -- ORIGINAL AUTHOR
12 C> 1998-04-02 J. WOOLLEN -- MODIFIED TO ENLARGE THE CACHE FROM 50
13 C> ELEMENTS TO 1000, MAXIMUM
14 C> 1998-07-08 J. WOOLLEN -- CORRECTED SOME MINOR ERRORS
15 C> 2003-11-04 S. BENDER -- ADDED REMARKS/BUFRLIB ROUTINE
16 C> INTERDEPENDENCIES
17 C> 2003-11-04 D. KEYSER -- UNIFIED/PORTABLE FOR WRF; ADDED
18 C> DOCUMENTATION (INCLUDING HISTORY)
19 C>
20 C> USAGE: CALL STRCLN
21 C>
22 C> REMARKS:
23 C> THIS ROUTINE CALLS: None
24 C> THIS ROUTINE IS CALLED BY: MAKESTAB
25 C> Normally not called by any application
26 C> programs.
27 C>
28  SUBROUTINE strcln
29 
30  USE modv_mxs
31 
32  COMMON /stcach/ mstr,nstr,lstr,luns(mxs,2),usrs(mxs),icon(52,mxs)
33  CHARACTER*80 usrs
34 
35  mstr = mxs
36  nstr = 0
37  lstr = 0
38  RETURN
39  END
subroutine strcln
THIS SUBROUTINE RESETS THE MNEMONIC STRING CACHE IN THE BUFR INTERFACE (ARRAYS IN COMMON BLOCK /STCAC...
Definition: strcln.f:28
This module declares and initializes the MXS variable.
Definition: modv_MXS.f90:9