Fertilizer_ Derived Type

type, public :: Fertilizer_


Contents


Components

TypeVisibility AttributesNameInitial
real(kind=real64), public :: total_kg =0.0d0
real(kind=real64), public :: N_pct =0.0d0
real(kind=real64), public :: P_pct =0.0d0
real(kind=real64), public :: K_pct =0.0d0
real(kind=real64), public :: Ca_pct =0.0d0
real(kind=real64), public :: Mg_pct =0.0d0
real(kind=real64), public :: S_pct =0.0d0
real(kind=real64), public :: Fe_pct =0.0d0
real(kind=real64), public :: Mn_pct =0.0d0
real(kind=real64), public :: B_pct =0.0d0
real(kind=real64), public :: Zn_pct =0.0d0
real(kind=real64), public :: Mo_pct =0.0d0
real(kind=real64), public :: Cu_pct =0.0d0
real(kind=real64), public :: Cl_pct =0.0d0
real(kind=real64), public :: N_kg =0.0d0
real(kind=real64), public :: P_kg =0.0d0
real(kind=real64), public :: K_kg =0.0d0
real(kind=real64), public :: Ca_kg =0.0d0
real(kind=real64), public :: Mg_kg =0.0d0
real(kind=real64), public :: S_kg =0.0d0
real(kind=real64), public :: Fe_kg =0.0d0
real(kind=real64), public :: Mn_kg =0.0d0
real(kind=real64), public :: B_kg =0.0d0
real(kind=real64), public :: Zn_kg =0.0d0
real(kind=real64), public :: Mo_kg =0.0d0
real(kind=real64), public :: Cu_kg =0.0d0
real(kind=real64), public :: Cl_kg =0.0d0

Type-Bound Procedures

procedure, public :: init => initFertilizer

  • public subroutine initFertilizer(obj, config)

    Arguments

    Type IntentOptional AttributesName
    class(Fertilizer_), intent(inout) :: obj
    character(len=*), intent(in), optional :: config