| 201 | === `U_init_dim_local` (init_dim_local.F90) === |

| 202 | |

| 203 | This routine is used by all local filter algorithms (LSEIK, LETKF). |

| 204 | |

| 205 | The interface for this routine is: |

| 206 | {{{ |

| 207 | SUBROUTINE init_dim_local(step, domain_p, dim_l) |

| 208 | |

| 209 | INTEGER, INTENT(in) :: step ! Current time step |

| 210 | INTEGER, INTENT(in) :: domain_p ! Current local analysis domain |

| 211 | INTEGER, INTENT(out) :: dim_l ! Local state dimension |

| 212 | }}} |

| 213 | |

| 214 | The routine is called during the loop over the local analysis domains in the analysis step. |

| 215 | It has to provide in `dim_l` the dimension of the state vector for the local analysis domain with index `domain_p`. |

| 216 | |

| 217 | Hints: |

| 218 | * If a local analysis domain is a single vertical column of the model grid, the size of the state in the local analysis domain, will be just the number of vertical grid points at this location. |

| 219 | |