T33 = datain["T_33"]

    ## Enthalpy ##
    w = rho + datain["u_internal"] + ((5.0 / 3.0) - 1) * datain["u_internal"] + datain["bsq"]

    ## Velocities ##

    u_radial = datain["u_1"] / datain["u_t"]
    u_theta = datain["u_2"] / datain["u_t"]
    u_phi = datain["u_3"] / datain["u_t"]

    ####### Forces ########
    ## Gravitational force ##

    F_metric_radial = (1.0 / w) * (
        T00 * ch(r, theta, a, 0, 1, 0)
        + T01 * ch(r, theta, a, 1, 1, 0)
        + T02 * ch(r, theta, a, 2, 1, 0)
        + T03 * ch(r, theta, a, 3, 1, 0)
        + T10 * ch(r, theta, a, 0, 1, 1)
        + T11 * ch(r, theta, a, 1, 1, 1)
        + T12 * ch(r, theta, a, 2, 1, 1)
        + T13 * ch(r, theta, a, 3, 1, 1)
        + T20 * ch(r, theta, a, 0, 1, 2)
        + T21 * ch(r, theta, a, 1, 1, 2)
        + T22 * ch(r, theta, a, 2, 1, 2)
        + T23 * ch(r, theta, a, 3, 1, 2)
        + T30 * ch(r, theta, a, 0, 1, 3)
        + T31 * ch(r, theta, a, 1, 1, 3)
        + T32 * ch(r, theta, a, 2, 1, 3)
        + T33 * ch(r, theta, a, 3, 1, 3)
 ## Enthalpy ##
 w = rho+datain['u_internal']+((5./3.)-1)*datain['u_internal']+datain['bsq']
 
 ## Velocities ##
 u_time = (datain['u_t'])
 u_radial = (datain['u_1']/u_time)
 u_theta = (datain['u_2']/u_time)
 u_phi = (datain['u_3']/u_time)
     
 line = int(LINE_INDEX[index3,0])
 
 B_NUMBER[index3] = -((T00[line]+0+rho[line]*u_time[line])/(rho[line]*u_time[line]))
 
 ####### Forces ########
 ## Gravitational force ##
 F_metric_radial     = (1./w)*(T00*ch(r,theta,a,0,1,0) + T01*ch(r,theta,a,1,1,0) + T02*ch(r,theta,a,2,1,0) + T03*ch(r,theta,a,3,1,0) +
                                 T10*ch(r,theta,a,0,1,1) + T11*ch(r,theta,a,1,1,1) + T12*ch(r,theta,a,2,1,1) + T13*ch(r,theta,a,3,1,1) +
                                 T20*ch(r,theta,a,0,1,2) + T21*ch(r,theta,a,1,1,2) + T22*ch(r,theta,a,2,1,2) + T23*ch(r,theta,a,3,1,2) +
                                 T30*ch(r,theta,a,0,1,3) + T31*ch(r,theta,a,1,1,3) + T32*ch(r,theta,a,2,1,3) + T33*ch(r,theta,a,3,1,3)) - (
                                 (1./w)*((T11-rho*u_radial*u_radial*g11)*(2./r)) + (1./w)*((T21-rho*u_theta*u_radial*g11)*(np.cos(theta)/np.sin(theta))))
 
 F_metric_theta     = ((1./w)*( T00*ch(r,theta,a,0,2,0) + T01*ch(r,theta,a,1,2,0) + T02*ch(r,theta,a,2,2,0) + T03*ch(r,theta,a,3,2,0) +
                                 T10*ch(r,theta,a,0,2,1) + T11*ch(r,theta,a,1,2,1) + T12*ch(r,theta,a,2,2,1) + T13*ch(r,theta,a,3,2,1) +
                                 T20*ch(r,theta,a,0,2,2) + T21*ch(r,theta,a,1,2,2) + T22*ch(r,theta,a,2,2,2) + T23*ch(r,theta,a,3,2,2) +
                                 T30*ch(r,theta,a,0,2,3) + T31*ch(r,theta,a,1,2,3) + T32*ch(r,theta,a,2,2,3) + T33*ch(r,theta,a,3,2,3)) - (
                                 (1./w)*((T12-rho*u_radial*u_theta*g22)*(2./r)) + (1./w)*((T22-rho*u_theta*u_theta*g22)*(np.cos(theta)/np.sin(theta)))))/r
                                 
 F_gravity_radial     = (1./w)*(T00-0*((5./3.)-1.)*datain['u_internal']-datain['bsq']/2.)*ch(r,theta,a,0,1,0)
 F_gravity_theta      = 0 
 F_gravity_x = F_gravity_radial*np.sin(theta)
 F_gravity_y = F_gravity_radial*np.cos(theta) 
    
    
    F_x = np.empty((NUMBER_OF_FORCES,1))
    F_y = np.empty((NUMBER_OF_FORCES,1))
    x = np.empty((NUMBER_OF_FORCES,1))
    y = np.empty((NUMBER_OF_FORCES,1))
    
    for index2 in range(0,len(LINE_INDEX)):
        line = LINE_INDEX[index2]
        #print('Check 1:', index2)
        #print('Line::', line)

        ####### Forces ########
        ## Gravitational force ##
        
        F_metric_radial     = (1./w)*(T00*ch(r,theta,a,0,1,0) + T01*ch(r,theta,a,1,1,0) + T02*ch(r,theta,a,2,1,0) + T03*ch(r,theta,a,3,1,0) +
                                    T10*ch(r,theta,a,0,1,1) + T11*ch(r,theta,a,1,1,1) + T12*ch(r,theta,a,2,1,1) + T13*ch(r,theta,a,3,1,1) +
                                    T20*ch(r,theta,a,0,1,2) + T21*ch(r,theta,a,1,1,2) + T22*ch(r,theta,a,2,1,2) + T23*ch(r,theta,a,3,1,2) +
                                    T30*ch(r,theta,a,0,1,3) + T31*ch(r,theta,a,1,1,3) + T32*ch(r,theta,a,2,1,3) + T33*ch(r,theta,a,3,1,3)) - (
                                    (1./w)*((T11-rho*u_radial*u_radial*g11)*(2./r)) + (1./w)*((T21-rho*u_theta*u_radial*g11)*(np.cos(theta)/np.sin(theta))))
        
        F_metric_theta     = ((1./w)*( T00*ch(r,theta,a,0,2,0) + T01*ch(r,theta,a,1,2,0) + T02*ch(r,theta,a,2,2,0) + T03*ch(r,theta,a,3,2,0) +
                                    T10*ch(r,theta,a,0,2,1) + T11*ch(r,theta,a,1,2,1) + T12*ch(r,theta,a,2,2,1) + T13*ch(r,theta,a,3,2,1) +
                                    T20*ch(r,theta,a,0,2,2) + T21*ch(r,theta,a,1,2,2) + T22*ch(r,theta,a,2,2,2) + T23*ch(r,theta,a,3,2,2) +
                                    T30*ch(r,theta,a,0,2,3) + T31*ch(r,theta,a,1,2,3) + T32*ch(r,theta,a,2,2,3) + T33*ch(r,theta,a,3,2,3)) - (
                                    (1./w)*((T12-rho*u_radial*u_theta*g22)*(2./r)) + (1./w)*((T22-rho*u_theta*u_theta*g22)*(np.cos(theta)/np.sin(theta)))))/r
     
        F_gravity_radial     = (1./w)*(T00-0*((5./3.)-1.)*datain['u_internal']-datain['bsq']/2.)*ch(r,theta,a,0,1,0)
        F_gravity_theta      = 0
        
        F_gravity_x = F_gravity_radial*np.sin(theta)
 u_radial = (datain['u_1']/datain['u_t'])
 u_theta = (datain['u_2']/datain['u_t'])
 u_phi = (datain['u_3']/datain['u_t'])
 
 
 F_x = np.empty((NUMBER_OF_FORCES,1))
 F_y = np.empty((NUMBER_OF_FORCES,1))
 x = np.empty((NUMBER_OF_FORCES,1))
 y = np.empty((NUMBER_OF_FORCES,1))
 
 for index2 in range(0,len(LINE_INDEX)):
     line = LINE_INDEX[index2]
     ####### Forces ########
     ## Gravitational force ##
     
     F_metric_radial     = (1./w)*(T00*ch(r,theta,a,0,1,0) + T01*ch(r,theta,a,1,1,0) + T02*ch(r,theta,a,2,1,0) + T03*ch(r,theta,a,3,1,0) +
                                 T10*ch(r,theta,a,0,1,1) + T11*ch(r,theta,a,1,1,1) + T12*ch(r,theta,a,2,1,1) + T13*ch(r,theta,a,3,1,1) +
                                 T20*ch(r,theta,a,0,1,2) + T21*ch(r,theta,a,1,1,2) + T22*ch(r,theta,a,2,1,2) + T23*ch(r,theta,a,3,1,2) +
                                 T30*ch(r,theta,a,0,1,3) + T31*ch(r,theta,a,1,1,3) + T32*ch(r,theta,a,2,1,3) + T33*ch(r,theta,a,3,1,3)) - (
                                 (1./w)*((T11-rho*u_radial*u_radial*g11)*(2./r)) + (1./w)*((T21-rho*u_theta*u_radial*g11)*(np.cos(theta)/np.sin(theta))))
     
     F_metric_theta     = ((1./w)*( T00*ch(r,theta,a,0,2,0) + T01*ch(r,theta,a,1,2,0) + T02*ch(r,theta,a,2,2,0) + T03*ch(r,theta,a,3,2,0) +
                                 T10*ch(r,theta,a,0,2,1) + T11*ch(r,theta,a,1,2,1) + T12*ch(r,theta,a,2,2,1) + T13*ch(r,theta,a,3,2,1) +
                                 T20*ch(r,theta,a,0,2,2) + T21*ch(r,theta,a,1,2,2) + T22*ch(r,theta,a,2,2,2) + T23*ch(r,theta,a,3,2,2) +
                                 T30*ch(r,theta,a,0,2,3) + T31*ch(r,theta,a,1,2,3) + T32*ch(r,theta,a,2,2,3) + T33*ch(r,theta,a,3,2,3)) - (
                                 (1./w)*((T12-rho*u_radial*u_theta*g22)*(2./r)) + (1./w)*((T22-rho*u_theta*u_theta*g22)*(np.cos(theta)/np.sin(theta)))))/r
  
     F_gravity_radial     = (1./w)*(T00-0*((5./3.)-1.)*datain['u_internal']-datain['bsq']/2.)*ch(r,theta,a,0,1,0)
     F_gravity_theta      = 0
     
     F_gravity_x = F_gravity_radial*np.sin(theta)
    w = rho + datain["u_internal"] + ((5.0 / 3.0) - 1) * datain["u_internal"] + datain["bsq"]

    ## Velocities ##
    u_time = datain["u_t"]
    u_radial = datain["u_1"] / u_time
    u_theta = datain["u_2"] / u_time
    u_phi = datain["u_3"] / u_time

    line = int(LINE_INDEX[index3, 0])

    B_NUMBER[index3] = -((T00[line] + datain["R_00"][line] + rho[line] * u_time[line]) / (rho[line] * u_time[line]))

    ####### Forces ########
    ## Gravitational force ##
    F_metric_radial = (1.0 / w) * (
        T00 * ch(r, theta, a, 0, 1, 0)
        + T01 * ch(r, theta, a, 1, 1, 0)
        + T02 * ch(r, theta, a, 2, 1, 0)
        + T03 * ch(r, theta, a, 3, 1, 0)
        + T10 * ch(r, theta, a, 0, 1, 1)
        + T11 * ch(r, theta, a, 1, 1, 1)
        + T12 * ch(r, theta, a, 2, 1, 1)
        + T13 * ch(r, theta, a, 3, 1, 1)
        + T20 * ch(r, theta, a, 0, 1, 2)
        + T21 * ch(r, theta, a, 1, 1, 2)
        + T22 * ch(r, theta, a, 2, 1, 2)
        + T23 * ch(r, theta, a, 3, 1, 2)
        + T30 * ch(r, theta, a, 0, 1, 3)
        + T31 * ch(r, theta, a, 1, 1, 3)
        + T32 * ch(r, theta, a, 2, 1, 3)
        + T33 * ch(r, theta, a, 3, 1, 3)