Arrow ParApplicative mapN combining effects sequentially (unlike parMapN)

ParApplicativeTest.kt

import arrow.fx.IO
import arrow.fx.extensions.io.concurrent.concurrent
import arrow.fx.extensions.io.concurrent.dispatchers
import arrow.fx.fix
import kotlin.test.Test

fun f1(): IO<String> = IO {
    "f1 ${Thread.currentThread().name}"
}

fun f2(): IO<String> = IO {
    "f2 ${Thread.currentThread().name}"
}

fun parApplicativeMapN(): IO<String> =
    IO.concurrent().parApplicative(dispatchers().default()).run {
        mapN(f1(), f2()) { (log1, log2) ->
            """
               $log1
               $log2
               ${Thread.currentThread().name}
            """.trimIndent()
        }
    }.fix()

fun parApplicativeMap2(): IO<String> =
    IO.concurrent().parApplicative(dispatchers().default()).run {
        f1().map2(f2()) { (log1, log2) ->
            """
               $log1
               $log2
               ${Thread.currentThread().name}
            """.trimIndent()
        }
    }.fix()

class ParApplicativeTest {
    @Test
    fun mapN() {
        println(parApplicativeMapN().unsafeRunSync())
    }

    @Test
    fun map2() {
        println(parApplicativeMap2().unsafeRunSync())
    }
}