how to eliminate the final compiling error?

DATA R/-1.DO,1.DO,1.DO,-1.DO/ DATA S/-1.DO,-1.DO,1.DO,1.DO/ DATA U/-1.DO,1.DO,1.DO,-1.DO/ DATA V/-1.DO,-1.DO,1.DO,1.DO/ DATA WG/1.DO,1.DO,1.DO,1.DO/

it shows : error 1069 - Terminating decimal point for binary operator token expected but not found : error 52 - Compilation abandoned

then i modified the above to

DATA R/-1.0,DO,1.0,DO,1.0,DO,-1.0,DO/ DATA S/-1,DO,-1,DO,1,DO,1,DO/ DATA U/-1,DO,1,DO,1,DO,-1,DO/ DATA V/-1,DO,-1,DO,1,DO,1,DO/ DATA WG/1,DO,1,DO,1,DO,1,DO/

: error 287 - All items in a DATA statement's value list must be literal constants

then again i modified the above to

DATA R/-1.0,1.0,1.0,-1.0/ DATA S/-1.0,-1.0,1.0,1.0/ DATA U/-1.0,1.0,1.0,-1.0/ DATA V/-1.0,-1.0,1.0,1.0/ DATA WG/1.0,1.0,1.0,1.0/

*** SUBROUTINE 'PLATE4' called with argument no 9 as a REAL(KIND=2) when a INTEGER(KIND=3) was expected (from SUBROUTINE 'PLATE')

does this changes the actual programme how to eliminate the final compiling error?

In your first line (and following) you appear to have used the letter O where you need the number 0. i.e. it should be 1.D0 and not 1.DO etc.

Quoted from PaulLaidler In your first line (and following) you appear to have used the letter O where you need the number 0. i.e. it should be 1.D0 and not 1.DO etc.

thank you very much...it worked... but after doing what u told now i am having another difficulty which i had recently posted... plz help me on that also if possible...