File |
Line number |
Procedure |
Code |
./pkg/ctrl/ctrl_init_ctrlvar.F |
44 |
CTRL_INIT_CTRLVAR |
character*(MAX_LEN_FNAM) xx_fname |
./pkg/ctrl/ctrl_init_ctrlvar.F |
75 |
CTRL_INIT_CTRLVAR |
call CTRL_SET_FNAME( xx_fname, fname, mythid ) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
8 |
CTRL_INIT_CTRLVAR |
& xx_fname |
./pkg/ctrl/ctrl_set_fname.F |
34 |
CTRL_SET_FNAME |
character*(MAX_LEN_FNAM) xx_fname |
./pkg/ctrl/ctrl_set_fname.F |
53 |
CTRL_SET_FNAME |
il=ilnblnk( xx_fname ) |
./pkg/ctrl/ctrl_set_fname.F |
61 |
CTRL_SET_FNAME |
& xx_fname(1:il) ,'.', optimcycle |
./pkg/ctrl/ctrl_set_fname.F |
63 |
CTRL_SET_FNAME |
& yadprefix, xx_fname(1:il), '.', optimcycle |
./pkg/ctrl/ctrl_set_fname.F |
65 |
CTRL_SET_FNAME |
& 'hn', xx_fname(1:il), '.', optimcycle |
./pkg/ctrl/ctrl_set_fname.F |
7 |
CTRL_SET_FNAME |
subroutine CTRL_SET_FNAME( xx_fname, fname, mythid ) |