2 ! Test for import in modules
8 if(r /= 42) call abort()
19 if(a%c /= "xyz") call abort()
31 if(a /= 99.0 .or. b%c /= 11) call abort()
38 integer,parameter :: ikind = 8
52 integer, parameter :: dp = 8
73 if(y /= 13) call abort()
79 if(z%c /= "abc") call abort()
96 if(r /= -123.0 .or. t%c /= -44) call abort()