File |
Line number |
Procedure |
Code |
./pkg/kpp/kpp_routines.F |
846 |
Z121 |
_KPP_RL KRi_range(1:Nrp1) |
./pkg/kpp/kpp_routines.F |
852 |
Z121 |
KRi_range(Nrp1) = p0 |
./pkg/kpp/kpp_routines.F |
870 |
Z121 |
KRi_range(k) = p5 + SIGN(p5,v(i,k)) |
./pkg/kpp/kpp_routines.F |
871 |
Z121 |
KRi_range(k) = KRi_range(k) * |
./pkg/kpp/kpp_routines.F |
875 |
Z121 |
zwork = KRi_range(1) * v(i,1) |
./pkg/kpp/kpp_routines.F |
877 |
Z121 |
& KRi_range(1) * KRi_range(2) * v(i,2) |
./pkg/kpp/kpp_routines.F |
878 |
Z121 |
zflag = p2 + KRi_range(1) * KRi_range(2) |
./pkg/kpp/kpp_routines.F |
887 |
Z121 |
& KRi_range(k) * KRi_range(kp1) * v(i,kp1) + |
./pkg/kpp/kpp_routines.F |
888 |
Z121 |
& KRi_range(k) * zwork |
./pkg/kpp/kpp_routines.F |
889 |
Z121 |
zwork = KRi_range(k) * zflag |
./pkg/kpp/kpp_routines.F |
890 |
Z121 |
zflag = p2 + KRi_range(k)*(KRi_range(kp1)+KRi_range(km1)) |