blob: 80c2b79db1dbbfbb87a65ac9ef1d6a45ea6055bf (
plain) (
blame)
1
2
3
4
5
6
7
8
|
# MWCS common. Used for things that are global and don't change, i.e.,
# the WCS function drivers.
int fn_nfn # number of defined functions
int fn_table[LEN_FN,MAX_FN] # function table
char fn_names[SZ_FNNAME,MAX_FN] # function names
common /mwcscom/ fn_nfn, fn_table, fn_names
|
