| File |
Line number |
Procedure |
Code |
|
./pkg/mnc/mnc_file.F |
118 |
MNC_FILE_ADD_ATTR_STR |
I atname, |
|
./pkg/mnc/mnc_file.F |
130 |
MNC_FILE_ADD_ATTR_STR |
character*(*) fname, atname, sval |
|
./pkg/mnc/mnc_file.F |
135 |
MNC_FILE_ADD_ATTR_STR |
CALL MNC_FILE_ADD_ATTR_ANY(fname,atname, 1, |
|
./pkg/mnc/mnc_file.F |
147 |
MNC_FILE_ADD_ATTR_DBL |
I atname, |
|
./pkg/mnc/mnc_file.F |
160 |
MNC_FILE_ADD_ATTR_DBL |
character*(*) fname, atname |
|
./pkg/mnc/mnc_file.F |
166 |
MNC_FILE_ADD_ATTR_DBL |
CALL MNC_FILE_ADD_ATTR_ANY(fname,atname, 2, |
|
./pkg/mnc/mnc_file.F |
178 |
MNC_FILE_ADD_ATTR_REAL |
I atname, |
|
./pkg/mnc/mnc_file.F |
191 |
MNC_FILE_ADD_ATTR_REAL |
character*(*) fname, atname |
|
./pkg/mnc/mnc_file.F |
195 |
MNC_FILE_ADD_ATTR_REAL |
CALL MNC_FILE_ADD_ATTR_ANY(fname,atname, 3, |
|
./pkg/mnc/mnc_file.F |
207 |
MNC_FILE_ADD_ATTR_INT |
I atname, |
|
./pkg/mnc/mnc_file.F |
220 |
MNC_FILE_ADD_ATTR_INT |
character*(*) fname, atname |
|
./pkg/mnc/mnc_file.F |
225 |
MNC_FILE_ADD_ATTR_INT |
CALL MNC_FILE_ADD_ATTR_ANY(fname,atname, 4, |
|
./pkg/mnc/mnc_file.F |
237 |
MNC_FILE_ADD_ATTR_ANY |
I atname, |
|
./pkg/mnc/mnc_file.F |
252 |
MNC_FILE_ADD_ATTR_ANY |
character*(*) fname, atname, sv |
|
./pkg/mnc/mnc_file.F |
280 |
MNC_FILE_ADD_ATTR_ANY |
n1 = ILNBLNK(atname) |
|
./pkg/mnc/mnc_file.F |
281 |
MNC_FILE_ADD_ATTR_ANY |
s1(1:n1) = atname(1:n1) |
|
./pkg/mnc/mnc_var.F |
270 |
MNC_VAR_ADD_ATTR_STR |
I atname, |
|
./pkg/mnc/mnc_var.F |
281 |
MNC_VAR_ADD_ATTR_STR |
CHARACTER*(*) fname,vname,atname,sval |
|
./pkg/mnc/mnc_var.F |
291 |
MNC_VAR_ADD_ATTR_STR |
CALL MNC_VAR_ADD_ATTR_ANY( fname,vname,atname, |
|
./pkg/mnc/mnc_var.F |
304 |
MNC_VAR_ADD_ATTR_DBL |
I atname, |
|
./pkg/mnc/mnc_var.F |
316 |
MNC_VAR_ADD_ATTR_DBL |
CHARACTER*(*) fname,vname,atname |
|
./pkg/mnc/mnc_var.F |
326 |
MNC_VAR_ADD_ATTR_DBL |
CALL MNC_VAR_ADD_ATTR_ANY( fname,vname,atname, |
|
./pkg/mnc/mnc_var.F |
340 |
MNC_VAR_ADD_ATTR_REAL |
I atname, |
|
./pkg/mnc/mnc_var.F |
352 |
MNC_VAR_ADD_ATTR_REAL |
CHARACTER*(*) fname,vname,atname |
|
./pkg/mnc/mnc_var.F |
362 |
MNC_VAR_ADD_ATTR_REAL |
CALL MNC_VAR_ADD_ATTR_ANY( fname,vname,atname, |
|
./pkg/mnc/mnc_var.F |
375 |
MNC_VAR_ADD_ATTR_INT |
I atname, |
|
./pkg/mnc/mnc_var.F |
387 |
MNC_VAR_ADD_ATTR_INT |
CHARACTER*(*) fname,vname,atname |
|
./pkg/mnc/mnc_var.F |
397 |
MNC_VAR_ADD_ATTR_INT |
CALL MNC_VAR_ADD_ATTR_ANY( fname,vname,atname, |
|
./pkg/mnc/mnc_var.F |
411 |
MNC_VAR_ADD_ATTR_ANY |
I atname, |
|
./pkg/mnc/mnc_var.F |
425 |
MNC_VAR_ADD_ATTR_ANY |
CHARACTER*(*) fname,vname,atname |
|
./pkg/mnc/mnc_var.F |
447 |
MNC_VAR_ADD_ATTR_ANY |
lenat = ILNBLNK(atname) |
|
./pkg/mnc/mnc_var.F |
464 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_TEXT(fid, vid, atname, lens, cs) |
|
./pkg/mnc/mnc_var.F |
466 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_DOUBLE(fid, vid, atname, NF_DOUBLE, len, dv) |
|
./pkg/mnc/mnc_var.F |
468 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_REAL(fid, vid, atname, NF_FLOAT, len, rv) |
|
./pkg/mnc/mnc_var.F |
470 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_INT(fid, vid, atname, NF_INT, len, iv) |
|
./pkg/mnc/mnc_var.F |
478 |
MNC_VAR_ADD_ATTR_ANY |
WRITE(msgBuf,'(5A)') 'adding attribute ''', atname(1:lenat), |