Lines Matching refs:ft

70     PetscReal ft, zero, hx, hy, hydhx, hxdhy
82     ft = 0.0
191         ft = ft + f2 + f4
209         ft = ft + sqrt(1.0 + d3*d3 + d2*d2)
217         ft = ft + sqrt(1.0 + d3*d3 + d2*d2)
225         ft = ft + sqrt(1.0 + d1*d1 + d4*d4)
233         ft = ft + sqrt(1.0 + d1*d1 + d4*d4)
240       ft = ft + sqrt(1.0 + d1*d1 + d2*d2)
246       ft = ft + sqrt(1.0 + d1*d1 + d2*d2)
249     ft = ft*area
250     PetscCallMPI(MPI_Allreduce(ft, fcn, 1, MPIU_REAL, MPIU_SUM, PETSC_COMM_WORLD, ierr))