| File |
Line number |
Procedure |
Code |
|
./pkg/profiles/active_file_profiles_ad.F |
135 |
ADACTIVE_WRITE_PROFILE |
call ACTIVE_WRITE_PROFILE_RL( fidadjoint(active_num_file,bi,bj) , |
|
./pkg/profiles/active_file_profiles_ad.F |
68 |
ADACTIVE_READ_PROFILE |
call ACTIVE_READ_PROFILE_RL( fidadjoint(active_num_file,bi,bj) , |
|
./pkg/profiles/profiles.h |
29 |
NO PROCEDURE |
& fidadjoint(NFILESPROFMAX,nsx,nsy), |
|
./pkg/profiles/profiles.h |
52 |
NO PROCEDURE |
&vec_quantities, fidforward, fidadjoint, fidtangent,fiddata, |
|
./pkg/profiles/profiles_init_fixed.F |
302 |
PROFILES_INIT_FIXED |
& adfnameequinc, fidadjoint(num_file,bi,bj),ProfNo(num_file,bi,bj), |
|
./pkg/profiles/profiles_init_fixed.F |
306 |
PROFILES_INIT_FIXED |
err = NF_OPEN(adfnameequinc,NF_WRITE,fidadjoint(num_file,bi,bj)) |
|
./pkg/profiles/profiles_init_fixed.F |
323 |
PROFILES_INIT_FIXED |
& adfnameequinc, fidadjoint(num_file,bi,bj),ProfNo(num_file,bi,bj), |
|
./pkg/profiles/profiles_init_fixed.F |
330 |
PROFILES_INIT_FIXED |
call MDSFINDUNIT( fidadjoint(num_file,bi,bj) , mythid ) |
|
./pkg/profiles/profiles_init_fixed.F |
331 |
PROFILES_INIT_FIXED |
open( fidadjoint(num_file,bi,bj),file=adfnameequinc, |