Maj terminée. Pour consulter la release notes associée voici le lien :
https://about.gitlab.com/releases/2021/07/07/critical-security-release-gitlab-14-0-4-released/

Une nouvelle version du portail de gestion des comptes externes sera mise en production lundi 09 août. Elle permettra d'allonger la validité d'un compte externe jusqu'à 3 ans. Pour plus de détails sur cette version consulter : https://doc-si.inria.fr/x/FCeS

pzplrnt.c 1.59 KB
Newer Older
1
/**
2 3
 *
 * @file pzplrnt.c
4
 *
Mathieu Faverge's avatar
Mathieu Faverge committed
5 6
 * @copyright 2009-2014 The University of Tennessee and The University of
 *                      Tennessee Research Foundation. All rights reserved.
Mathieu Faverge's avatar
Mathieu Faverge committed
7
 * @copyright 2012-2018 Bordeaux INP, CNRS (LaBRI UMR 5800), Inria,
8
 *                      Univ. Bordeaux. All rights reserved.
9
 *
Mathieu Faverge's avatar
Mathieu Faverge committed
10
 ***
11
 *
Mathieu Faverge's avatar
Mathieu Faverge committed
12
 * @brief Chameleon zplrnt parallel algorithm
13
 *
Mathieu Faverge's avatar
Mathieu Faverge committed
14
 * @version 1.0.0
15
 * @comment This file has been automatically generated
Mathieu Faverge's avatar
Mathieu Faverge committed
16
 *          from Plasma 2.5.0 for CHAMELEON 1.0.0
17 18 19 20 21 22
 * @author Mathieu Faverge
 * @author Emmanuel Agullo
 * @author Cedric Castagnede
 * @date 2010-11-15
 * @precisions normal z -> s d c
 *
23
 */
24
#include "control/common.h"
25 26

#define A(m, n) A,  m,  n
27
/**
Mathieu Faverge's avatar
Mathieu Faverge committed
28
 *  chameleon_pzplghe - Generate a random matrix by tiles.
29
 */
Mathieu Faverge's avatar
Mathieu Faverge committed
30
void chameleon_pzplrnt( CHAM_desc_t *A, unsigned long long int seed,
Mathieu Faverge's avatar
Mathieu Faverge committed
31
                    RUNTIME_sequence_t *sequence, RUNTIME_request_t *request )
32
{
Mathieu Faverge's avatar
Mathieu Faverge committed
33
    CHAM_context_t *chamctxt;
Mathieu Faverge's avatar
Mathieu Faverge committed
34
    RUNTIME_option_t options;
35 36 37 38 39

    int m, n;
    int ldam;
    int tempmm, tempnn;

Mathieu Faverge's avatar
Mathieu Faverge committed
40
    chamctxt = chameleon_context_self();
Mathieu Faverge's avatar
Mathieu Faverge committed
41
    if (sequence->status != CHAMELEON_SUCCESS)
42
        return;
Mathieu Faverge's avatar
Mathieu Faverge committed
43
    RUNTIME_options_init(&options, chamctxt, sequence, request);
44 45 46 47 48 49 50 51

    for (m = 0; m < A->mt; m++) {
        tempmm = m == A->mt-1 ? A->m-m*A->mb : A->mb;
        ldam = BLKLDD(A, m);

        for (n = 0; n < A->nt; n++) {
            tempnn = n == A->nt-1 ? A->n-n*A->nb : A->nb;

Mathieu Faverge's avatar
Mathieu Faverge committed
52
            INSERT_TASK_zplrnt(
53 54 55 56 57
                &options,
                tempmm, tempnn, A(m, n), ldam,
                A->m, m*A->mb, n*A->nb, seed );
        }
    }
Mathieu Faverge's avatar
Mathieu Faverge committed
58
    RUNTIME_options_finalize(&options, chamctxt);
59
}