5 function nf90_copy_att(ncid_in, varid_in, name, ncid_out, varid_out)
6 integer,
intent( in) :: ncid_in, varid_in
7 character (len = *),
intent( in) :: name
8 integer,
intent( in) :: ncid_out, varid_out
15 integer,
intent( in) :: ncid, varid
16 character (len = *),
intent( in) :: curname, newname
23 integer,
intent( in) :: ncid, varid
24 character (len = *),
intent( in) :: name
33 integer,
intent( in) :: ncid, varid, attnum
34 character (len = *),
intent(out) :: name
41 integer,
intent( in) :: ncid, varid
42 character (len = *),
intent( in) :: name
43 integer,
intent(out),
optional :: xtype, len, attnum
46 integer :: local_xtype, local_len
52 if(present(xtype)) xtype = local_xtype
53 if(present(len )) len = local_len
61 integer,
intent( in) :: ncid, varid
62 character(len = *),
intent( in) :: name
63 character(len = *),
intent( in) :: values
70 integer,
intent( in) :: ncid, varid
71 character(len = *),
intent( in) :: name
72 character(len = *),
intent(out) :: values
82 integer,
intent( in) :: ncid, varid
83 character(len = *),
intent( in) :: name
84 integer (kind = OneByteInt),
dimension(:),
intent( in) :: values
91 integer,
intent( in) :: ncid, varid
92 character(len = *),
intent( in) :: name
93 integer (kind = OneByteInt),
intent( in) :: values
96 integer (kind = OneByteInt),
dimension(1) :: valuesa
102 integer,
intent( in) :: ncid, varid
103 character(len = *),
intent( in) :: name
104 integer (kind = OneByteInt),
dimension(:),
intent(out) :: values
111 integer,
intent( in) :: ncid, varid
112 character(len = *),
intent( in) :: name
113 integer (kind = OneByteInt),
intent(out) :: values
116 integer (kind = OneByteInt),
dimension(1) :: valuesa
122 integer,
intent( in) :: ncid, varid
123 character(len = *),
intent( in) :: name
124 integer (kind = TwoByteInt),
dimension(:),
intent( in) :: values
131 integer,
intent( in) :: ncid, varid
132 character(len = *),
intent( in) :: name
133 integer (kind = TwoByteInt),
intent( in) :: values
136 integer (kind = TwoByteInt),
dimension(1) :: valuesa
142 integer,
intent( in) :: ncid, varid
143 character(len = *),
intent( in) :: name
144 integer (kind = TwoByteInt),
dimension(:),
intent(out) :: values
151 integer,
intent( in) :: ncid, varid
152 character(len = *),
intent( in) :: name
153 integer (kind = TwoByteInt),
intent(out) :: values
156 integer (kind = TwoByteInt),
dimension(1) :: valuesa
162 integer,
intent( in) :: ncid, varid
163 character(len = *),
intent( in) :: name
164 integer (kind = FourByteInt),
dimension(:),
intent( in) :: values
171 integer,
intent( in) :: ncid, varid
172 character(len = *),
intent( in) :: name
173 integer (kind = FourByteInt),
intent( in) :: values
176 integer (kind = FourByteInt),
dimension(1) :: valuesa
177 valuesa(1) = int(values)
182 integer,
intent( in) :: ncid, varid
183 character(len = *),
intent( in) :: name
184 integer (kind = FourByteInt),
dimension(:),
intent(out) :: values
187 integer,
dimension(size(values)) :: defaultinteger
190 values(:) = defaultinteger(:)
194 integer,
intent( in) :: ncid, varid
195 character(len = *),
intent( in) :: name
196 integer (kind = FourByteInt),
intent(out) :: values
199 integer,
dimension(1) :: defaultinteger
202 values = defaultinteger(1)
206 integer,
intent( in) :: ncid, varid
207 character(len = *),
intent( in) :: name
208 integer (kind = EightByteInt),
dimension(:),
intent( in) :: values
215 integer,
intent( in) :: ncid, varid
216 character(len = *),
intent( in) :: name
217 integer (kind = EightByteInt),
intent( in) :: values
220 integer,
dimension(1) :: valuesa
226 integer,
intent( in) :: ncid, varid
227 character(len = *),
intent( in) :: name
228 integer (kind = EightByteInt),
dimension(:),
intent(out) :: values
231 integer,
dimension(size(values)) :: defaultinteger
234 values(:) = defaultinteger(:)
238 integer,
intent( in) :: ncid, varid
239 character(len = *),
intent( in) :: name
240 integer (kind = EightByteInt),
intent(out) :: values
243 integer,
dimension(1) :: defaultinteger
246 values = defaultinteger(1)
252 integer,
intent( in) :: ncid, varid
253 character(len = *),
intent( in) :: name
254 real (kind = FourByteReal),
dimension(:),
intent( in) :: values
261 integer,
intent( in) :: ncid, varid
262 character(len = *),
intent( in) :: name
263 real (kind = FourByteReal),
intent( in) :: values
266 real (kind = FourByteReal),
dimension(1) :: valuesa
272 integer,
intent( in) :: ncid, varid
273 character(len = *),
intent( in) :: name
274 real (kind = FourByteReal),
dimension(:),
intent(out) :: values
281 integer,
intent( in) :: ncid, varid
282 character(len = *),
intent( in) :: name
283 real (kind = FourByteReal),
intent(out) :: values
286 real (kind = FourByteReal),
dimension(1) :: valuesa
292 integer,
intent( in) :: ncid, varid
293 character(len = *),
intent( in) :: name
294 real (kind = EightByteReal),
dimension(:),
intent( in) :: values
301 integer,
intent( in) :: ncid, varid
302 character(len = *),
intent( in) :: name
303 real (kind = EightByteReal),
intent( in) :: values
306 real (kind = EightByteReal),
dimension(1) :: valuesa
312 integer,
intent( in) :: ncid, varid
313 character(len = *),
intent( in) :: name
314 real (kind = EightByteReal),
dimension(:),
intent(out) :: values
321 integer,
intent( in) :: ncid, varid
322 character(len = *),
intent( in) :: name
323 real (kind = EightByteReal),
intent(out) :: values
326 real (kind = EightByteReal),
dimension(1) :: valuesa
integer function nf_del_att(ncid, varid, name)
function nf_put_att_double(ncid, varid, name, xtype, nlen, dvals)
function nf_put_att_real(ncid, varid, name, xtype, nlen, rvals)
integer function nf90_rename_att(ncid, varid, curname, newname)
integer function nf90_put_att_one_fourbytereal(ncid, varid, name, values)
integer function nf_get_att_real(ncid, varid, name, rvals)
integer function nf90_put_att_one_eightbytereal(ncid, varid, name, values)
integer function nf90_put_att_one_fourbyteint(ncid, varid, name, values)
integer function nf_get_att_double(ncid, varid, name, dvals)
integer function nf_inq_attname(ncid, varid, attnum, name)
integer function nf90_put_att_fourbyteint(ncid, varid, name, values)
integer function nf_inq_attid(ncid, varid, name, attnum)
integer function nf90_get_att_one_eightbyteint(ncid, varid, name, values)
integer function nf90_copy_att(ncid_in, varid_in, name, ncid_out, varid_out)
integer function nf_rename_att(ncid, varid, name, newname)
integer function nf_get_att_int(ncid, varid, name, ivals)
integer function nf_get_att_text(ncid, varid, name, text)
integer function nf_get_att_int1(ncid, varid, name, i1vals)
function nf_put_att_int2(ncid, varid, name, xtype, nlen, i2vals)
integer function nf90_inquire_attribute(ncid, varid, name, xtype, len, attnum)
integer function nf_get_att_int2(ncid, varid, name, i2vals)
integer function nf_copy_att(ncid_in, varid_in, name, ncid_out, varid_out)
integer function nf90_put_att_eightbytereal(ncid, varid, name, values)
integer function nf90_get_att_one_fourbytereal(ncid, varid, name, values)
integer function nf_inq_att(ncid, varid, name, xtype, nlen)
integer function nf90_get_att_eightbyteint(ncid, varid, name, values)
integer function nf90_inq_attname(ncid, varid, attnum, name)
integer function nf90_put_att_fourbytereal(ncid, varid, name, values)
integer function nf90_get_att_fourbyteint(ncid, varid, name, values)
integer function nf90_get_att_one_twobyteint(ncid, varid, name, values)
integer function nf90_put_att_twobyteint(ncid, varid, name, values)
integer function nf90_get_att_one_eightbytereal(ncid, varid, name, values)
integer function nf90_put_att_one_twobyteint(ncid, varid, name, values)
integer function nf90_put_att_text(ncid, varid, name, values)
integer function nf90_put_att_one_onebyteint(ncid, varid, name, values)
integer function nf90_get_att_one_onebyteint(ncid, varid, name, values)
integer function nf90_put_att_onebyteint(ncid, varid, name, values)
integer function nf90_put_att_eightbyteint(ncid, varid, name, values)
integer function nf90_get_att_one_fourbyteint(ncid, varid, name, values)
integer function nf90_get_att_twobyteint(ncid, varid, name, values)
integer function nf90_get_att_onebyteint(ncid, varid, name, values)
integer function nf90_get_att_eightbytereal(ncid, varid, name, values)
integer function nf90_put_att_one_eightbyteint(ncid, varid, name, values)
integer function nf90_del_att(ncid, varid, name)
function nf_put_att_int(ncid, varid, name, xtype, nlen, ivals)
integer function nf90_get_att_text(ncid, varid, name, values)
function nf_put_att_int1(ncid, varid, name, xtype, nlen, i1vals)
integer function nf90_get_att_fourbytereal(ncid, varid, name, values)
integer function nf_put_att_text(ncid, varid, name, nlen, text)