File |
Line number |
Procedure |
Code |
./pkg/profiles/cost_profiles.F |
146 |
COST_PROFILES |
JL = ILNBLNK( profilesDir ) |
./pkg/profiles/cost_profiles.F |
148 |
COST_PROFILES |
& profilesDir(1:JL),profilesfile(1:IL),'.',iG,'.',jG,'.equi.nc' |
./pkg/profiles/cost_profiles.F |
425 |
COST_PROFILES |
JL = ILNBLNK( profilesDir ) |
./pkg/profiles/cost_profiles.F |
427 |
COST_PROFILES |
& profilesDir(1:JL),profilesfile(1:IL),'.',iG,'.',jG,'.equi.nc' |
./pkg/profiles/cost_profiles.F |
54 |
COST_PROFILES |
integer IL, JL, err |
./pkg/profiles/profiles_init_fixed.F |
124 |
PROFILES_INIT_FIXED |
JL = ILNBLNK( profilesDir ) |
./pkg/profiles/profiles_init_fixed.F |
125 |
PROFILES_INIT_FIXED |
if (JL.NE.0) then |
./pkg/profiles/profiles_init_fixed.F |
126 |
PROFILES_INIT_FIXED |
write(msgbuf,'(a,a)') ' profilesDir ',profilesDir(1:JL) |
./pkg/profiles/profiles_init_fixed.F |
58 |
PROFILES_INIT_FIXED |
integer IL, JL, KL, err |
./pkg/profiles/profiles_init_fixed.F |
630 |
PROFILES_INIT_FIXED |
JL = ILNBLNK( prof_names(num_file,k) ) |
./pkg/profiles/profiles_init_fixed.F |
631 |
PROFILES_INIT_FIXED |
err = NF_INQ_VARID(fid,prof_names(num_file,k)(1:JL), varid1 ) |
./pkg/profiles/profiles_init_fixed.F |
646 |
PROFILES_INIT_FIXED |
JL = ILNBLNK( prof_namesmod(num_file,k) ) |
./pkg/profiles/profiles_init_fixed.F |
650 |
PROFILES_INIT_FIXED |
& prof_namesmod(num_file,k)(1:JL),' #', |
./pkg/profiles/profiles_init_fixed.F |
656 |
PROFILES_INIT_FIXED |
& prof_namesmod(num_file,k)(1:JL) |
./pkg/profiles/profiles_init_fixed.F |
671 |
PROFILES_INIT_FIXED |
JL = ILNBLNK( profilesDir ) |
./pkg/profiles/profiles_init_fixed.F |
676 |
PROFILES_INIT_FIXED |
& profilesDir(1:JL),profilesfile(1:IL),'.',iG,'.',jG,'.equi.nc' |
./pkg/profiles/profiles_init_fixed.F |
678 |
PROFILES_INIT_FIXED |
& profilesDir(1:JL),'ad', |
./pkg/profiles/profiles_init_fixed.F |
705 |
PROFILES_INIT_FIXED |
& profilesDir(1:JL),profilesfile(1:IL),'.',iG,'.',jG,'.equi.data' |
./pkg/profiles/profiles_init_fixed.F |
707 |
PROFILES_INIT_FIXED |
& profilesDir(1:JL),'ad', |