layers_init_varia.f