File |
Line number |
Procedure |
Code |
./pkg/mnc/mnc_var.F |
241 |
MNC_VAR_ADD_ATTR_STR |
I atname, |
./pkg/mnc/mnc_var.F |
254 |
MNC_VAR_ADD_ATTR_STR |
character*(*) fname,vname,atname,sval |
./pkg/mnc/mnc_var.F |
263 |
MNC_VAR_ADD_ATTR_STR |
CALL MNC_VAR_ADD_ATTR_ANY(fname,vname,atname, |
./pkg/mnc/mnc_var.F |
275 |
MNC_VAR_ADD_ATTR_DBL |
I atname, |
./pkg/mnc/mnc_var.F |
289 |
MNC_VAR_ADD_ATTR_DBL |
character*(*) fname,vname,atname |
./pkg/mnc/mnc_var.F |
297 |
MNC_VAR_ADD_ATTR_DBL |
CALL MNC_VAR_ADD_ATTR_ANY(fname,vname,atname, |
./pkg/mnc/mnc_var.F |
310 |
MNC_VAR_ADD_ATTR_REAL |
I atname, |
./pkg/mnc/mnc_var.F |
324 |
MNC_VAR_ADD_ATTR_REAL |
character*(*) fname,vname,atname |
./pkg/mnc/mnc_var.F |
332 |
MNC_VAR_ADD_ATTR_REAL |
CALL MNC_VAR_ADD_ATTR_ANY(fname,vname,atname, |
./pkg/mnc/mnc_var.F |
345 |
MNC_VAR_ADD_ATTR_INT |
I atname, |
./pkg/mnc/mnc_var.F |
359 |
MNC_VAR_ADD_ATTR_INT |
character*(*) fname,vname,atname |
./pkg/mnc/mnc_var.F |
367 |
MNC_VAR_ADD_ATTR_INT |
CALL MNC_VAR_ADD_ATTR_ANY(fname,vname,atname, |
./pkg/mnc/mnc_var.F |
380 |
MNC_VAR_ADD_ATTR_ANY |
I atname, |
./pkg/mnc/mnc_var.F |
395 |
MNC_VAR_ADD_ATTR_ANY |
character*(*) fname,vname,atname |
./pkg/mnc/mnc_var.F |
413 |
MNC_VAR_ADD_ATTR_ANY |
lenat = ILNBLNK(atname) |
./pkg/mnc/mnc_var.F |
430 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_TEXT(fid, vid, atname, lens, cs) |
./pkg/mnc/mnc_var.F |
432 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_DOUBLE(fid, vid, atname, NF_DOUBLE, len, dv) |
./pkg/mnc/mnc_var.F |
434 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_REAL(fid, vid, atname, NF_FLOAT, len, rv) |
./pkg/mnc/mnc_var.F |
436 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_INT(fid, vid, atname, NF_INT, len, iv) |
./pkg/mnc/mnc_var.F |
444 |
MNC_VAR_ADD_ATTR_ANY |
write(msgbuf,'(5a)') 'adding attribute ''', atname(1:lenat), |
./pkg/mnc/mnc_file.F |
117 |
MNC_FILE_ADD_ATTR_STR |
I atname, |
./pkg/mnc/mnc_file.F |
129 |
MNC_FILE_ADD_ATTR_STR |
character*(*) fname, atname, sval |
./pkg/mnc/mnc_file.F |
134 |
MNC_FILE_ADD_ATTR_STR |
CALL MNC_FILE_ADD_ATTR_ANY(fname,atname, 1, |
./pkg/mnc/mnc_file.F |
146 |
MNC_FILE_ADD_ATTR_DBL |
I atname, |
./pkg/mnc/mnc_file.F |
159 |
MNC_FILE_ADD_ATTR_DBL |
character*(*) fname, atname |
./pkg/mnc/mnc_file.F |
165 |
MNC_FILE_ADD_ATTR_DBL |
CALL MNC_FILE_ADD_ATTR_ANY(fname,atname, 2, |
./pkg/mnc/mnc_file.F |
177 |
MNC_FILE_ADD_ATTR_REAL |
I atname, |
./pkg/mnc/mnc_file.F |
190 |
MNC_FILE_ADD_ATTR_REAL |
character*(*) fname, atname |
./pkg/mnc/mnc_file.F |
194 |
MNC_FILE_ADD_ATTR_REAL |
CALL MNC_FILE_ADD_ATTR_ANY(fname,atname, 3, |
./pkg/mnc/mnc_file.F |
206 |
MNC_FILE_ADD_ATTR_INT |
I atname, |
./pkg/mnc/mnc_file.F |
219 |
MNC_FILE_ADD_ATTR_INT |
character*(*) fname, atname |
./pkg/mnc/mnc_file.F |
224 |
MNC_FILE_ADD_ATTR_INT |
CALL MNC_FILE_ADD_ATTR_ANY(fname,atname, 4, |
./pkg/mnc/mnc_file.F |
236 |
MNC_FILE_ADD_ATTR_ANY |
I atname, |
./pkg/mnc/mnc_file.F |
251 |
MNC_FILE_ADD_ATTR_ANY |
character*(*) fname, atname, sv |
./pkg/mnc/mnc_file.F |
278 |
MNC_FILE_ADD_ATTR_ANY |
n1 = ILNBLNK(atname) |
./pkg/mnc/mnc_file.F |
279 |
MNC_FILE_ADD_ATTR_ANY |
s1(1:n1) = atname(1:n1) |