Index | Rundeck: E6TomaF40 | Created: Fri May 17 03:30:39 EDT 2024 |
find_dpsih | Module: SOCPBL | File: PBL.f |
Author :
Version:
Declaration:
subroutine find_dpsih(zet, zet0, z, z0, dpsih)
- zet :
real*8
- zet0 :
real*8
- z :
real*8
- z0 :
real*8
- dpsih :
real*8
- x :
real*8
- x0 :
real*8
- xh :
real*8
- rat :
real*8