[petsc-dev] Fortran-auto-interfaces
Jose E. Roman
jroman at dsic.upv.es
Tue Jan 10 14:07:08 CST 2023
After I add the definition of tTao, if I regenerate the fortran stubs I get this in petsctao.h90:
subroutine TaoGetLMVMMatrix(a,b,z)
import tMat,tTao
...
instead of
subroutine TaoGetLMVMMatrix(a,b,z)
import tMat
> El 10 ene 2023, a las 20:40, Blaise Bourdin <bourdin at mcmaster.ca> escribió:
>
> Hi Jose,
>
> I have created the type tTAO and PETSC_NULL_TAO what I need to figure out is how to get bfort to import tTAO in each auto interface, for instance
>
> Blaise
>
>
>
>> On Jan 10, 2023, at 12:23 PM, Jose E. Roman <jroman at dsic.upv.es> wrote:
>>
>> The files under ftn-auto-interfaces are generated with bfort when you run configure. You can also force its generation with 'make allfortranstubs'.
>>
>> In the case of Tao I think the problem is that the definition of tTao is missing. You should have something like this in src/tao/f90-mod/petsctao.h:
>>
>> type tTao
>> PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE
>> end type tTao
>>
>>
>> Jose
>>
>>
>>> El 10 ene 2023, a las 17:22, Blaise Bourdin <bourdin at mcmaster.ca> escribió:
>>>
>>> Hi,
>>>
>>> I am trying to bring TAO fortran interfaces up to par with SNES. How is tao/f90-mod/ftn-auto-interfaces/petsctao.h90 generated? I would need to import tTAO and replace the call to the “Tao” macro with TAO.
>>>
>>> Regards,
>>> Blaise
>>>
>>> —
>>> Canada Research Chair in Mathematical and Computational Aspects of Solid Mechanics (Tier 1)
>>> Professor, Department of Mathematics & Statistics
>>> Hamilton Hall room 409A, McMaster University
>>> 1280 Main Street West, Hamilton, Ontario L8S 4K1, Canada
>>> https://www.math.mcmaster.ca/bourdin | +1 (905) 525 9140 ext. 27243
>>>
>>
>
> —
> Canada Research Chair in Mathematical and Computational Aspects of Solid Mechanics (Tier 1)
> Professor, Department of Mathematics & Statistics
> Hamilton Hall room 409A, McMaster University
> 1280 Main Street West, Hamilton, Ontario L8S 4K1, Canada
> https://www.math.mcmaster.ca/bourdin | +1 (905) 525 9140 ext. 27243
>
More information about the petsc-dev
mailing list