blob: 7b9609071bce3e775703b12c430f411af09e6eee (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
python module _char_handling_test
interface
subroutine charint(trans, info)
callstatement (*f2py_func)(&trans, &info)
callprotoargument char*, int*
character, intent(in), check(trans=='N'||trans=='T'||trans=='C') :: trans = 'N'
integer intent(out) :: info
end subroutine charint
end interface
end python module _char_handling_test
|