tripack.f 183 KB