| File |
Line number |
Procedure |
Code |
|
./pkg/profiles/active_file_profiles_ad.F |
136 |
ADACTIVE_WRITE_PROFILE |
call ACTIVE_WRITE_PROFILE_RL( fidadjoint(active_num_file,bi,bj) , |
|
./pkg/profiles/active_file_profiles_ad.F |
69 |
ADACTIVE_READ_PROFILE |
call ACTIVE_READ_PROFILE_RL( fidadjoint(active_num_file,bi,bj) , |
|
./pkg/profiles/profiles.h |
48 |
NO PROCEDURE |
& fidadjoint(NFILESPROFMAX,nsx,nsy), |
|
./pkg/profiles/profiles.h |
72 |
NO PROCEDURE |
& fidforward, fidadjoint, fidtangent, fiddata, |
|
./pkg/profiles/profiles_init_fixed.F |
507 |
PROFILES_INIT_FIXED |
& adfnameequinc, fidadjoint(num_file,bi,bj),ProfNo(num_file,bi,bj), |
|
./pkg/profiles/profiles_init_fixed.F |
511 |
PROFILES_INIT_FIXED |
err = NF_OPEN(adfnameequinc,NF_WRITE,fidadjoint(num_file,bi,bj)) |
|
./pkg/profiles/profiles_init_fixed.F |
528 |
PROFILES_INIT_FIXED |
& adfnameequinc, fidadjoint(num_file,bi,bj),ProfNo(num_file,bi,bj), |
|
./pkg/profiles/profiles_init_fixed.F |
535 |
PROFILES_INIT_FIXED |
call MDSFINDUNIT( fidadjoint(num_file,bi,bj) , mythid ) |
|
./pkg/profiles/profiles_init_fixed.F |
536 |
PROFILES_INIT_FIXED |
open( fidadjoint(num_file,bi,bj),file=adfnameequinc, |