138 …PetscScalar   t0, tn, ts, te, tw, an, as, ae, aw, dn, ds, de, dw, fn = 0.0, fs = 0.0, fe = 0.0, fw…  in FormFunction()  local
183         ds = PetscPowScalar(as, beta);  in FormFunction()
184         fs = ds * (t0 - ts);  in FormFunction()
206           ds = PetscPowScalar(as, beta);  in FormFunction()
207           fs = ds * (t0 - ts);  in FormFunction()
232           ds = PetscPowScalar(as, beta);  in FormFunction()
233           fs = ds * (t0 - ts);  in FormFunction()
276         ds = PetscPowScalar(as, beta);  in FormFunction()
277         fs = ds * (t0 - ts);  in FormFunction()
297   PetscScalar dn, ds, de, dw, an, as, ae, aw, bn, bs, be, bw, gn, gs, ge, gw;  in FormJacobian()  local
350         ds = PetscPowScalar(as, beta);  in FormJacobian()
360         v[0]     = -hxdhy * (ds - gs);  in FormJacobian()
366         v[2]     = hxdhy * (ds + dn + gs - gn) + hydhx * (dw + de + gw - ge);  in FormJacobian()
419           ds = PetscPowScalar(as, beta);  in FormJacobian()
429           v[0]     = -hxdhy * (ds - gs);  in FormJacobian()
432           v[1]     = hxdhy * (ds + dn + gs - gn) + hydhx * (dw + de + gw - ge);  in FormJacobian()
448           ds = PetscPowScalar(as, beta);  in FormJacobian()
451           v[0]     = -hxdhy * (ds - gs);  in FormJacobian()
454           v[1]     = hxdhy * (ds + gs) + hydhx * (dw + de + gw - ge);  in FormJacobian()
505           ds = PetscPowScalar(as, beta);  in FormJacobian()
515           v[0]     = -hxdhy * (ds - gs);  in FormJacobian()
521           v[2]     = hxdhy * (ds + dn + gs - gn) + hydhx * (dw + de + gw - ge);  in FormJacobian()
534           ds = PetscPowScalar(as, beta);  in FormJacobian()
537           v[0]     = -hxdhy * (ds - gs);  in FormJacobian()
543           v[2]     = hxdhy * (ds + gs) + hydhx * (dw + de + gw - ge);  in FormJacobian()
606         ds = PetscPowScalar(as, beta);  in FormJacobian()
609         v[0]     = -hxdhy * (ds - gs);  in FormJacobian()
615         v[2]     = hxdhy * (ds + gs) + hydhx * (dw + de + gw - ge);  in FormJacobian()