diff options
| -rw-r--r-- | src/gr/horizon.maple | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/gr/horizon.maple b/src/gr/horizon.maple index 0707af4..c28611b 100644 --- a/src/gr/horizon.maple +++ b/src/gr/horizon.maple @@ -257,10 +257,10 @@ assert_fnd_exists(g_uu); assert_fnd_exists(K_uu); assert_fnd_exists(partial_d_ln_sqrt_g); assert_fnd_exists(partial_d_g_uu); -assert_fnd_exists(HA) -assert_fnd_exists(HB) -assert_fnd_exists(HC) -assert_fnd_exists(HD) +assert_fnd_exists(HA); +assert_fnd_exists(HB); +assert_fnd_exists(HC); +assert_fnd_exists(HD); # Jacobian coefficients of H[ABCD] and H wrt Diff(h,y_rs[u]) for u from 1 to N_ang @@ -298,6 +298,7 @@ assert_fnd_exists(HD) := + partial_HA_wrt_partial_dd_h__fnd[u,v] / HD^(3/2) + partial_HB_wrt_partial_dd_h__fnd[u,v] / HD^(1/2) end do; + end do; if (cg_flag) then codegen2([partial_H_wrt_partial_d_h__fnd, |