_RL rampTime2
rampTime2 = 4. _d 0*44567. _d 0
rexpt=1. _d 0/exp(futureTime/rampTime2)
& * (exp(futureTime/rampTime2)
& - exp(-futureTime/rampTime2))
& /(exp(futureTime/rampTime2)
& + exp(-futureTime/rampTime2))
_RL obTimeScale,Uinflow,rampTime2
rampTime2 = 4. _d 0*44567.0 _d 0