File |
Line number |
Procedure |
Code |
./pkg/kpp/kpp_routines.F |
1151 |
Z121 |
_RL KRi_range(1:Nrp1) |
./pkg/kpp/kpp_routines.F |
1157 |
Z121 |
KRi_range(Nrp1) = p0 |
./pkg/kpp/kpp_routines.F |
1176 |
Z121 |
KRi_range(k) = p5 + SIGN(p5,v(i,k)) |
./pkg/kpp/kpp_routines.F |
1177 |
Z121 |
KRi_range(k) = KRi_range(k) * |
./pkg/kpp/kpp_routines.F |
1181 |
Z121 |
zwork = KRi_range(1) * v(i,1) |
./pkg/kpp/kpp_routines.F |
1183 |
Z121 |
& KRi_range(1) * KRi_range(2) * v(i,2) |
./pkg/kpp/kpp_routines.F |
1184 |
Z121 |
zflag = p2 + KRi_range(1) * KRi_range(2) |
./pkg/kpp/kpp_routines.F |
1195 |
Z121 |
& KRi_range(k) * KRi_range(kp1) * v(i,kp1) + |
./pkg/kpp/kpp_routines.F |
1196 |
Z121 |
& KRi_range(k) * zwork |
./pkg/kpp/kpp_routines.F |
1197 |
Z121 |
zwork = KRi_range(k) * zflag |
./pkg/kpp/kpp_routines.F |
1198 |
Z121 |
zflag = p2 + KRi_range(k)*(KRi_range(kp1)+KRi_range(km1)) |