| File |
Line number |
Procedure |
Code |
|
./pkg/compon_communic/CPLR_SIG.h |
114 |
NO PROCEDURE |
character*(MAXLEN_COMP_NAME) component_Name(MAX_COMPONENTS) |
|
./pkg/compon_communic/CPLR_SIG.h |
127 |
NO PROCEDURE |
& component_Name |
|
./pkg/compon_communic/coupsend_r4tiles.F |
33 |
COUPSEND_R4TILES |
& write(LogUnit,*) 'coupsend_r4tiles: ',component_Name(compind) |
|
./pkg/compon_communic/couprecv_r8.F |
35 |
COUPRECV_R8 |
& write(LogUnit,*) 'couprecv_r8: ',component_Name(compind) |
|
./pkg/compon_communic/coupsend_r8tiles.F |
33 |
COUPSEND_R8TILES |
& write(LogUnit,*) 'coupsend_r8tiles: ',component_Name(compind) |
|
./pkg/compon_communic/couprecv_r8tiles.F |
35 |
COUPRECV_R8TILES |
& write(LogUnit,*) 'couprecv_r8tiles: ',component_Name(compind) |
|
./pkg/compon_communic/coupsend_r4.F |
33 |
COUPSEND_R4 |
& write(LogUnit,*) 'coupsend_r4: ',component_Name(compind) |
|
./pkg/compon_communic/couprecv_r4tiles.F |
35 |
COUPRECV_R4TILES |
& write(LogUnit,*) 'couprecv_r4tiles: ',component_Name(compind) |
|
./pkg/compon_communic/couprecv_r4.F |
35 |
COUPRECV_R4 |
& write(LogUnit,*) 'couprecv_r4: ',component_Name(compind) |
|
./pkg/compon_communic/coupsend_r8.F |
33 |
COUPSEND_R8 |
& write(LogUnit,*) 'coupsend_r8: ',component_Name(compind) |
|
./pkg/compon_communic/mitcplr_initcomp.F |
16 |
MITCPLR_INITCOMP |
component_Name( compind ) = carg |
|
./pkg/compon_communic/mitcplr_init1.F |
108 |
MITCPLR_INIT1 |
& ' component=',component_Name(n), |
|
./pkg/compon_communic/mitcplr_init1.F |
111 |
MITCPLR_INIT1 |
& ' comp+cplr=',component_Name(n), |
|
./pkg/compon_communic/mitcplr_init1.F |
183 |
MITCPLR_INIT1 |
my_component_name=component_Name( compind ) |