!STARTOFREGISTRYGENERATEDINCLUDE 'inc/allocs_calls.inc'
!
! WARNING This file is generated automatically by use_registry
! using the data base in the file named Registry.
! Do not edit.  Your changes to this file will be lost.
!
INTERFACE
  SUBROUTINE allocs_0( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_0
  SUBROUTINE allocs_1( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_1
  SUBROUTINE allocs_2( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_2
  SUBROUTINE allocs_3( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_3
  SUBROUTINE allocs_4( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_4
  SUBROUTINE allocs_5( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_5
  SUBROUTINE allocs_6( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_6
  SUBROUTINE allocs_7( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_7
  SUBROUTINE allocs_8( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_8
  SUBROUTINE allocs_9( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_9
  SUBROUTINE allocs_10( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_10
  SUBROUTINE allocs_11( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_11
  SUBROUTINE allocs_12( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_12
  SUBROUTINE allocs_13( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_13
  SUBROUTINE allocs_14( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_14
  SUBROUTINE allocs_15( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_15
  SUBROUTINE allocs_16( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_16
  SUBROUTINE allocs_17( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_17
  SUBROUTINE allocs_18( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_18
  SUBROUTINE allocs_19( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_19
  SUBROUTINE allocs_20( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_20
  SUBROUTINE allocs_21( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_21
  SUBROUTINE allocs_22( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_22
  SUBROUTINE allocs_23( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_23
  SUBROUTINE allocs_24( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_24
  SUBROUTINE allocs_25( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_25
  SUBROUTINE allocs_26( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_26
  SUBROUTINE allocs_27( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_27
  SUBROUTINE allocs_28( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_28
  SUBROUTINE allocs_29( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_29
  SUBROUTINE allocs_30( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_30
  SUBROUTINE allocs_31( grid,   id, setinitval_in ,  tl_in , inter_domain_in , okay_to_alloc_in, num_bytes_allocated ,  &
           sd31, ed31, sd32, ed32, sd33, ed33, &
           sm31 , em31 , sm32 , em32 , sm33 , em33 , &
           sp31 , ep31 , sp32 , ep32 , sp33 , ep33 , &
           sp31x, ep31x, sp32x, ep32x, sp33x, ep33x, &
           sp31y, ep31y, sp32y, ep32y, sp33y, ep33y, &
           sm31x, em31x, sm32x, em32x, sm33x, em33x, &
           sm31y, em31y, sm32y, em32y, sm33y, em33y )
    USE module_domain_type
    USE module_configure, ONLY : model_config_rec, grid_config_rec_type, in_use_for_config, model_to_grid_config_rec
    USE module_scalar_tables ! this includes module_state_description too
    IMPLICIT NONE
    !  Input data.

    TYPE(domain)               , POINTER          :: grid
    INTEGER , INTENT(IN)            :: id
    INTEGER , INTENT(IN)            :: setinitval_in   ! 3 = everything, 1 = arrays only, 0 = none
    INTEGER , INTENT(IN)            :: sd31, ed31, sd32, ed32, sd33, ed33
    INTEGER , INTENT(IN)            :: sm31, em31, sm32, em32, sm33, em33
    INTEGER , INTENT(IN)            :: sp31, ep31, sp32, ep32, sp33, ep33
    INTEGER , INTENT(IN)            :: sp31x, ep31x, sp32x, ep32x, sp33x, ep33x
    INTEGER , INTENT(IN)            :: sp31y, ep31y, sp32y, ep32y, sp33y, ep33y
    INTEGER , INTENT(IN)            :: sm31x, em31x, sm32x, em32x, sm33x, em33x
    INTEGER , INTENT(IN)            :: sm31y, em31y, sm32y, em32y, sm33y, em33y

    ! this argument is a bitmask. First bit is time level 1, second is time level 2, and so on.
    ! e.g. to set both 1st and second time level, use 3
    !      to set only 1st                        use 1
    !      to set only 2st                        use 2
    INTEGER , INTENT(IN)            :: tl_in

    ! true if the allocation is for an intermediate domain (for nesting); only certain fields allocated
    ! false otherwise (all allocated, modulo tl above)
    LOGICAL , INTENT(IN)            :: inter_domain_in, okay_to_alloc_in

    INTEGER(KIND=8) , INTENT(INOUT)         :: num_bytes_allocated
  END SUBROUTINE allocs_31
END INTERFACE
!ENDOFREGISTRYGENERATEDINCLUDE