This module contains the PROCESS CCFE HCPB blanket model based on CCFE HCPB model from the PROCESS engineering paper PROCESS Engineering paper (M. Kovari et al.)
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | ip | ||||
integer, | public | :: | ofile | ||||
real(kind=dp), | public | :: | armour_density | FW armour density [kg/m3] |
|||
real(kind=dp), | public | :: | fw_density | FW density [kg/m3] |
|||
real(kind=dp), | public | :: | blanket_density | Blanket density [kg/m3] |
|||
real(kind=dp), | public | :: | shield_density | Shield density [kg/m3] |
|||
real(kind=dp), | public | :: | vv_density | Vacuum vessel density [kg/m3] |
|||
real(kind=dp), | public | :: | x_blanket | Blanket exponent (tonne/m2) |
|||
real(kind=dp), | public | :: | x_shield | Shield exponent (tonne/m2) |
|||
real(kind=dp), | public | :: | tfc_nuc_heating | Unit nuclear heating in TF coil (W per W of fusion power) |
|||
real(kind=dp), | public | :: | fw_armour_u_nuc_heating | Unit heating of FW and armour in FW armour (W/kg per W of fusion power) |
|||
real(kind=dp), | public | :: | shld_u_nuc_heating | Unit nuclear heating in shield (W per W of fusion power) |
|||
real(kind=dp), | public | :: | pnuc_tot_blk_sector | Total nuclear power deposited in blanket covered sector (FW, BLKT, SHLD, TF) (MW) |
|||
real(kind=dp), | public | :: | exp_blanket | Exponential factors in nuclear heating calcs |
|||
real(kind=dp), | public | :: | exp_shield1 | Exponential factors in nuclear heating calcs |
|||
real(kind=dp), | public | :: | exp_shield2 | Exponential factors in nuclear heating calcs |
Initialise module variables