2
* $Id: smd_data.fh,v 1.1 2008-04-18 17:48:13 marat Exp $
5
parameter(smd_max_nd=100)
8
parameter(smd_max_n=100)
11
parameter(smd_max_ns=100)
14
integer smd_nd(smd_max_n)
15
integer smd_ns(smd_max_ns)
17
integer smd_nchar_namespace
18
parameter(smd_nchar_namespace=72)
20
character*72 smd_name(smd_max_n)
21
character*72 smd_dname(smd_max_n,smd_max_nd)
22
integer smd_handle(smd_max_n,smd_max_nd)
23
integer smd_index(smd_max_n,smd_max_nd)
24
integer smd_type(smd_max_n,smd_max_nd)
25
integer smd_dim(smd_max_n,smd_max_nd)