File |
Line number |
Procedure |
Code |
./pkg/autodiff/global_max_ad.F |
111 |
GLOBAL_ADMAX_R8 |
O maxPhi |
./pkg/autodiff/global_max_ad.F |
141 |
GLOBAL_ADMAX_R8 |
Real*8 maxPhi |
./pkg/autodiff/global_max_ad.F |
157 |
GLOBAL_ADMAX_R8 |
phiGMRL(1,myThid) = maxPhi |
./pkg/autodiff/global_max_ad.F |
168 |
GLOBAL_ADMAX_R8 |
maxPhi = tmp |
./pkg/autodiff/global_max_ad.F |
173 |
GLOBAL_ADMAX_R8 |
CALL MPI_ALLREDUCE(tmp,maxPhi,1,MPI_DOUBLE_PRECISION,MPI_MAX, |
./pkg/autodiff/global_max_ad.F |
180 |
GLOBAL_ADMAX_R8 |
phiGMRL(1,1) = maxPhi |
./pkg/autodiff/global_max_ad.F |
187 |
GLOBAL_ADMAX_R8 |
maxPhi = phiGMRL(1,1) |
./pkg/autodiff/global_max_ad.F |
24 |
GLOBAL_ADMAX_R4 |
U maxPhi |
./pkg/autodiff/global_max_ad.F |
54 |
GLOBAL_ADMAX_R4 |
Real*4 maxPhi |
./pkg/autodiff/global_max_ad.F |
70 |
GLOBAL_ADMAX_R4 |
phiGMRS(1,myThid) = maxPhi |
./pkg/autodiff/global_max_ad.F |
81 |
GLOBAL_ADMAX_R4 |
maxPhi = tmp |
./pkg/autodiff/global_max_ad.F |
86 |
GLOBAL_ADMAX_R4 |
CALL MPI_ALLREDUCE(tmp,maxPhi,1,MPI_REAL,MPI_MAX, |
./pkg/autodiff/global_max_ad.F |
92 |
GLOBAL_ADMAX_R4 |
phiGMRS(1,1) = maxPhi |
./pkg/autodiff/global_max_ad.F |
98 |
GLOBAL_ADMAX_R4 |
maxPhi = phiGMRS(1,1) |
./eesupp/src/global_max.F |
103 |
GLOBAL_MAX_R8 |
O maxPhi, |
./eesupp/src/global_max.F |
133 |
GLOBAL_MAX_R8 |
Real*8 maxPhi |
./eesupp/src/global_max.F |
149 |
GLOBAL_MAX_R8 |
phiGMRL(1,myThid) = maxPhi |
./eesupp/src/global_max.F |
160 |
GLOBAL_MAX_R8 |
maxPhi = tmp |
./eesupp/src/global_max.F |
165 |
GLOBAL_MAX_R8 |
CALL MPI_ALLREDUCE(tmp,maxPhi,1,MPI_DOUBLE_PRECISION,MPI_MAX, |
./eesupp/src/global_max.F |
172 |
GLOBAL_MAX_R8 |
phiGMRL(1,1) = maxPhi |
./eesupp/src/global_max.F |
179 |
GLOBAL_MAX_R8 |
maxPhi = phiGMRL(1,1) |
./eesupp/src/global_max.F |
17 |
GLOBAL_MAX_R4 |
U maxPhi, |
./eesupp/src/global_max.F |
47 |
GLOBAL_MAX_R4 |
Real*4 maxPhi |
./eesupp/src/global_max.F |
63 |
GLOBAL_MAX_R4 |
phiGMRS(1,myThid) = maxPhi |
./eesupp/src/global_max.F |
74 |
GLOBAL_MAX_R4 |
maxPhi = tmp |
./eesupp/src/global_max.F |
79 |
GLOBAL_MAX_R4 |
CALL MPI_ALLREDUCE(tmp,maxPhi,1,MPI_REAL,MPI_MAX, |
./eesupp/src/global_max.F |
85 |
GLOBAL_MAX_R4 |
phiGMRS(1,1) = maxPhi |
./eesupp/src/global_max.F |
91 |
GLOBAL_MAX_R4 |
maxPhi = phiGMRS(1,1) |