| subroutine pnpn_res_device::pnpn_prs_res_device_compute  | 
          ( | 
          type(field_t), intent(inout)  | 
          p,  | 
         
        
           | 
           | 
          type(field_t), intent(inout)  | 
          p_res,  | 
         
        
           | 
           | 
          type(field_t), intent(inout)  | 
          u,  | 
         
        
           | 
           | 
          type(field_t), intent(inout)  | 
          v,  | 
         
        
           | 
           | 
          type(field_t), intent(inout)  | 
          w,  | 
         
        
           | 
           | 
          type(field_t), intent(in)  | 
          u_e,  | 
         
        
           | 
           | 
          type(field_t), intent(in)  | 
          v_e,  | 
         
        
           | 
           | 
          type(field_t), intent(in)  | 
          w_e,  | 
         
        
           | 
           | 
          type(field_t), intent(in)  | 
          f_x,  | 
         
        
           | 
           | 
          type(field_t), intent(in)  | 
          f_y,  | 
         
        
           | 
           | 
          type(field_t), intent(in)  | 
          f_z,  | 
         
        
           | 
           | 
          type(coef_t), intent(inout)  | 
          c_xh,  | 
         
        
           | 
           | 
          type(gs_t), intent(inout)  | 
          gs_xh,  | 
         
        
           | 
           | 
          type(facet_normal_t), intent(in)  | 
          bc_prs_surface,  | 
         
        
           | 
           | 
          type(facet_normal_t), intent(in)  | 
          bc_sym_surface,  | 
         
        
           | 
           | 
          class(ax_t), intent(inout)  | 
          ax,  | 
         
        
           | 
           | 
          real(kind=rp), intent(in)  | 
          bd,  | 
         
        
           | 
           | 
          real(kind=rp), intent(in)  | 
          dt,  | 
         
        
           | 
           | 
          type(field_t), intent(in)  | 
          mu,  | 
         
        
           | 
           | 
          type(field_t), intent(in)  | 
          rho,  | 
         
        
           | 
           | 
          type(c_ptr), intent(inout)  | 
          event  | 
         
        
           | 
          ) | 
           |  | 
         
       
   | 
  
private   |