       k820309    M          9.1         H                                                                                                       
       x_bc_module.f90 X_BC_MODULE          BOUNDARYSYM_X BOUNDARYASYM_X BOUNDARYSYM_P BOUNDARYASYM_P gen@BOUNDARYCYC_X gen@BOUNDARYCYC_P                  @                       
       DBKIND DP                  @                       
       IM XMARGIN IMIN IMAX                                            u #BOUNDARYCYC    #     @     @X                                       #VAR         
D  @                                 
     5 r      & 5 r    5 r          5 r    5 r    p                                                         u #BOUNDARYCYC               !                                       !                                        !                                        !                            #     @                          	                   #X_VAR 
        
D  @                     
            
     5 r      & 5 r    5 r          5 r    5 r    p              #     @                                             #X_VAR         
D  @                                 
     5 r      & 5 r    5 r          5 r    5 r    p              #     @                                             #P_VAR         
D  @                                 
     5 r      & 5 r    5 r          5 r    5 r    p              #     @                                             #P_VAR         
D  @                                 
     5 r      & 5 r    5 r          5 r    5 r    p                    $      fn#fn !      j   b   uapp(X_BC_MODULE    *  >   J  DC_TYPES    h  I   j  X_BASE_MODULE "     E       gen@BOUNDARYCYC_X      E      BOUNDARYCYC     ;     a   BOUNDARYCYC%VAR "     E       gen@BOUNDARYCYC_P !   $  0       IM+X_BASE_MODULE &   T  0       XMARGIN+X_BASE_MODULE #     0       IMIN+X_BASE_MODULE #     0       IMAX+X_BASE_MODULE      G       BOUNDARYSYM_X $   +     a   BOUNDARYSYM_X%X_VAR      G       BOUNDARYASYM_X %        a   BOUNDARYASYM_X%X_VAR      G       BOUNDARYSYM_P $        a   BOUNDARYSYM_P%P_VAR      G       BOUNDARYASYM_P %        a   BOUNDARYASYM_P%P_VAR 