fss.f File Reference

Go to the source code of this file.

Functions/Subroutines
function	fss (s)

Function/Subroutine Documentation

fss()

function fss

(

s

)

Definition at line 8 of file fss.f.

References fdisc().

Referenced by cellave().

c     =================================================
      implicit double precision (a-h,o-z)
      common/fsscorn/ xc0,yc0,xc1,yc1
c   
c     # compute fdisc at distance s between corners (xc0,yc0) and (xc1,yc1)
c
      x = xc0 + s*(xc1-xc0)
      y = yc0 + s*(yc1-yc0)
      fss = fdisc(x,y)
      return

Here is the call graph for this function:

Here is the caller graph for this function: