| Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
compute | Module: | File: RAD_UTILS.f |
Author :
Version:
Declaration:
real*8 function compute(f1, f2, f3, f4, var) result(result)- f1 :
real*8, intent(in)
- f2 :
real*8, intent(in)
- f3 :
real*8, intent(in)
- f4 :
real*8, intent(in)
- var :
real*8, intent(in)
- f21 :
real*8
- f32 :
real*8
- f43 :
real*8
- f3221 :
real*8
- f4332 :
real*8
- a :
real*8
- b :
real*8
- c :
real*8
- d :
real*8
- xf :
real*8
- ffcusp :
real*8
- xexm :
real*8
- cuspwt :
real*8
- fflinr :
real*8
- cuspwm :
real*8, parameter
- Initial Value
= 0.5
- cuspwe :
real*8, parameter
- Initial Value
= 0.5