Index | Rundeck: P1SoM40 | Created: Fri May 10 03:30:18 EDT 2024 |
limitq | Module: | File: QUSDEF.f |
Author : G. Russell, modified by Maxwell Kelley
Version:
Declaration:
subroutine limitq(anm1, an, fnm1, fn, sn, sx, sxx, ierr)
- anm1 :
real*8
- an :
real*8
- fnm1 :
real*8
- fn :
real*8
- sn :
real*8
- sx :
real*8
- sxx :
real*8
- sl :
real*8
- sc :
real*8
- sr :
real*8
- frl :
real*8
- frl1 :
real*8
- frr :
real*8
- frr1 :
real*8
- gamma :
real*8
- g13ab :
real*8
- fr :
real*8
- fr1 :
real*8
- fsign :
real*8
- su :
real*8
- sd :
real*8
- ierr :
integer, intent(out)