2016-12-01 1 views
0

Utilisez le code factice suivant pour répliquer le problème.Ligne trop longue dans PGI 16.9. Comment résoudre?

program pp 
    implicit none 
    real*8,dimension(45) :: refPoints 
    refPoints(:) = (/ -1.0 , 1.0 , 1.0 , -1.0 , -1.0 , 1.0 , 1.0 , -1.0 , 0.0 , 1.0 , 0.0 , -1.0 , 0.0 , 1.0 , 0.0 , -1.0 , -1.0 , 1.0 , 1.0 , -1.0 , 0.0 , 1.0 , 0.0 ,-1.0 , 0.0 , 0.0 , 0.0 , 0.0 , 0.0 , 1.0, 1.0, 2.0 , 3.0, 34.0, 35.0, 25.0, 1.0, 50.0, 5.0, 55.0 , 1.0 , 2.0, 3.0, 4.0, 5.0/) 

end program pp 

ligne PGF90-S-0285-Source trop long (pp.f90: 6) PGF90-S-0023-Erreur de syntaxe - entre parenthèses asymétrique (pp.f90: 6) 0 informer, 0 avertissements, 2 severes, 0 fatal pour pp

+0

qu'en est-il de l'affichage du code? – Gilles

+0

refPoints (1, :) = (-1.0_rp, 1.0_rp, 1.0_rp, -1.0_rp, -1.0_rp, 1.0_rp, 1.0_rp, -1.0_rp, 0.0_rp, 1.0_rp, 0.0_rp, -1.0_rp , 0.0_rp, 1.0_rp, 0.0 \ _rp, -1.0_rp, -1.0_rp, 1.0_rp, 1.0_rp, -1.0_rp, 0.0_rp, 1.0_rp, 0.0_rp, -1.0_rp, 0.0_rp, 0.0_rp, 0.0 _rp /) –

+0

C'est la ligne. fonctionne bien avec tous les compilateurs Fortran sauf PGI. Pour PGI j'ai besoin d'ajouter & symbole pour la continuation. J'ai tellement d'entre eux dans le code entier. –

Répondre

0

132 colonnes est limite la norme F90 et aller au-delà de cette limite est un comportement indéfini. Bien que cela soit douloureux, vous serez mieux à long terme en mettant votre code en conformité en ajoutant des continuations.