Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
sgsw | Module: | File: PBL_DRV.f |
Author : Reha Cakmur/Gavin Schmidt
Version:
Declaration:
real*8 function sgsw(x, ws, wt, bysig2, icase)
- pi : used from constant
- besseli0 : used from specialfunctions_mod
- x :
real*8, intent(in)
- ws :
real*8, intent(in)
- wt :
real*8, intent(in)
- bysig2 :
real*8, intent(in)
- icase :
integer, intent(in)
- besf :
real*8
- exx :
real*8