This is routine that perform bilinear interpolation and correction from coarse to fine grid system, mainly solution (u) on coarse grid --> correction (e_h) for solution (u) of fine grid Based on the relationship of the index between the fine and coarse grid
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(GridSystem), | intent(inout) | :: | mg_coarse | |||
| type(GridSystem), | intent(inout) | :: | mg_fine |