Create allocate.f95