module stochy_layout_lag use machine implicit none save cc integer lats_dim_h, x lats_node_h, x lats_node_h_max, x ipt_lats_node_h, x lon_dim_h cc INTEGER ,ALLOCATABLE :: lat1s_h(:) end module stochy_layout_lag